Add the rt linux 4.1.3-rt3 as base
[kvmfornfv.git] / kernel / drivers / clk / clkdev.c
1 /*
2  * drivers/clk/clkdev.c
3  *
4  *  Copyright (C) 2008 Russell King.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 as
8  * published by the Free Software Foundation.
9  *
10  * Helper for the clk API to assist looking up a struct clk.
11  */
12 #include <linux/module.h>
13 #include <linux/kernel.h>
14 #include <linux/device.h>
15 #include <linux/list.h>
16 #include <linux/errno.h>
17 #include <linux/err.h>
18 #include <linux/string.h>
19 #include <linux/mutex.h>
20 #include <linux/clk.h>
21 #include <linux/clkdev.h>
22 #include <linux/clk-provider.h>
23 #include <linux/of.h>
24
25 #include "clk.h"
26
27 static LIST_HEAD(clocks);
28 static DEFINE_MUTEX(clocks_mutex);
29
30 #if defined(CONFIG_OF) && defined(CONFIG_COMMON_CLK)
31 static struct clk *__of_clk_get(struct device_node *np, int index,
32                                const char *dev_id, const char *con_id)
33 {
34         struct of_phandle_args clkspec;
35         struct clk *clk;
36         int rc;
37
38         if (index < 0)
39                 return ERR_PTR(-EINVAL);
40
41         rc = of_parse_phandle_with_args(np, "clocks", "#clock-cells", index,
42                                         &clkspec);
43         if (rc)
44                 return ERR_PTR(rc);
45
46         clk = __of_clk_get_from_provider(&clkspec, dev_id, con_id);
47         of_node_put(clkspec.np);
48
49         return clk;
50 }
51
52 struct clk *of_clk_get(struct device_node *np, int index)
53 {
54         return __of_clk_get(np, index, np->full_name, NULL);
55 }
56 EXPORT_SYMBOL(of_clk_get);
57
58 static struct clk *__of_clk_get_by_name(struct device_node *np,
59                                         const char *dev_id,
60                                         const char *name)
61 {
62         struct clk *clk = ERR_PTR(-ENOENT);
63
64         /* Walk up the tree of devices looking for a clock that matches */
65         while (np) {
66                 int index = 0;
67
68                 /*
69                  * For named clocks, first look up the name in the
70                  * "clock-names" property.  If it cannot be found, then
71                  * index will be an error code, and of_clk_get() will fail.
72                  */
73                 if (name)
74                         index = of_property_match_string(np, "clock-names", name);
75                 clk = __of_clk_get(np, index, dev_id, name);
76                 if (!IS_ERR(clk)) {
77                         break;
78                 } else if (name && index >= 0) {
79                         if (PTR_ERR(clk) != -EPROBE_DEFER)
80                                 pr_err("ERROR: could not get clock %s:%s(%i)\n",
81                                         np->full_name, name ? name : "", index);
82                         return clk;
83                 }
84
85                 /*
86                  * No matching clock found on this node.  If the parent node
87                  * has a "clock-ranges" property, then we can try one of its
88                  * clocks.
89                  */
90                 np = np->parent;
91                 if (np && !of_get_property(np, "clock-ranges", NULL))
92                         break;
93         }
94
95         return clk;
96 }
97
98 /**
99  * of_clk_get_by_name() - Parse and lookup a clock referenced by a device node
100  * @np: pointer to clock consumer node
101  * @name: name of consumer's clock input, or NULL for the first clock reference
102  *
103  * This function parses the clocks and clock-names properties,
104  * and uses them to look up the struct clk from the registered list of clock
105  * providers.
106  */
107 struct clk *of_clk_get_by_name(struct device_node *np, const char *name)
108 {
109         if (!np)
110                 return ERR_PTR(-ENOENT);
111
112         return __of_clk_get_by_name(np, np->full_name, name);
113 }
114 EXPORT_SYMBOL(of_clk_get_by_name);
115
116 #else /* defined(CONFIG_OF) && defined(CONFIG_COMMON_CLK) */
117
118 static struct clk *__of_clk_get_by_name(struct device_node *np,
119                                         const char *dev_id,
120                                         const char *name)
121 {
122         return ERR_PTR(-ENOENT);
123 }
124 #endif
125
126 /*
127  * Find the correct struct clk for the device and connection ID.
128  * We do slightly fuzzy matching here:
129  *  An entry with a NULL ID is assumed to be a wildcard.
130  *  If an entry has a device ID, it must match
131  *  If an entry has a connection ID, it must match
132  * Then we take the most specific entry - with the following
133  * order of precedence: dev+con > dev only > con only.
134  */
135 static struct clk_lookup *clk_find(const char *dev_id, const char *con_id)
136 {
137         struct clk_lookup *p, *cl = NULL;
138         int match, best_found = 0, best_possible = 0;
139
140         if (dev_id)
141                 best_possible += 2;
142         if (con_id)
143                 best_possible += 1;
144
145         list_for_each_entry(p, &clocks, node) {
146                 match = 0;
147                 if (p->dev_id) {
148                         if (!dev_id || strcmp(p->dev_id, dev_id))
149                                 continue;
150                         match += 2;
151                 }
152                 if (p->con_id) {
153                         if (!con_id || strcmp(p->con_id, con_id))
154                                 continue;
155                         match += 1;
156                 }
157
158                 if (match > best_found) {
159                         cl = p;
160                         if (match != best_possible)
161                                 best_found = match;
162                         else
163                                 break;
164                 }
165         }
166         return cl;
167 }
168
169 struct clk *clk_get_sys(const char *dev_id, const char *con_id)
170 {
171         struct clk_lookup *cl;
172         struct clk *clk = NULL;
173
174         mutex_lock(&clocks_mutex);
175
176         cl = clk_find(dev_id, con_id);
177         if (!cl)
178                 goto out;
179
180         clk = __clk_create_clk(__clk_get_hw(cl->clk), dev_id, con_id);
181         if (IS_ERR(clk))
182                 goto out;
183
184         if (!__clk_get(clk)) {
185                 __clk_free_clk(clk);
186                 cl = NULL;
187                 goto out;
188         }
189
190 out:
191         mutex_unlock(&clocks_mutex);
192
193         return cl ? clk : ERR_PTR(-ENOENT);
194 }
195 EXPORT_SYMBOL(clk_get_sys);
196
197 struct clk *clk_get(struct device *dev, const char *con_id)
198 {
199         const char *dev_id = dev ? dev_name(dev) : NULL;
200         struct clk *clk;
201
202         if (dev) {
203                 clk = __of_clk_get_by_name(dev->of_node, dev_id, con_id);
204                 if (!IS_ERR(clk) || PTR_ERR(clk) == -EPROBE_DEFER)
205                         return clk;
206         }
207
208         return clk_get_sys(dev_id, con_id);
209 }
210 EXPORT_SYMBOL(clk_get);
211
212 void clk_put(struct clk *clk)
213 {
214         __clk_put(clk);
215 }
216 EXPORT_SYMBOL(clk_put);
217
218 void clkdev_add(struct clk_lookup *cl)
219 {
220         mutex_lock(&clocks_mutex);
221         list_add_tail(&cl->node, &clocks);
222         mutex_unlock(&clocks_mutex);
223 }
224 EXPORT_SYMBOL(clkdev_add);
225
226 void __init clkdev_add_table(struct clk_lookup *cl, size_t num)
227 {
228         mutex_lock(&clocks_mutex);
229         while (num--) {
230                 list_add_tail(&cl->node, &clocks);
231                 cl++;
232         }
233         mutex_unlock(&clocks_mutex);
234 }
235
236 #define MAX_DEV_ID      20
237 #define MAX_CON_ID      16
238
239 struct clk_lookup_alloc {
240         struct clk_lookup cl;
241         char    dev_id[MAX_DEV_ID];
242         char    con_id[MAX_CON_ID];
243 };
244
245 static struct clk_lookup * __init_refok
246 vclkdev_alloc(struct clk *clk, const char *con_id, const char *dev_fmt,
247         va_list ap)
248 {
249         struct clk_lookup_alloc *cla;
250
251         cla = __clkdev_alloc(sizeof(*cla));
252         if (!cla)
253                 return NULL;
254
255         cla->cl.clk = clk;
256         if (con_id) {
257                 strlcpy(cla->con_id, con_id, sizeof(cla->con_id));
258                 cla->cl.con_id = cla->con_id;
259         }
260
261         if (dev_fmt) {
262                 vscnprintf(cla->dev_id, sizeof(cla->dev_id), dev_fmt, ap);
263                 cla->cl.dev_id = cla->dev_id;
264         }
265
266         return &cla->cl;
267 }
268
269 struct clk_lookup * __init_refok
270 clkdev_alloc(struct clk *clk, const char *con_id, const char *dev_fmt, ...)
271 {
272         struct clk_lookup *cl;
273         va_list ap;
274
275         va_start(ap, dev_fmt);
276         cl = vclkdev_alloc(clk, con_id, dev_fmt, ap);
277         va_end(ap);
278
279         return cl;
280 }
281 EXPORT_SYMBOL(clkdev_alloc);
282
283 int clk_add_alias(const char *alias, const char *alias_dev_name, char *id,
284         struct device *dev)
285 {
286         struct clk *r = clk_get(dev, id);
287         struct clk_lookup *l;
288
289         if (IS_ERR(r))
290                 return PTR_ERR(r);
291
292         l = clkdev_alloc(r, alias, alias_dev_name);
293         clk_put(r);
294         if (!l)
295                 return -ENODEV;
296         clkdev_add(l);
297         return 0;
298 }
299 EXPORT_SYMBOL(clk_add_alias);
300
301 /*
302  * clkdev_drop - remove a clock dynamically allocated
303  */
304 void clkdev_drop(struct clk_lookup *cl)
305 {
306         mutex_lock(&clocks_mutex);
307         list_del(&cl->node);
308         mutex_unlock(&clocks_mutex);
309         kfree(cl);
310 }
311 EXPORT_SYMBOL(clkdev_drop);
312
313 /**
314  * clk_register_clkdev - register one clock lookup for a struct clk
315  * @clk: struct clk to associate with all clk_lookups
316  * @con_id: connection ID string on device
317  * @dev_id: format string describing device name
318  *
319  * con_id or dev_id may be NULL as a wildcard, just as in the rest of
320  * clkdev.
321  *
322  * To make things easier for mass registration, we detect error clks
323  * from a previous clk_register() call, and return the error code for
324  * those.  This is to permit this function to be called immediately
325  * after clk_register().
326  */
327 int clk_register_clkdev(struct clk *clk, const char *con_id,
328         const char *dev_fmt, ...)
329 {
330         struct clk_lookup *cl;
331         va_list ap;
332
333         if (IS_ERR(clk))
334                 return PTR_ERR(clk);
335
336         va_start(ap, dev_fmt);
337         cl = vclkdev_alloc(clk, con_id, dev_fmt, ap);
338         va_end(ap);
339
340         if (!cl)
341                 return -ENOMEM;
342
343         clkdev_add(cl);
344
345         return 0;
346 }
347 EXPORT_SYMBOL(clk_register_clkdev);
348
349 /**
350  * clk_register_clkdevs - register a set of clk_lookup for a struct clk
351  * @clk: struct clk to associate with all clk_lookups
352  * @cl: array of clk_lookup structures with con_id and dev_id pre-initialized
353  * @num: number of clk_lookup structures to register
354  *
355  * To make things easier for mass registration, we detect error clks
356  * from a previous clk_register() call, and return the error code for
357  * those.  This is to permit this function to be called immediately
358  * after clk_register().
359  */
360 int clk_register_clkdevs(struct clk *clk, struct clk_lookup *cl, size_t num)
361 {
362         unsigned i;
363
364         if (IS_ERR(clk))
365                 return PTR_ERR(clk);
366
367         for (i = 0; i < num; i++, cl++) {
368                 cl->clk = clk;
369                 clkdev_add(cl);
370         }
371
372         return 0;
373 }
374 EXPORT_SYMBOL(clk_register_clkdevs);