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