drivers/base/devres.c

   1 /*
   2  * drivers/base/devres.c - device resource management
   3  *
   4  * Copyright (c) 2006  SUSE Linux Products GmbH
   5  * Copyright (c) 2006  Tejun Heo <teheo@suse.de>
   6  *
   7  * This file is released under the GPLv2.
   8  */
   9
  10 #include <linux/device.h>
  11 #include <linux/module.h>
  12 #include <linux/slab.h>
  13
  14 #include "base.h"
  15
  16 struct devres_node {
  17         struct list_head                entry;
  18         dr_release_t                    release;
  19 #ifdef CONFIG_DEBUG_DEVRES
  20         const char                      *name;
  21         size_t                          size;
  22 #endif
  23 };
  24
  25 struct devres {
  26         struct devres_node              node;
  27         /* -- 3 pointers */
  28         unsigned long long              data[]; /* guarantee ull alignment */
  29 };
  30
  31 struct devres_group {
  32         struct devres_node              node[2];
  33         void                            *id;
  34         int                             color;
  35         /* -- 8 pointers */
  36 };
  37
  38 #ifdef CONFIG_DEBUG_DEVRES
  39 static int log_devres = 0;
  40 module_param_named(log, log_devres, int, S_IRUGO | S_IWUSR);
  41
  42 static void set_node_dbginfo(struct devres_node *node, const char *name,
  43                              size_t size)
  44 {
  45         node->name = name;
  46         node->size = size;
  47 }
  48
  49 static void devres_log(struct device *dev, struct devres_node *node,
  50                        const char *op)
  51 {
  52         if (unlikely(log_devres))
  53                 dev_printk(KERN_ERR, dev, "DEVRES %3s %p %s (%lu bytes)\n",
  54                            op, node, node->name, (unsigned long)node->size);
  55 }
  56 #else /* CONFIG_DEBUG_DEVRES */
  57 #define set_node_dbginfo(node, n, s)    do {} while (0)
  58 #define devres_log(dev, node, op)       do {} while (0)
  59 #endif /* CONFIG_DEBUG_DEVRES */
  60
  61 /*
  62  * Release functions for devres group.  These callbacks are used only
  63  * for identification.
  64  */
  65 static void group_open_release(struct device *dev, void *res)
  66 {
  67         /* noop */
  68 }
  69
  70 static void group_close_release(struct device *dev, void *res)
  71 {
  72         /* noop */
  73 }
  74
  75 static struct devres_group * node_to_group(struct devres_node *node)
  76 {
  77         if (node->release == &group_open_release)
  78                 return container_of(node, struct devres_group, node[0]);
  79         if (node->release == &group_close_release)
  80                 return container_of(node, struct devres_group, node[1]);
  81         return NULL;
  82 }
  83
  84 static __always_inline struct devres * alloc_dr(dr_release_t release,
  85                                                 size_t size, gfp_t gfp)
  86 {
  87         size_t tot_size = sizeof(struct devres) + size;
  88         struct devres *dr;
  89
  90         dr = kmalloc_track_caller(tot_size, gfp);
  91         if (unlikely(!dr))
  92                 return NULL;
  93
  94         memset(dr, 0, tot_size);
  95         INIT_LIST_HEAD(&dr->node.entry);
  96         dr->node.release = release;
  97         return dr;
  98 }
  99
 100 static void add_dr(struct device *dev, struct devres_node *node)
 101 {
 102         devres_log(dev, node, "ADD");
 103         BUG_ON(!list_empty(&node->entry));
 104         list_add_tail(&node->entry, &dev->devres_head);
 105 }
 106
 107 #ifdef CONFIG_DEBUG_DEVRES
 108 void * __devres_alloc(dr_release_t release, size_t size, gfp_t gfp,
 109                       const char *name)
 110 {
 111         struct devres *dr;
 112
 113         dr = alloc_dr(release, size, gfp);
 114         if (unlikely(!dr))
 115                 return NULL;
 116         set_node_dbginfo(&dr->node, name, size);
 117         return dr->data;
 118 }
 119 EXPORT_SYMBOL_GPL(__devres_alloc);
 120 #else
 121 /**
 122  * devres_alloc - Allocate device resource data
 123  * @release: Release function devres will be associated with
 124  * @size: Allocation size
 125  * @gfp: Allocation flags
 126  *
 127  * Allocate devres of @size bytes.  The allocated area is zeroed, then
 128  * associated with @release.  The returned pointer can be passed to
 129  * other devres_*() functions.
 130  *
 131  * RETURNS:
 132  * Pointer to allocated devres on success, NULL on failure.
 133  */
 134 void * devres_alloc(dr_release_t release, size_t size, gfp_t gfp)
 135 {
 136         struct devres *dr;
 137
 138         dr = alloc_dr(release, size, gfp);
 139         if (unlikely(!dr))
 140                 return NULL;
 141         return dr->data;
 142 }
 143 EXPORT_SYMBOL_GPL(devres_alloc);
 144 #endif
 145
 146 /**
 147  * devres_free - Free device resource data
 148  * @res: Pointer to devres data to free
 149  *
 150  * Free devres created with devres_alloc().
 151  */
 152 void devres_free(void *res)
 153 {
 154         if (res) {
 155                 struct devres *dr = container_of(res, struct devres, data);
 156
 157                 BUG_ON(!list_empty(&dr->node.entry));
 158                 kfree(dr);
 159         }
 160 }
 161 EXPORT_SYMBOL_GPL(devres_free);
 162
 163 /**
 164  * devres_add - Register device resource
 165  * @dev: Device to add resource to
 166  * @res: Resource to register
 167  *
 168  * Register devres @res to @dev.  @res should have been allocated
 169  * using devres_alloc().  On driver detach, the associated release
 170  * function will be invoked and devres will be freed automatically.
 171  */
 172 void devres_add(struct device *dev, void *res)
 173 {
 174         struct devres *dr = container_of(res, struct devres, data);
 175         unsigned long flags;
 176
 177         spin_lock_irqsave(&dev->devres_lock, flags);
 178         add_dr(dev, &dr->node);
 179         spin_unlock_irqrestore(&dev->devres_lock, flags);
 180 }
 181 EXPORT_SYMBOL_GPL(devres_add);
 182
 183 static struct devres *find_dr(struct device *dev, dr_release_t release,
 184                               dr_match_t match, void *match_data)
 185 {
 186         struct devres_node *node;
 187
 188         list_for_each_entry_reverse(node, &dev->devres_head, entry) {
 189                 struct devres *dr = container_of(node, struct devres, node);
 190
 191                 if (node->release != release)
 192                         continue;
 193                 if (match && !match(dev, dr->data, match_data))
 194                         continue;
 195                 return dr;
 196         }
 197
 198         return NULL;
 199 }
 200
 201 /**
 202  * devres_find - Find device resource
 203  * @dev: Device to lookup resource from
 204  * @release: Look for resources associated with this release function
 205  * @match: Match function (optional)
 206  * @match_data: Data for the match function
 207  *
 208  * Find the latest devres of @dev which is associated with @release
 209  * and for which @match returns 1.  If @match is NULL, it's considered
 210  * to match all.
 211  *
 212  * RETURNS:
 213  * Pointer to found devres, NULL if not found.
 214  */
 215 void * devres_find(struct device *dev, dr_release_t release,
 216                    dr_match_t match, void *match_data)
 217 {
 218         struct devres *dr;
 219         unsigned long flags;
 220
 221         spin_lock_irqsave(&dev->devres_lock, flags);
 222         dr = find_dr(dev, release, match, match_data);
 223         spin_unlock_irqrestore(&dev->devres_lock, flags);
 224
 225         if (dr)
 226                 return dr->data;
 227         return NULL;
 228 }
 229 EXPORT_SYMBOL_GPL(devres_find);
 230
 231 /**
 232  * devres_get - Find devres, if non-existent, add one atomically
 233  * @dev: Device to lookup or add devres for
 234  * @new_res: Pointer to new initialized devres to add if not found
 235  * @match: Match function (optional)
 236  * @match_data: Data for the match function
 237  *
 238  * Find the latest devres of @dev which has the same release function
 239  * as @new_res and for which @match return 1.  If found, @new_res is
 240  * freed; otherwise, @new_res is added atomically.
 241  *
 242  * RETURNS:
 243  * Pointer to found or added devres.
 244  */
 245 void * devres_get(struct device *dev, void *new_res,
 246                   dr_match_t match, void *match_data)
 247 {
 248         struct devres *new_dr = container_of(new_res, struct devres, data);
 249         struct devres *dr;
 250         unsigned long flags;
 251
 252         spin_lock_irqsave(&dev->devres_lock, flags);
 253         dr = find_dr(dev, new_dr->node.release, match, match_data);
 254         if (!dr) {
 255                 add_dr(dev, &new_dr->node);
 256                 dr = new_dr;
 257                 new_dr = NULL;
 258         }
 259         spin_unlock_irqrestore(&dev->devres_lock, flags);
 260         devres_free(new_dr);
 261
 262         return dr->data;
 263 }
 264 EXPORT_SYMBOL_GPL(devres_get);
 265
 266 /**
 267  * devres_remove - Find a device resource and remove it
 268  * @dev: Device to find resource from
 269  * @release: Look for resources associated with this release function
 270  * @match: Match function (optional)
 271  * @match_data: Data for the match function
 272  *
 273  * Find the latest devres of @dev associated with @release and for
 274  * which @match returns 1.  If @match is NULL, it's considered to
 275  * match all.  If found, the resource is removed atomically and
 276  * returned.
 277  *
 278  * RETURNS:
 279  * Pointer to removed devres on success, NULL if not found.
 280  */
 281 void * devres_remove(struct device *dev, dr_release_t release,
 282                      dr_match_t match, void *match_data)
 283 {
 284         struct devres *dr;
 285         unsigned long flags;
 286
 287         spin_lock_irqsave(&dev->devres_lock, flags);
 288         dr = find_dr(dev, release, match, match_data);
 289         if (dr) {
 290                 list_del_init(&dr->node.entry);
 291                 devres_log(dev, &dr->node, "REM");
 292         }
 293         spin_unlock_irqrestore(&dev->devres_lock, flags);
 294
 295         if (dr)
 296                 return dr->data;
 297         return NULL;
 298 }
 299 EXPORT_SYMBOL_GPL(devres_remove);
 300
 301 /**
 302  * devres_destroy - Find a device resource and destroy it
 303  * @dev: Device to find resource from
 304  * @release: Look for resources associated with this release function
 305  * @match: Match function (optional)
 306  * @match_data: Data for the match function
 307  *
 308  * Find the latest devres of @dev associated with @release and for
 309  * which @match returns 1.  If @match is NULL, it's considered to
 310  * match all.  If found, the resource is removed atomically and freed.
 311  *
 312  * Note that the release function for the resource will not be called,
 313  * only the devres-allocated data will be freed.  The caller becomes
 314  * responsible for freeing any other data.
 315  *
 316  * RETURNS:
 317  * 0 if devres is found and freed, -ENOENT if not found.
 318  */
 319 int devres_destroy(struct device *dev, dr_release_t release,
 320                    dr_match_t match, void *match_data)
 321 {
 322         void *res;
 323
 324         res = devres_remove(dev, release, match, match_data);
 325         if (unlikely(!res))
 326                 return -ENOENT;
 327
 328         devres_free(res);
 329         return 0;
 330 }
 331 EXPORT_SYMBOL_GPL(devres_destroy);
 332
 333 static int remove_nodes(struct device *dev,
 334                         struct list_head *first, struct list_head *end,
 335                         struct list_head *todo)
 336 {
 337         int cnt = 0, nr_groups = 0;
 338         struct list_head *cur;
 339
 340         /* First pass - move normal devres entries to @todo and clear
 341          * devres_group colors.
 342          */
 343         cur = first;
 344         while (cur != end) {
 345                 struct devres_node *node;
 346                 struct devres_group *grp;
 347
 348                 node = list_entry(cur, struct devres_node, entry);
 349                 cur = cur->next;
 350
 351                 grp = node_to_group(node);
 352                 if (grp) {
 353                         /* clear color of group markers in the first pass */
 354                         grp->color = 0;
 355                         nr_groups++;
 356                 } else {
 357                         /* regular devres entry */
 358                         if (&node->entry == first)
 359                                 first = first->next;
 360                         list_move_tail(&node->entry, todo);
 361                         cnt++;
 362                 }
 363         }
 364
 365         if (!nr_groups)
 366                 return cnt;
 367
 368         /* Second pass - Scan groups and color them.  A group gets
 369          * color value of two iff the group is wholly contained in
 370          * [cur, end).  That is, for a closed group, both opening and
 371          * closing markers should be in the range, while just the
 372          * opening marker is enough for an open group.
 373          */
 374         cur = first;
 375         while (cur != end) {
 376                 struct devres_node *node;
 377                 struct devres_group *grp;
 378
 379                 node = list_entry(cur, struct devres_node, entry);
 380                 cur = cur->next;
 381
 382                 grp = node_to_group(node);
 383                 BUG_ON(!grp || list_empty(&grp->node[0].entry));
 384
 385                 grp->color++;
 386                 if (list_empty(&grp->node[1].entry))
 387                         grp->color++;
 388
 389                 BUG_ON(grp->color <= 0 || grp->color > 2);
 390                 if (grp->color == 2) {
 391                         /* No need to update cur or end.  The removed
 392                          * nodes are always before both.
 393                          */
 394                         list_move_tail(&grp->node[0].entry, todo);
 395                         list_del_init(&grp->node[1].entry);
 396                 }
 397         }
 398
 399         return cnt;
 400 }
 401
 402 static int release_nodes(struct device *dev, struct list_head *first,
 403                          struct list_head *end, unsigned long flags)
 404         __releases(&dev->devres_lock)
 405 {
 406         LIST_HEAD(todo);
 407         int cnt;
 408         struct devres *dr, *tmp;
 409
 410         cnt = remove_nodes(dev, first, end, &todo);
 411
 412         spin_unlock_irqrestore(&dev->devres_lock, flags);
 413
 414         /* Release.  Note that both devres and devres_group are
 415          * handled as devres in the following loop.  This is safe.
 416          */
 417         list_for_each_entry_safe_reverse(dr, tmp, &todo, node.entry) {
 418                 devres_log(dev, &dr->node, "REL");
 419                 dr->node.release(dev, dr->data);
 420                 kfree(dr);
 421         }
 422
 423         return cnt;
 424 }
 425
 426 /**
 427  * devres_release_all - Release all managed resources
 428  * @dev: Device to release resources for
 429  *
 430  * Release all resources associated with @dev.  This function is
 431  * called on driver detach.
 432  */
 433 int devres_release_all(struct device *dev)
 434 {
 435         unsigned long flags;
 436
 437         /* Looks like an uninitialized device structure */
 438         if (WARN_ON(dev->devres_head.next == NULL))
 439                 return -ENODEV;
 440         spin_lock_irqsave(&dev->devres_lock, flags);
 441         return release_nodes(dev, dev->devres_head.next, &dev->devres_head,
 442                              flags);
 443 }
 444
 445 /**
 446  * devres_open_group - Open a new devres group
 447  * @dev: Device to open devres group for
 448  * @id: Separator ID
 449  * @gfp: Allocation flags
 450  *
 451  * Open a new devres group for @dev with @id.  For @id, using a
 452  * pointer to an object which won't be used for another group is
 453  * recommended.  If @id is NULL, address-wise unique ID is created.
 454  *
 455  * RETURNS:
 456  * ID of the new group, NULL on failure.
 457  */
 458 void * devres_open_group(struct device *dev, void *id, gfp_t gfp)
 459 {
 460         struct devres_group *grp;
 461         unsigned long flags;
 462
 463         grp = kmalloc(sizeof(*grp), gfp);
 464         if (unlikely(!grp))
 465                 return NULL;
 466
 467         grp->node[0].release = &group_open_release;
 468         grp->node[1].release = &group_close_release;
 469         INIT_LIST_HEAD(&grp->node[0].entry);
 470         INIT_LIST_HEAD(&grp->node[1].entry);
 471         set_node_dbginfo(&grp->node[0], "grp<", 0);
 472         set_node_dbginfo(&grp->node[1], "grp>", 0);
 473         grp->id = grp;
 474         if (id)
 475                 grp->id = id;
 476
 477         spin_lock_irqsave(&dev->devres_lock, flags);
 478         add_dr(dev, &grp->node[0]);
 479         spin_unlock_irqrestore(&dev->devres_lock, flags);
 480         return grp->id;
 481 }
 482 EXPORT_SYMBOL_GPL(devres_open_group);
 483
 484 /* Find devres group with ID @id.  If @id is NULL, look for the latest. */
 485 static struct devres_group * find_group(struct device *dev, void *id)
 486 {
 487         struct devres_node *node;
 488
 489         list_for_each_entry_reverse(node, &dev->devres_head, entry) {
 490                 struct devres_group *grp;
 491
 492                 if (node->release != &group_open_release)
 493                         continue;
 494
 495                 grp = container_of(node, struct devres_group, node[0]);
 496
 497                 if (id) {
 498                         if (grp->id == id)
 499                                 return grp;
 500                 } else if (list_empty(&grp->node[1].entry))
 501                         return grp;
 502         }
 503
 504         return NULL;
 505 }
 506
 507 /**
 508  * devres_close_group - Close a devres group
 509  * @dev: Device to close devres group for
 510  * @id: ID of target group, can be NULL
 511  *
 512  * Close the group identified by @id.  If @id is NULL, the latest open
 513  * group is selected.
 514  */
 515 void devres_close_group(struct device *dev, void *id)
 516 {
 517         struct devres_group *grp;
 518         unsigned long flags;
 519
 520         spin_lock_irqsave(&dev->devres_lock, flags);
 521
 522         grp = find_group(dev, id);
 523         if (grp)
 524                 add_dr(dev, &grp->node[1]);
 525         else
 526                 WARN_ON(1);
 527
 528         spin_unlock_irqrestore(&dev->devres_lock, flags);
 529 }
 530 EXPORT_SYMBOL_GPL(devres_close_group);
 531
 532 /**
 533  * devres_remove_group - Remove a devres group
 534  * @dev: Device to remove group for
 535  * @id: ID of target group, can be NULL
 536  *
 537  * Remove the group identified by @id.  If @id is NULL, the latest
 538  * open group is selected.  Note that removing a group doesn't affect
 539  * any other resources.
 540  */
 541 void devres_remove_group(struct device *dev, void *id)
 542 {
 543         struct devres_group *grp;
 544         unsigned long flags;
 545
 546         spin_lock_irqsave(&dev->devres_lock, flags);
 547
 548         grp = find_group(dev, id);
 549         if (grp) {
 550                 list_del_init(&grp->node[0].entry);
 551                 list_del_init(&grp->node[1].entry);
 552                 devres_log(dev, &grp->node[0], "REM");
 553         } else
 554                 WARN_ON(1);
 555
 556         spin_unlock_irqrestore(&dev->devres_lock, flags);
 557
 558         kfree(grp);
 559 }
 560 EXPORT_SYMBOL_GPL(devres_remove_group);
 561
 562 /**
 563  * devres_release_group - Release resources in a devres group
 564  * @dev: Device to release group for
 565  * @id: ID of target group, can be NULL
 566  *
 567  * Release all resources in the group identified by @id.  If @id is
 568  * NULL, the latest open group is selected.  The selected group and
 569  * groups properly nested inside the selected group are removed.
 570  *
 571  * RETURNS:
 572  * The number of released non-group resources.
 573  */
 574 int devres_release_group(struct device *dev, void *id)
 575 {
 576         struct devres_group *grp;
 577         unsigned long flags;
 578         int cnt = 0;
 579
 580         spin_lock_irqsave(&dev->devres_lock, flags);
 581
 582         grp = find_group(dev, id);
 583         if (grp) {
 584                 struct list_head *first = &grp->node[0].entry;
 585                 struct list_head *end = &dev->devres_head;
 586
 587                 if (!list_empty(&grp->node[1].entry))
 588                         end = grp->node[1].entry.next;
 589
 590                 cnt = release_nodes(dev, first, end, flags);
 591         } else {
 592                 WARN_ON(1);
 593                 spin_unlock_irqrestore(&dev->devres_lock, flags);
 594         }
 595
 596         return cnt;
 597 }
 598 EXPORT_SYMBOL_GPL(devres_release_group);
 599
 600 /*
 601  * Managed kzalloc/kfree
 602  */
 603 static void devm_kzalloc_release(struct device *dev, void *res)
 604 {
 605         /* noop */
 606 }
 607
 608 static int devm_kzalloc_match(struct device *dev, void *res, void *data)
 609 {
 610         return res == data;
 611 }
 612
 613 /**
 614  * devm_kzalloc - Resource-managed kzalloc
 615  * @dev: Device to allocate memory for
 616  * @size: Allocation size
 617  * @gfp: Allocation gfp flags
 618  *
 619  * Managed kzalloc.  Memory allocated with this function is
 620  * automatically freed on driver detach.  Like all other devres
 621  * resources, guaranteed alignment is unsigned long long.
 622  *
 623  * RETURNS:
 624  * Pointer to allocated memory on success, NULL on failure.
 625  */
 626 void * devm_kzalloc(struct device *dev, size_t size, gfp_t gfp)
 627 {
 628         struct devres *dr;
 629
 630         /* use raw alloc_dr for kmalloc caller tracing */
 631         dr = alloc_dr(devm_kzalloc_release, size, gfp);
 632         if (unlikely(!dr))
 633                 return NULL;
 634
 635         set_node_dbginfo(&dr->node, "devm_kzalloc_release", size);
 636         devres_add(dev, dr->data);
 637         return dr->data;
 638 }
 639 EXPORT_SYMBOL_GPL(devm_kzalloc);
 640
 641 /**
 642  * devm_kfree - Resource-managed kfree
 643  * @dev: Device this memory belongs to
 644  * @p: Memory to free
 645  *
 646  * Free memory allocated with devm_kzalloc().
 647  */
 648 void devm_kfree(struct device *dev, void *p)
 649 {
 650         int rc;
 651
 652         rc = devres_destroy(dev, devm_kzalloc_release, devm_kzalloc_match, p);
 653         WARN_ON(rc);
 654 }
 655 EXPORT_SYMBOL_GPL(devm_kfree);