]> git.openfabrics.org - ~shefty/rdma-dev.git/blob - drivers/of/base.c
f564e3107b3e0f73436df0a22bde04934b177b8c
[~shefty/rdma-dev.git] / drivers / of / base.c
1 /*
2  * Procedures for creating, accessing and interpreting the device tree.
3  *
4  * Paul Mackerras       August 1996.
5  * Copyright (C) 1996-2005 Paul Mackerras.
6  *
7  *  Adapted for 64bit PowerPC by Dave Engebretsen and Peter Bergner.
8  *    {engebret|bergner}@us.ibm.com
9  *
10  *  Adapted for sparc and sparc64 by David S. Miller davem@davemloft.net
11  *
12  *  Reconsolidated from arch/x/kernel/prom.c by Stephen Rothwell and
13  *  Grant Likely.
14  *
15  *      This program is free software; you can redistribute it and/or
16  *      modify it under the terms of the GNU General Public License
17  *      as published by the Free Software Foundation; either version
18  *      2 of the License, or (at your option) any later version.
19  */
20 #include <linux/ctype.h>
21 #include <linux/module.h>
22 #include <linux/of.h>
23 #include <linux/spinlock.h>
24 #include <linux/slab.h>
25 #include <linux/proc_fs.h>
26
27 /**
28  * struct alias_prop - Alias property in 'aliases' node
29  * @link:       List node to link the structure in aliases_lookup list
30  * @alias:      Alias property name
31  * @np:         Pointer to device_node that the alias stands for
32  * @id:         Index value from end of alias name
33  * @stem:       Alias string without the index
34  *
35  * The structure represents one alias property of 'aliases' node as
36  * an entry in aliases_lookup list.
37  */
38 struct alias_prop {
39         struct list_head link;
40         const char *alias;
41         struct device_node *np;
42         int id;
43         char stem[0];
44 };
45
46 static LIST_HEAD(aliases_lookup);
47
48 struct device_node *allnodes;
49 struct device_node *of_chosen;
50 struct device_node *of_aliases;
51
52 static DEFINE_MUTEX(of_aliases_mutex);
53
54 /* use when traversing tree through the allnext, child, sibling,
55  * or parent members of struct device_node.
56  */
57 DEFINE_RWLOCK(devtree_lock);
58
59 int of_n_addr_cells(struct device_node *np)
60 {
61         const __be32 *ip;
62
63         do {
64                 if (np->parent)
65                         np = np->parent;
66                 ip = of_get_property(np, "#address-cells", NULL);
67                 if (ip)
68                         return be32_to_cpup(ip);
69         } while (np->parent);
70         /* No #address-cells property for the root node */
71         return OF_ROOT_NODE_ADDR_CELLS_DEFAULT;
72 }
73 EXPORT_SYMBOL(of_n_addr_cells);
74
75 int of_n_size_cells(struct device_node *np)
76 {
77         const __be32 *ip;
78
79         do {
80                 if (np->parent)
81                         np = np->parent;
82                 ip = of_get_property(np, "#size-cells", NULL);
83                 if (ip)
84                         return be32_to_cpup(ip);
85         } while (np->parent);
86         /* No #size-cells property for the root node */
87         return OF_ROOT_NODE_SIZE_CELLS_DEFAULT;
88 }
89 EXPORT_SYMBOL(of_n_size_cells);
90
91 #if defined(CONFIG_OF_DYNAMIC)
92 /**
93  *      of_node_get - Increment refcount of a node
94  *      @node:  Node to inc refcount, NULL is supported to
95  *              simplify writing of callers
96  *
97  *      Returns node.
98  */
99 struct device_node *of_node_get(struct device_node *node)
100 {
101         if (node)
102                 kref_get(&node->kref);
103         return node;
104 }
105 EXPORT_SYMBOL(of_node_get);
106
107 static inline struct device_node *kref_to_device_node(struct kref *kref)
108 {
109         return container_of(kref, struct device_node, kref);
110 }
111
112 /**
113  *      of_node_release - release a dynamically allocated node
114  *      @kref:  kref element of the node to be released
115  *
116  *      In of_node_put() this function is passed to kref_put()
117  *      as the destructor.
118  */
119 static void of_node_release(struct kref *kref)
120 {
121         struct device_node *node = kref_to_device_node(kref);
122         struct property *prop = node->properties;
123
124         /* We should never be releasing nodes that haven't been detached. */
125         if (!of_node_check_flag(node, OF_DETACHED)) {
126                 pr_err("ERROR: Bad of_node_put() on %s\n", node->full_name);
127                 dump_stack();
128                 kref_init(&node->kref);
129                 return;
130         }
131
132         if (!of_node_check_flag(node, OF_DYNAMIC))
133                 return;
134
135         while (prop) {
136                 struct property *next = prop->next;
137                 kfree(prop->name);
138                 kfree(prop->value);
139                 kfree(prop);
140                 prop = next;
141
142                 if (!prop) {
143                         prop = node->deadprops;
144                         node->deadprops = NULL;
145                 }
146         }
147         kfree(node->full_name);
148         kfree(node->data);
149         kfree(node);
150 }
151
152 /**
153  *      of_node_put - Decrement refcount of a node
154  *      @node:  Node to dec refcount, NULL is supported to
155  *              simplify writing of callers
156  *
157  */
158 void of_node_put(struct device_node *node)
159 {
160         if (node)
161                 kref_put(&node->kref, of_node_release);
162 }
163 EXPORT_SYMBOL(of_node_put);
164 #endif /* CONFIG_OF_DYNAMIC */
165
166 struct property *of_find_property(const struct device_node *np,
167                                   const char *name,
168                                   int *lenp)
169 {
170         struct property *pp;
171
172         if (!np)
173                 return NULL;
174
175         read_lock(&devtree_lock);
176         for (pp = np->properties; pp; pp = pp->next) {
177                 if (of_prop_cmp(pp->name, name) == 0) {
178                         if (lenp)
179                                 *lenp = pp->length;
180                         break;
181                 }
182         }
183         read_unlock(&devtree_lock);
184
185         return pp;
186 }
187 EXPORT_SYMBOL(of_find_property);
188
189 /**
190  * of_find_all_nodes - Get next node in global list
191  * @prev:       Previous node or NULL to start iteration
192  *              of_node_put() will be called on it
193  *
194  * Returns a node pointer with refcount incremented, use
195  * of_node_put() on it when done.
196  */
197 struct device_node *of_find_all_nodes(struct device_node *prev)
198 {
199         struct device_node *np;
200
201         read_lock(&devtree_lock);
202         np = prev ? prev->allnext : allnodes;
203         for (; np != NULL; np = np->allnext)
204                 if (of_node_get(np))
205                         break;
206         of_node_put(prev);
207         read_unlock(&devtree_lock);
208         return np;
209 }
210 EXPORT_SYMBOL(of_find_all_nodes);
211
212 /*
213  * Find a property with a given name for a given node
214  * and return the value.
215  */
216 const void *of_get_property(const struct device_node *np, const char *name,
217                          int *lenp)
218 {
219         struct property *pp = of_find_property(np, name, lenp);
220
221         return pp ? pp->value : NULL;
222 }
223 EXPORT_SYMBOL(of_get_property);
224
225 /** Checks if the given "compat" string matches one of the strings in
226  * the device's "compatible" property
227  */
228 int of_device_is_compatible(const struct device_node *device,
229                 const char *compat)
230 {
231         const char* cp;
232         int cplen, l;
233
234         cp = of_get_property(device, "compatible", &cplen);
235         if (cp == NULL)
236                 return 0;
237         while (cplen > 0) {
238                 if (of_compat_cmp(cp, compat, strlen(compat)) == 0)
239                         return 1;
240                 l = strlen(cp) + 1;
241                 cp += l;
242                 cplen -= l;
243         }
244
245         return 0;
246 }
247 EXPORT_SYMBOL(of_device_is_compatible);
248
249 /**
250  * of_machine_is_compatible - Test root of device tree for a given compatible value
251  * @compat: compatible string to look for in root node's compatible property.
252  *
253  * Returns true if the root node has the given value in its
254  * compatible property.
255  */
256 int of_machine_is_compatible(const char *compat)
257 {
258         struct device_node *root;
259         int rc = 0;
260
261         root = of_find_node_by_path("/");
262         if (root) {
263                 rc = of_device_is_compatible(root, compat);
264                 of_node_put(root);
265         }
266         return rc;
267 }
268 EXPORT_SYMBOL(of_machine_is_compatible);
269
270 /**
271  *  of_device_is_available - check if a device is available for use
272  *
273  *  @device: Node to check for availability
274  *
275  *  Returns 1 if the status property is absent or set to "okay" or "ok",
276  *  0 otherwise
277  */
278 int of_device_is_available(const struct device_node *device)
279 {
280         const char *status;
281         int statlen;
282
283         status = of_get_property(device, "status", &statlen);
284         if (status == NULL)
285                 return 1;
286
287         if (statlen > 0) {
288                 if (!strcmp(status, "okay") || !strcmp(status, "ok"))
289                         return 1;
290         }
291
292         return 0;
293 }
294 EXPORT_SYMBOL(of_device_is_available);
295
296 /**
297  *      of_get_parent - Get a node's parent if any
298  *      @node:  Node to get parent
299  *
300  *      Returns a node pointer with refcount incremented, use
301  *      of_node_put() on it when done.
302  */
303 struct device_node *of_get_parent(const struct device_node *node)
304 {
305         struct device_node *np;
306
307         if (!node)
308                 return NULL;
309
310         read_lock(&devtree_lock);
311         np = of_node_get(node->parent);
312         read_unlock(&devtree_lock);
313         return np;
314 }
315 EXPORT_SYMBOL(of_get_parent);
316
317 /**
318  *      of_get_next_parent - Iterate to a node's parent
319  *      @node:  Node to get parent of
320  *
321  *      This is like of_get_parent() except that it drops the
322  *      refcount on the passed node, making it suitable for iterating
323  *      through a node's parents.
324  *
325  *      Returns a node pointer with refcount incremented, use
326  *      of_node_put() on it when done.
327  */
328 struct device_node *of_get_next_parent(struct device_node *node)
329 {
330         struct device_node *parent;
331
332         if (!node)
333                 return NULL;
334
335         read_lock(&devtree_lock);
336         parent = of_node_get(node->parent);
337         of_node_put(node);
338         read_unlock(&devtree_lock);
339         return parent;
340 }
341
342 /**
343  *      of_get_next_child - Iterate a node childs
344  *      @node:  parent node
345  *      @prev:  previous child of the parent node, or NULL to get first
346  *
347  *      Returns a node pointer with refcount incremented, use
348  *      of_node_put() on it when done.
349  */
350 struct device_node *of_get_next_child(const struct device_node *node,
351         struct device_node *prev)
352 {
353         struct device_node *next;
354
355         read_lock(&devtree_lock);
356         next = prev ? prev->sibling : node->child;
357         for (; next; next = next->sibling)
358                 if (of_node_get(next))
359                         break;
360         of_node_put(prev);
361         read_unlock(&devtree_lock);
362         return next;
363 }
364 EXPORT_SYMBOL(of_get_next_child);
365
366 /**
367  *      of_get_next_available_child - Find the next available child node
368  *      @node:  parent node
369  *      @prev:  previous child of the parent node, or NULL to get first
370  *
371  *      This function is like of_get_next_child(), except that it
372  *      automatically skips any disabled nodes (i.e. status = "disabled").
373  */
374 struct device_node *of_get_next_available_child(const struct device_node *node,
375         struct device_node *prev)
376 {
377         struct device_node *next;
378
379         read_lock(&devtree_lock);
380         next = prev ? prev->sibling : node->child;
381         for (; next; next = next->sibling) {
382                 if (!of_device_is_available(next))
383                         continue;
384                 if (of_node_get(next))
385                         break;
386         }
387         of_node_put(prev);
388         read_unlock(&devtree_lock);
389         return next;
390 }
391 EXPORT_SYMBOL(of_get_next_available_child);
392
393 /**
394  *      of_get_child_by_name - Find the child node by name for a given parent
395  *      @node:  parent node
396  *      @name:  child name to look for.
397  *
398  *      This function looks for child node for given matching name
399  *
400  *      Returns a node pointer if found, with refcount incremented, use
401  *      of_node_put() on it when done.
402  *      Returns NULL if node is not found.
403  */
404 struct device_node *of_get_child_by_name(const struct device_node *node,
405                                 const char *name)
406 {
407         struct device_node *child;
408
409         for_each_child_of_node(node, child)
410                 if (child->name && (of_node_cmp(child->name, name) == 0))
411                         break;
412         return child;
413 }
414 EXPORT_SYMBOL(of_get_child_by_name);
415
416 /**
417  *      of_find_node_by_path - Find a node matching a full OF path
418  *      @path:  The full path to match
419  *
420  *      Returns a node pointer with refcount incremented, use
421  *      of_node_put() on it when done.
422  */
423 struct device_node *of_find_node_by_path(const char *path)
424 {
425         struct device_node *np = allnodes;
426
427         read_lock(&devtree_lock);
428         for (; np; np = np->allnext) {
429                 if (np->full_name && (of_node_cmp(np->full_name, path) == 0)
430                     && of_node_get(np))
431                         break;
432         }
433         read_unlock(&devtree_lock);
434         return np;
435 }
436 EXPORT_SYMBOL(of_find_node_by_path);
437
438 /**
439  *      of_find_node_by_name - Find a node by its "name" property
440  *      @from:  The node to start searching from or NULL, the node
441  *              you pass will not be searched, only the next one
442  *              will; typically, you pass what the previous call
443  *              returned. of_node_put() will be called on it
444  *      @name:  The name string to match against
445  *
446  *      Returns a node pointer with refcount incremented, use
447  *      of_node_put() on it when done.
448  */
449 struct device_node *of_find_node_by_name(struct device_node *from,
450         const char *name)
451 {
452         struct device_node *np;
453
454         read_lock(&devtree_lock);
455         np = from ? from->allnext : allnodes;
456         for (; np; np = np->allnext)
457                 if (np->name && (of_node_cmp(np->name, name) == 0)
458                     && of_node_get(np))
459                         break;
460         of_node_put(from);
461         read_unlock(&devtree_lock);
462         return np;
463 }
464 EXPORT_SYMBOL(of_find_node_by_name);
465
466 /**
467  *      of_find_node_by_type - Find a node by its "device_type" property
468  *      @from:  The node to start searching from, or NULL to start searching
469  *              the entire device tree. The node you pass will not be
470  *              searched, only the next one will; typically, you pass
471  *              what the previous call returned. of_node_put() will be
472  *              called on from for you.
473  *      @type:  The type string to match against
474  *
475  *      Returns a node pointer with refcount incremented, use
476  *      of_node_put() on it when done.
477  */
478 struct device_node *of_find_node_by_type(struct device_node *from,
479         const char *type)
480 {
481         struct device_node *np;
482
483         read_lock(&devtree_lock);
484         np = from ? from->allnext : allnodes;
485         for (; np; np = np->allnext)
486                 if (np->type && (of_node_cmp(np->type, type) == 0)
487                     && of_node_get(np))
488                         break;
489         of_node_put(from);
490         read_unlock(&devtree_lock);
491         return np;
492 }
493 EXPORT_SYMBOL(of_find_node_by_type);
494
495 /**
496  *      of_find_compatible_node - Find a node based on type and one of the
497  *                                tokens in its "compatible" property
498  *      @from:          The node to start searching from or NULL, the node
499  *                      you pass will not be searched, only the next one
500  *                      will; typically, you pass what the previous call
501  *                      returned. of_node_put() will be called on it
502  *      @type:          The type string to match "device_type" or NULL to ignore
503  *      @compatible:    The string to match to one of the tokens in the device
504  *                      "compatible" list.
505  *
506  *      Returns a node pointer with refcount incremented, use
507  *      of_node_put() on it when done.
508  */
509 struct device_node *of_find_compatible_node(struct device_node *from,
510         const char *type, const char *compatible)
511 {
512         struct device_node *np;
513
514         read_lock(&devtree_lock);
515         np = from ? from->allnext : allnodes;
516         for (; np; np = np->allnext) {
517                 if (type
518                     && !(np->type && (of_node_cmp(np->type, type) == 0)))
519                         continue;
520                 if (of_device_is_compatible(np, compatible) && of_node_get(np))
521                         break;
522         }
523         of_node_put(from);
524         read_unlock(&devtree_lock);
525         return np;
526 }
527 EXPORT_SYMBOL(of_find_compatible_node);
528
529 /**
530  *      of_find_node_with_property - Find a node which has a property with
531  *                                   the given name.
532  *      @from:          The node to start searching from or NULL, the node
533  *                      you pass will not be searched, only the next one
534  *                      will; typically, you pass what the previous call
535  *                      returned. of_node_put() will be called on it
536  *      @prop_name:     The name of the property to look for.
537  *
538  *      Returns a node pointer with refcount incremented, use
539  *      of_node_put() on it when done.
540  */
541 struct device_node *of_find_node_with_property(struct device_node *from,
542         const char *prop_name)
543 {
544         struct device_node *np;
545         struct property *pp;
546
547         read_lock(&devtree_lock);
548         np = from ? from->allnext : allnodes;
549         for (; np; np = np->allnext) {
550                 for (pp = np->properties; pp; pp = pp->next) {
551                         if (of_prop_cmp(pp->name, prop_name) == 0) {
552                                 of_node_get(np);
553                                 goto out;
554                         }
555                 }
556         }
557 out:
558         of_node_put(from);
559         read_unlock(&devtree_lock);
560         return np;
561 }
562 EXPORT_SYMBOL(of_find_node_with_property);
563
564 /**
565  * of_match_node - Tell if an device_node has a matching of_match structure
566  *      @matches:       array of of device match structures to search in
567  *      @node:          the of device structure to match against
568  *
569  *      Low level utility function used by device matching.
570  */
571 const struct of_device_id *of_match_node(const struct of_device_id *matches,
572                                          const struct device_node *node)
573 {
574         if (!matches)
575                 return NULL;
576
577         while (matches->name[0] || matches->type[0] || matches->compatible[0]) {
578                 int match = 1;
579                 if (matches->name[0])
580                         match &= node->name
581                                 && !strcmp(matches->name, node->name);
582                 if (matches->type[0])
583                         match &= node->type
584                                 && !strcmp(matches->type, node->type);
585                 if (matches->compatible[0])
586                         match &= of_device_is_compatible(node,
587                                                 matches->compatible);
588                 if (match)
589                         return matches;
590                 matches++;
591         }
592         return NULL;
593 }
594 EXPORT_SYMBOL(of_match_node);
595
596 /**
597  *      of_find_matching_node - Find a node based on an of_device_id match
598  *                              table.
599  *      @from:          The node to start searching from or NULL, the node
600  *                      you pass will not be searched, only the next one
601  *                      will; typically, you pass what the previous call
602  *                      returned. of_node_put() will be called on it
603  *      @matches:       array of of device match structures to search in
604  *
605  *      Returns a node pointer with refcount incremented, use
606  *      of_node_put() on it when done.
607  */
608 struct device_node *of_find_matching_node(struct device_node *from,
609                                           const struct of_device_id *matches)
610 {
611         struct device_node *np;
612
613         read_lock(&devtree_lock);
614         np = from ? from->allnext : allnodes;
615         for (; np; np = np->allnext) {
616                 if (of_match_node(matches, np) && of_node_get(np))
617                         break;
618         }
619         of_node_put(from);
620         read_unlock(&devtree_lock);
621         return np;
622 }
623 EXPORT_SYMBOL(of_find_matching_node);
624
625 /**
626  * of_modalias_node - Lookup appropriate modalias for a device node
627  * @node:       pointer to a device tree node
628  * @modalias:   Pointer to buffer that modalias value will be copied into
629  * @len:        Length of modalias value
630  *
631  * Based on the value of the compatible property, this routine will attempt
632  * to choose an appropriate modalias value for a particular device tree node.
633  * It does this by stripping the manufacturer prefix (as delimited by a ',')
634  * from the first entry in the compatible list property.
635  *
636  * This routine returns 0 on success, <0 on failure.
637  */
638 int of_modalias_node(struct device_node *node, char *modalias, int len)
639 {
640         const char *compatible, *p;
641         int cplen;
642
643         compatible = of_get_property(node, "compatible", &cplen);
644         if (!compatible || strlen(compatible) > cplen)
645                 return -ENODEV;
646         p = strchr(compatible, ',');
647         strlcpy(modalias, p ? p + 1 : compatible, len);
648         return 0;
649 }
650 EXPORT_SYMBOL_GPL(of_modalias_node);
651
652 /**
653  * of_find_node_by_phandle - Find a node given a phandle
654  * @handle:     phandle of the node to find
655  *
656  * Returns a node pointer with refcount incremented, use
657  * of_node_put() on it when done.
658  */
659 struct device_node *of_find_node_by_phandle(phandle handle)
660 {
661         struct device_node *np;
662
663         read_lock(&devtree_lock);
664         for (np = allnodes; np; np = np->allnext)
665                 if (np->phandle == handle)
666                         break;
667         of_node_get(np);
668         read_unlock(&devtree_lock);
669         return np;
670 }
671 EXPORT_SYMBOL(of_find_node_by_phandle);
672
673 /**
674  * of_property_read_u8_array - Find and read an array of u8 from a property.
675  *
676  * @np:         device node from which the property value is to be read.
677  * @propname:   name of the property to be searched.
678  * @out_value:  pointer to return value, modified only if return value is 0.
679  * @sz:         number of array elements to read
680  *
681  * Search for a property in a device node and read 8-bit value(s) from
682  * it. Returns 0 on success, -EINVAL if the property does not exist,
683  * -ENODATA if property does not have a value, and -EOVERFLOW if the
684  * property data isn't large enough.
685  *
686  * dts entry of array should be like:
687  *      property = /bits/ 8 <0x50 0x60 0x70>;
688  *
689  * The out_value is modified only if a valid u8 value can be decoded.
690  */
691 int of_property_read_u8_array(const struct device_node *np,
692                         const char *propname, u8 *out_values, size_t sz)
693 {
694         struct property *prop = of_find_property(np, propname, NULL);
695         const u8 *val;
696
697         if (!prop)
698                 return -EINVAL;
699         if (!prop->value)
700                 return -ENODATA;
701         if ((sz * sizeof(*out_values)) > prop->length)
702                 return -EOVERFLOW;
703
704         val = prop->value;
705         while (sz--)
706                 *out_values++ = *val++;
707         return 0;
708 }
709 EXPORT_SYMBOL_GPL(of_property_read_u8_array);
710
711 /**
712  * of_property_read_u16_array - Find and read an array of u16 from a property.
713  *
714  * @np:         device node from which the property value is to be read.
715  * @propname:   name of the property to be searched.
716  * @out_value:  pointer to return value, modified only if return value is 0.
717  * @sz:         number of array elements to read
718  *
719  * Search for a property in a device node and read 16-bit value(s) from
720  * it. Returns 0 on success, -EINVAL if the property does not exist,
721  * -ENODATA if property does not have a value, and -EOVERFLOW if the
722  * property data isn't large enough.
723  *
724  * dts entry of array should be like:
725  *      property = /bits/ 16 <0x5000 0x6000 0x7000>;
726  *
727  * The out_value is modified only if a valid u16 value can be decoded.
728  */
729 int of_property_read_u16_array(const struct device_node *np,
730                         const char *propname, u16 *out_values, size_t sz)
731 {
732         struct property *prop = of_find_property(np, propname, NULL);
733         const __be16 *val;
734
735         if (!prop)
736                 return -EINVAL;
737         if (!prop->value)
738                 return -ENODATA;
739         if ((sz * sizeof(*out_values)) > prop->length)
740                 return -EOVERFLOW;
741
742         val = prop->value;
743         while (sz--)
744                 *out_values++ = be16_to_cpup(val++);
745         return 0;
746 }
747 EXPORT_SYMBOL_GPL(of_property_read_u16_array);
748
749 /**
750  * of_property_read_u32_array - Find and read an array of 32 bit integers
751  * from a property.
752  *
753  * @np:         device node from which the property value is to be read.
754  * @propname:   name of the property to be searched.
755  * @out_value:  pointer to return value, modified only if return value is 0.
756  * @sz:         number of array elements to read
757  *
758  * Search for a property in a device node and read 32-bit value(s) from
759  * it. Returns 0 on success, -EINVAL if the property does not exist,
760  * -ENODATA if property does not have a value, and -EOVERFLOW if the
761  * property data isn't large enough.
762  *
763  * The out_value is modified only if a valid u32 value can be decoded.
764  */
765 int of_property_read_u32_array(const struct device_node *np,
766                                const char *propname, u32 *out_values,
767                                size_t sz)
768 {
769         struct property *prop = of_find_property(np, propname, NULL);
770         const __be32 *val;
771
772         if (!prop)
773                 return -EINVAL;
774         if (!prop->value)
775                 return -ENODATA;
776         if ((sz * sizeof(*out_values)) > prop->length)
777                 return -EOVERFLOW;
778
779         val = prop->value;
780         while (sz--)
781                 *out_values++ = be32_to_cpup(val++);
782         return 0;
783 }
784 EXPORT_SYMBOL_GPL(of_property_read_u32_array);
785
786 /**
787  * of_property_read_u64 - Find and read a 64 bit integer from a property
788  * @np:         device node from which the property value is to be read.
789  * @propname:   name of the property to be searched.
790  * @out_value:  pointer to return value, modified only if return value is 0.
791  *
792  * Search for a property in a device node and read a 64-bit value from
793  * it. Returns 0 on success, -EINVAL if the property does not exist,
794  * -ENODATA if property does not have a value, and -EOVERFLOW if the
795  * property data isn't large enough.
796  *
797  * The out_value is modified only if a valid u64 value can be decoded.
798  */
799 int of_property_read_u64(const struct device_node *np, const char *propname,
800                          u64 *out_value)
801 {
802         struct property *prop = of_find_property(np, propname, NULL);
803
804         if (!prop)
805                 return -EINVAL;
806         if (!prop->value)
807                 return -ENODATA;
808         if (sizeof(*out_value) > prop->length)
809                 return -EOVERFLOW;
810         *out_value = of_read_number(prop->value, 2);
811         return 0;
812 }
813 EXPORT_SYMBOL_GPL(of_property_read_u64);
814
815 /**
816  * of_property_read_string - Find and read a string from a property
817  * @np:         device node from which the property value is to be read.
818  * @propname:   name of the property to be searched.
819  * @out_string: pointer to null terminated return string, modified only if
820  *              return value is 0.
821  *
822  * Search for a property in a device tree node and retrieve a null
823  * terminated string value (pointer to data, not a copy). Returns 0 on
824  * success, -EINVAL if the property does not exist, -ENODATA if property
825  * does not have a value, and -EILSEQ if the string is not null-terminated
826  * within the length of the property data.
827  *
828  * The out_string pointer is modified only if a valid string can be decoded.
829  */
830 int of_property_read_string(struct device_node *np, const char *propname,
831                                 const char **out_string)
832 {
833         struct property *prop = of_find_property(np, propname, NULL);
834         if (!prop)
835                 return -EINVAL;
836         if (!prop->value)
837                 return -ENODATA;
838         if (strnlen(prop->value, prop->length) >= prop->length)
839                 return -EILSEQ;
840         *out_string = prop->value;
841         return 0;
842 }
843 EXPORT_SYMBOL_GPL(of_property_read_string);
844
845 /**
846  * of_property_read_string_index - Find and read a string from a multiple
847  * strings property.
848  * @np:         device node from which the property value is to be read.
849  * @propname:   name of the property to be searched.
850  * @index:      index of the string in the list of strings
851  * @out_string: pointer to null terminated return string, modified only if
852  *              return value is 0.
853  *
854  * Search for a property in a device tree node and retrieve a null
855  * terminated string value (pointer to data, not a copy) in the list of strings
856  * contained in that property.
857  * Returns 0 on success, -EINVAL if the property does not exist, -ENODATA if
858  * property does not have a value, and -EILSEQ if the string is not
859  * null-terminated within the length of the property data.
860  *
861  * The out_string pointer is modified only if a valid string can be decoded.
862  */
863 int of_property_read_string_index(struct device_node *np, const char *propname,
864                                   int index, const char **output)
865 {
866         struct property *prop = of_find_property(np, propname, NULL);
867         int i = 0;
868         size_t l = 0, total = 0;
869         const char *p;
870
871         if (!prop)
872                 return -EINVAL;
873         if (!prop->value)
874                 return -ENODATA;
875         if (strnlen(prop->value, prop->length) >= prop->length)
876                 return -EILSEQ;
877
878         p = prop->value;
879
880         for (i = 0; total < prop->length; total += l, p += l) {
881                 l = strlen(p) + 1;
882                 if (i++ == index) {
883                         *output = p;
884                         return 0;
885                 }
886         }
887         return -ENODATA;
888 }
889 EXPORT_SYMBOL_GPL(of_property_read_string_index);
890
891 /**
892  * of_property_match_string() - Find string in a list and return index
893  * @np: pointer to node containing string list property
894  * @propname: string list property name
895  * @string: pointer to string to search for in string list
896  *
897  * This function searches a string list property and returns the index
898  * of a specific string value.
899  */
900 int of_property_match_string(struct device_node *np, const char *propname,
901                              const char *string)
902 {
903         struct property *prop = of_find_property(np, propname, NULL);
904         size_t l;
905         int i;
906         const char *p, *end;
907
908         if (!prop)
909                 return -EINVAL;
910         if (!prop->value)
911                 return -ENODATA;
912
913         p = prop->value;
914         end = p + prop->length;
915
916         for (i = 0; p < end; i++, p += l) {
917                 l = strlen(p) + 1;
918                 if (p + l > end)
919                         return -EILSEQ;
920                 pr_debug("comparing %s with %s\n", string, p);
921                 if (strcmp(string, p) == 0)
922                         return i; /* Found it; return index */
923         }
924         return -ENODATA;
925 }
926 EXPORT_SYMBOL_GPL(of_property_match_string);
927
928 /**
929  * of_property_count_strings - Find and return the number of strings from a
930  * multiple strings property.
931  * @np:         device node from which the property value is to be read.
932  * @propname:   name of the property to be searched.
933  *
934  * Search for a property in a device tree node and retrieve the number of null
935  * terminated string contain in it. Returns the number of strings on
936  * success, -EINVAL if the property does not exist, -ENODATA if property
937  * does not have a value, and -EILSEQ if the string is not null-terminated
938  * within the length of the property data.
939  */
940 int of_property_count_strings(struct device_node *np, const char *propname)
941 {
942         struct property *prop = of_find_property(np, propname, NULL);
943         int i = 0;
944         size_t l = 0, total = 0;
945         const char *p;
946
947         if (!prop)
948                 return -EINVAL;
949         if (!prop->value)
950                 return -ENODATA;
951         if (strnlen(prop->value, prop->length) >= prop->length)
952                 return -EILSEQ;
953
954         p = prop->value;
955
956         for (i = 0; total < prop->length; total += l, p += l, i++)
957                 l = strlen(p) + 1;
958
959         return i;
960 }
961 EXPORT_SYMBOL_GPL(of_property_count_strings);
962
963 /**
964  * of_parse_phandle - Resolve a phandle property to a device_node pointer
965  * @np: Pointer to device node holding phandle property
966  * @phandle_name: Name of property holding a phandle value
967  * @index: For properties holding a table of phandles, this is the index into
968  *         the table
969  *
970  * Returns the device_node pointer with refcount incremented.  Use
971  * of_node_put() on it when done.
972  */
973 struct device_node *
974 of_parse_phandle(struct device_node *np, const char *phandle_name, int index)
975 {
976         const __be32 *phandle;
977         int size;
978
979         phandle = of_get_property(np, phandle_name, &size);
980         if ((!phandle) || (size < sizeof(*phandle) * (index + 1)))
981                 return NULL;
982
983         return of_find_node_by_phandle(be32_to_cpup(phandle + index));
984 }
985 EXPORT_SYMBOL(of_parse_phandle);
986
987 /**
988  * of_parse_phandle_with_args() - Find a node pointed by phandle in a list
989  * @np:         pointer to a device tree node containing a list
990  * @list_name:  property name that contains a list
991  * @cells_name: property name that specifies phandles' arguments count
992  * @index:      index of a phandle to parse out
993  * @out_args:   optional pointer to output arguments structure (will be filled)
994  *
995  * This function is useful to parse lists of phandles and their arguments.
996  * Returns 0 on success and fills out_args, on error returns appropriate
997  * errno value.
998  *
999  * Caller is responsible to call of_node_put() on the returned out_args->node
1000  * pointer.
1001  *
1002  * Example:
1003  *
1004  * phandle1: node1 {
1005  *      #list-cells = <2>;
1006  * }
1007  *
1008  * phandle2: node2 {
1009  *      #list-cells = <1>;
1010  * }
1011  *
1012  * node3 {
1013  *      list = <&phandle1 1 2 &phandle2 3>;
1014  * }
1015  *
1016  * To get a device_node of the `node2' node you may call this:
1017  * of_parse_phandle_with_args(node3, "list", "#list-cells", 1, &args);
1018  */
1019 int of_parse_phandle_with_args(struct device_node *np, const char *list_name,
1020                                 const char *cells_name, int index,
1021                                 struct of_phandle_args *out_args)
1022 {
1023         const __be32 *list, *list_end;
1024         int size, cur_index = 0;
1025         uint32_t count = 0;
1026         struct device_node *node = NULL;
1027         phandle phandle;
1028
1029         /* Retrieve the phandle list property */
1030         list = of_get_property(np, list_name, &size);
1031         if (!list)
1032                 return -ENOENT;
1033         list_end = list + size / sizeof(*list);
1034
1035         /* Loop over the phandles until all the requested entry is found */
1036         while (list < list_end) {
1037                 count = 0;
1038
1039                 /*
1040                  * If phandle is 0, then it is an empty entry with no
1041                  * arguments.  Skip forward to the next entry.
1042                  */
1043                 phandle = be32_to_cpup(list++);
1044                 if (phandle) {
1045                         /*
1046                          * Find the provider node and parse the #*-cells
1047                          * property to determine the argument length
1048                          */
1049                         node = of_find_node_by_phandle(phandle);
1050                         if (!node) {
1051                                 pr_err("%s: could not find phandle\n",
1052                                          np->full_name);
1053                                 break;
1054                         }
1055                         if (of_property_read_u32(node, cells_name, &count)) {
1056                                 pr_err("%s: could not get %s for %s\n",
1057                                          np->full_name, cells_name,
1058                                          node->full_name);
1059                                 break;
1060                         }
1061
1062                         /*
1063                          * Make sure that the arguments actually fit in the
1064                          * remaining property data length
1065                          */
1066                         if (list + count > list_end) {
1067                                 pr_err("%s: arguments longer than property\n",
1068                                          np->full_name);
1069                                 break;
1070                         }
1071                 }
1072
1073                 /*
1074                  * All of the error cases above bail out of the loop, so at
1075                  * this point, the parsing is successful. If the requested
1076                  * index matches, then fill the out_args structure and return,
1077                  * or return -ENOENT for an empty entry.
1078                  */
1079                 if (cur_index == index) {
1080                         if (!phandle)
1081                                 return -ENOENT;
1082
1083                         if (out_args) {
1084                                 int i;
1085                                 if (WARN_ON(count > MAX_PHANDLE_ARGS))
1086                                         count = MAX_PHANDLE_ARGS;
1087                                 out_args->np = node;
1088                                 out_args->args_count = count;
1089                                 for (i = 0; i < count; i++)
1090                                         out_args->args[i] = be32_to_cpup(list++);
1091                         }
1092                         return 0;
1093                 }
1094
1095                 of_node_put(node);
1096                 node = NULL;
1097                 list += count;
1098                 cur_index++;
1099         }
1100
1101         /* Loop exited without finding a valid entry; return an error */
1102         if (node)
1103                 of_node_put(node);
1104         return -EINVAL;
1105 }
1106 EXPORT_SYMBOL(of_parse_phandle_with_args);
1107
1108 /**
1109  * prom_add_property - Add a property to a node
1110  */
1111 int prom_add_property(struct device_node *np, struct property *prop)
1112 {
1113         struct property **next;
1114         unsigned long flags;
1115
1116         prop->next = NULL;
1117         write_lock_irqsave(&devtree_lock, flags);
1118         next = &np->properties;
1119         while (*next) {
1120                 if (strcmp(prop->name, (*next)->name) == 0) {
1121                         /* duplicate ! don't insert it */
1122                         write_unlock_irqrestore(&devtree_lock, flags);
1123                         return -1;
1124                 }
1125                 next = &(*next)->next;
1126         }
1127         *next = prop;
1128         write_unlock_irqrestore(&devtree_lock, flags);
1129
1130 #ifdef CONFIG_PROC_DEVICETREE
1131         /* try to add to proc as well if it was initialized */
1132         if (np->pde)
1133                 proc_device_tree_add_prop(np->pde, prop);
1134 #endif /* CONFIG_PROC_DEVICETREE */
1135
1136         return 0;
1137 }
1138
1139 /**
1140  * prom_remove_property - Remove a property from a node.
1141  *
1142  * Note that we don't actually remove it, since we have given out
1143  * who-knows-how-many pointers to the data using get-property.
1144  * Instead we just move the property to the "dead properties"
1145  * list, so it won't be found any more.
1146  */
1147 int prom_remove_property(struct device_node *np, struct property *prop)
1148 {
1149         struct property **next;
1150         unsigned long flags;
1151         int found = 0;
1152
1153         write_lock_irqsave(&devtree_lock, flags);
1154         next = &np->properties;
1155         while (*next) {
1156                 if (*next == prop) {
1157                         /* found the node */
1158                         *next = prop->next;
1159                         prop->next = np->deadprops;
1160                         np->deadprops = prop;
1161                         found = 1;
1162                         break;
1163                 }
1164                 next = &(*next)->next;
1165         }
1166         write_unlock_irqrestore(&devtree_lock, flags);
1167
1168         if (!found)
1169                 return -ENODEV;
1170
1171 #ifdef CONFIG_PROC_DEVICETREE
1172         /* try to remove the proc node as well */
1173         if (np->pde)
1174                 proc_device_tree_remove_prop(np->pde, prop);
1175 #endif /* CONFIG_PROC_DEVICETREE */
1176
1177         return 0;
1178 }
1179
1180 /*
1181  * prom_update_property - Update a property in a node, if the property does
1182  * not exist, add it.
1183  *
1184  * Note that we don't actually remove it, since we have given out
1185  * who-knows-how-many pointers to the data using get-property.
1186  * Instead we just move the property to the "dead properties" list,
1187  * and add the new property to the property list
1188  */
1189 int prom_update_property(struct device_node *np,
1190                          struct property *newprop)
1191 {
1192         struct property **next, *oldprop;
1193         unsigned long flags;
1194         int found = 0;
1195
1196         if (!newprop->name)
1197                 return -EINVAL;
1198
1199         oldprop = of_find_property(np, newprop->name, NULL);
1200         if (!oldprop)
1201                 return prom_add_property(np, newprop);
1202
1203         write_lock_irqsave(&devtree_lock, flags);
1204         next = &np->properties;
1205         while (*next) {
1206                 if (*next == oldprop) {
1207                         /* found the node */
1208                         newprop->next = oldprop->next;
1209                         *next = newprop;
1210                         oldprop->next = np->deadprops;
1211                         np->deadprops = oldprop;
1212                         found = 1;
1213                         break;
1214                 }
1215                 next = &(*next)->next;
1216         }
1217         write_unlock_irqrestore(&devtree_lock, flags);
1218
1219         if (!found)
1220                 return -ENODEV;
1221
1222 #ifdef CONFIG_PROC_DEVICETREE
1223         /* try to add to proc as well if it was initialized */
1224         if (np->pde)
1225                 proc_device_tree_update_prop(np->pde, newprop, oldprop);
1226 #endif /* CONFIG_PROC_DEVICETREE */
1227
1228         return 0;
1229 }
1230
1231 #if defined(CONFIG_OF_DYNAMIC)
1232 /*
1233  * Support for dynamic device trees.
1234  *
1235  * On some platforms, the device tree can be manipulated at runtime.
1236  * The routines in this section support adding, removing and changing
1237  * device tree nodes.
1238  */
1239
1240 /**
1241  * of_attach_node - Plug a device node into the tree and global list.
1242  */
1243 void of_attach_node(struct device_node *np)
1244 {
1245         unsigned long flags;
1246
1247         write_lock_irqsave(&devtree_lock, flags);
1248         np->sibling = np->parent->child;
1249         np->allnext = allnodes;
1250         np->parent->child = np;
1251         allnodes = np;
1252         write_unlock_irqrestore(&devtree_lock, flags);
1253 }
1254
1255 /**
1256  * of_detach_node - "Unplug" a node from the device tree.
1257  *
1258  * The caller must hold a reference to the node.  The memory associated with
1259  * the node is not freed until its refcount goes to zero.
1260  */
1261 void of_detach_node(struct device_node *np)
1262 {
1263         struct device_node *parent;
1264         unsigned long flags;
1265
1266         write_lock_irqsave(&devtree_lock, flags);
1267
1268         parent = np->parent;
1269         if (!parent)
1270                 goto out_unlock;
1271
1272         if (allnodes == np)
1273                 allnodes = np->allnext;
1274         else {
1275                 struct device_node *prev;
1276                 for (prev = allnodes;
1277                      prev->allnext != np;
1278                      prev = prev->allnext)
1279                         ;
1280                 prev->allnext = np->allnext;
1281         }
1282
1283         if (parent->child == np)
1284                 parent->child = np->sibling;
1285         else {
1286                 struct device_node *prevsib;
1287                 for (prevsib = np->parent->child;
1288                      prevsib->sibling != np;
1289                      prevsib = prevsib->sibling)
1290                         ;
1291                 prevsib->sibling = np->sibling;
1292         }
1293
1294         of_node_set_flag(np, OF_DETACHED);
1295
1296 out_unlock:
1297         write_unlock_irqrestore(&devtree_lock, flags);
1298 }
1299 #endif /* defined(CONFIG_OF_DYNAMIC) */
1300
1301 static void of_alias_add(struct alias_prop *ap, struct device_node *np,
1302                          int id, const char *stem, int stem_len)
1303 {
1304         ap->np = np;
1305         ap->id = id;
1306         strncpy(ap->stem, stem, stem_len);
1307         ap->stem[stem_len] = 0;
1308         list_add_tail(&ap->link, &aliases_lookup);
1309         pr_debug("adding DT alias:%s: stem=%s id=%i node=%s\n",
1310                  ap->alias, ap->stem, ap->id, of_node_full_name(np));
1311 }
1312
1313 /**
1314  * of_alias_scan - Scan all properties of 'aliases' node
1315  *
1316  * The function scans all the properties of 'aliases' node and populate
1317  * the the global lookup table with the properties.  It returns the
1318  * number of alias_prop found, or error code in error case.
1319  *
1320  * @dt_alloc:   An allocator that provides a virtual address to memory
1321  *              for the resulting tree
1322  */
1323 void of_alias_scan(void * (*dt_alloc)(u64 size, u64 align))
1324 {
1325         struct property *pp;
1326
1327         of_chosen = of_find_node_by_path("/chosen");
1328         if (of_chosen == NULL)
1329                 of_chosen = of_find_node_by_path("/chosen@0");
1330         of_aliases = of_find_node_by_path("/aliases");
1331         if (!of_aliases)
1332                 return;
1333
1334         for_each_property_of_node(of_aliases, pp) {
1335                 const char *start = pp->name;
1336                 const char *end = start + strlen(start);
1337                 struct device_node *np;
1338                 struct alias_prop *ap;
1339                 int id, len;
1340
1341                 /* Skip those we do not want to proceed */
1342                 if (!strcmp(pp->name, "name") ||
1343                     !strcmp(pp->name, "phandle") ||
1344                     !strcmp(pp->name, "linux,phandle"))
1345                         continue;
1346
1347                 np = of_find_node_by_path(pp->value);
1348                 if (!np)
1349                         continue;
1350
1351                 /* walk the alias backwards to extract the id and work out
1352                  * the 'stem' string */
1353                 while (isdigit(*(end-1)) && end > start)
1354                         end--;
1355                 len = end - start;
1356
1357                 if (kstrtoint(end, 10, &id) < 0)
1358                         continue;
1359
1360                 /* Allocate an alias_prop with enough space for the stem */
1361                 ap = dt_alloc(sizeof(*ap) + len + 1, 4);
1362                 if (!ap)
1363                         continue;
1364                 ap->alias = start;
1365                 of_alias_add(ap, np, id, start, len);
1366         }
1367 }
1368
1369 /**
1370  * of_alias_get_id - Get alias id for the given device_node
1371  * @np:         Pointer to the given device_node
1372  * @stem:       Alias stem of the given device_node
1373  *
1374  * The function travels the lookup table to get alias id for the given
1375  * device_node and alias stem.  It returns the alias id if find it.
1376  */
1377 int of_alias_get_id(struct device_node *np, const char *stem)
1378 {
1379         struct alias_prop *app;
1380         int id = -ENODEV;
1381
1382         mutex_lock(&of_aliases_mutex);
1383         list_for_each_entry(app, &aliases_lookup, link) {
1384                 if (strcmp(app->stem, stem) != 0)
1385                         continue;
1386
1387                 if (np == app->np) {
1388                         id = app->id;
1389                         break;
1390                 }
1391         }
1392         mutex_unlock(&of_aliases_mutex);
1393
1394         return id;
1395 }
1396 EXPORT_SYMBOL_GPL(of_alias_get_id);
1397
1398 const __be32 *of_prop_next_u32(struct property *prop, const __be32 *cur,
1399                                u32 *pu)
1400 {
1401         const void *curv = cur;
1402
1403         if (!prop)
1404                 return NULL;
1405
1406         if (!cur) {
1407                 curv = prop->value;
1408                 goto out_val;
1409         }
1410
1411         curv += sizeof(*cur);
1412         if (curv >= prop->value + prop->length)
1413                 return NULL;
1414
1415 out_val:
1416         *pu = be32_to_cpup(curv);
1417         return curv;
1418 }
1419 EXPORT_SYMBOL_GPL(of_prop_next_u32);
1420
1421 const char *of_prop_next_string(struct property *prop, const char *cur)
1422 {
1423         const void *curv = cur;
1424
1425         if (!prop)
1426                 return NULL;
1427
1428         if (!cur)
1429                 return prop->value;
1430
1431         curv += strlen(cur) + 1;
1432         if (curv >= prop->value + prop->length)
1433                 return NULL;
1434
1435         return curv;
1436 }
1437 EXPORT_SYMBOL_GPL(of_prop_next_string);