2 * Procedures for creating, accessing and interpreting the device tree.
4 * Paul Mackerras August 1996.
5 * Copyright (C) 1996-2005 Paul Mackerras.
7 * Adapted for 64bit PowerPC by Dave Engebretsen and Peter Bergner.
8 * {engebret|bergner}@us.ibm.com
10 * Adapted for sparc32 by David S. Miller davem@davemloft.net
12 * This program is free software; you can redistribute it and/or
13 * modify it under the terms of the GNU General Public License
14 * as published by the Free Software Foundation; either version
15 * 2 of the License, or (at your option) any later version.
18 #include <linux/kernel.h>
19 #include <linux/types.h>
20 #include <linux/string.h>
22 #include <linux/bootmem.h>
23 #include <linux/module.h>
26 #include <asm/oplib.h>
28 static struct device_node
*allnodes
;
30 int of_device_is_compatible(struct device_node
*device
, const char *compat
)
35 cp
= (char *) of_get_property(device
, "compatible", &cplen
);
39 if (strncmp(cp
, compat
, strlen(compat
)) == 0)
48 EXPORT_SYMBOL(of_device_is_compatible
);
50 struct device_node
*of_get_parent(const struct device_node
*node
)
52 struct device_node
*np
;
61 EXPORT_SYMBOL(of_get_parent
);
63 struct device_node
*of_get_next_child(const struct device_node
*node
,
64 struct device_node
*prev
)
66 struct device_node
*next
;
68 next
= prev
? prev
->sibling
: node
->child
;
69 for (; next
!= 0; next
= next
->sibling
) {
75 EXPORT_SYMBOL(of_get_next_child
);
77 struct device_node
*of_find_node_by_path(const char *path
)
79 struct device_node
*np
= allnodes
;
81 for (; np
!= 0; np
= np
->allnext
) {
82 if (np
->full_name
!= 0 && strcmp(np
->full_name
, path
) == 0)
88 EXPORT_SYMBOL(of_find_node_by_path
);
90 struct device_node
*of_find_node_by_phandle(phandle handle
)
92 struct device_node
*np
;
94 for (np
= allnodes
; np
!= 0; np
= np
->allnext
)
95 if (np
->node
== handle
)
100 EXPORT_SYMBOL(of_find_node_by_phandle
);
102 struct device_node
*of_find_node_by_name(struct device_node
*from
,
105 struct device_node
*np
;
107 np
= from
? from
->allnext
: allnodes
;
108 for (; np
!= NULL
; np
= np
->allnext
)
109 if (np
->name
!= NULL
&& strcmp(np
->name
, name
) == 0)
114 EXPORT_SYMBOL(of_find_node_by_name
);
116 struct device_node
*of_find_node_by_type(struct device_node
*from
,
119 struct device_node
*np
;
121 np
= from
? from
->allnext
: allnodes
;
122 for (; np
!= 0; np
= np
->allnext
)
123 if (np
->type
!= 0 && strcmp(np
->type
, type
) == 0)
128 EXPORT_SYMBOL(of_find_node_by_type
);
130 struct device_node
*of_find_compatible_node(struct device_node
*from
,
131 const char *type
, const char *compatible
)
133 struct device_node
*np
;
135 np
= from
? from
->allnext
: allnodes
;
136 for (; np
!= 0; np
= np
->allnext
) {
138 && !(np
->type
!= 0 && strcmp(np
->type
, type
) == 0))
140 if (of_device_is_compatible(np
, compatible
))
146 EXPORT_SYMBOL(of_find_compatible_node
);
148 struct property
*of_find_property(struct device_node
*np
, const char *name
,
153 for (pp
= np
->properties
; pp
!= 0; pp
= pp
->next
) {
154 if (strcmp(pp
->name
, name
) == 0) {
162 EXPORT_SYMBOL(of_find_property
);
165 * Find a property with a given name for a given node
166 * and return the value.
168 void *of_get_property(struct device_node
*np
, const char *name
, int *lenp
)
170 struct property
*pp
= of_find_property(np
,name
,lenp
);
171 return pp
? pp
->value
: NULL
;
173 EXPORT_SYMBOL(of_get_property
);
175 int of_getintprop_default(struct device_node
*np
, const char *name
, int def
)
177 struct property
*prop
;
180 prop
= of_find_property(np
, name
, &len
);
181 if (!prop
|| len
!= 4)
184 return *(int *) prop
->value
;
186 EXPORT_SYMBOL(of_getintprop_default
);
188 static unsigned int prom_early_allocated
;
190 static void * __init
prom_early_alloc(unsigned long size
)
194 ret
= __alloc_bootmem(size
, SMP_CACHE_BYTES
, 0UL);
196 memset(ret
, 0, size
);
198 prom_early_allocated
+= size
;
203 static int is_root_node(const struct device_node
*dp
)
208 return (dp
->parent
== NULL
);
211 /* The following routines deal with the black magic of fully naming a
214 * Certain well known named nodes are just the simple name string.
216 * Actual devices have an address specifier appended to the base name
217 * string, like this "foo@addr". The "addr" can be in any number of
218 * formats, and the platform plus the type of the node determine the
219 * format and how it is constructed.
221 * For children of the ROOT node, the naming convention is fixed and
222 * determined by whether this is a sun4u or sun4v system.
224 * For children of other nodes, it is bus type specific. So
225 * we walk up the tree until we discover a "device_type" property
226 * we recognize and we go from there.
228 static void __init
sparc32_path_component(struct device_node
*dp
, char *tmp_buf
)
230 struct linux_prom_registers
*regs
;
231 struct property
*rprop
;
233 rprop
= of_find_property(dp
, "reg", NULL
);
238 sprintf(tmp_buf
, "%s@%x,%x",
240 regs
->which_io
, regs
->phys_addr
);
243 /* "name@slot,offset" */
244 static void __init
sbus_path_component(struct device_node
*dp
, char *tmp_buf
)
246 struct linux_prom_registers
*regs
;
247 struct property
*prop
;
249 prop
= of_find_property(dp
, "reg", NULL
);
254 sprintf(tmp_buf
, "%s@%x,%x",
260 /* "name@devnum[,func]" */
261 static void __init
pci_path_component(struct device_node
*dp
, char *tmp_buf
)
263 struct linux_prom_pci_registers
*regs
;
264 struct property
*prop
;
267 prop
= of_find_property(dp
, "reg", NULL
);
272 devfn
= (regs
->phys_hi
>> 8) & 0xff;
274 sprintf(tmp_buf
, "%s@%x,%x",
279 sprintf(tmp_buf
, "%s@%x",
285 /* "name@addrhi,addrlo" */
286 static void __init
ebus_path_component(struct device_node
*dp
, char *tmp_buf
)
288 struct linux_prom_registers
*regs
;
289 struct property
*prop
;
291 prop
= of_find_property(dp
, "reg", NULL
);
297 sprintf(tmp_buf
, "%s@%x,%x",
299 regs
->which_io
, regs
->phys_addr
);
302 static void __init
__build_path_component(struct device_node
*dp
, char *tmp_buf
)
304 struct device_node
*parent
= dp
->parent
;
306 if (parent
!= NULL
) {
307 if (!strcmp(parent
->type
, "pci") ||
308 !strcmp(parent
->type
, "pciex"))
309 return pci_path_component(dp
, tmp_buf
);
310 if (!strcmp(parent
->type
, "sbus"))
311 return sbus_path_component(dp
, tmp_buf
);
312 if (!strcmp(parent
->type
, "ebus"))
313 return ebus_path_component(dp
, tmp_buf
);
315 /* "isa" is handled with platform naming */
318 /* Use platform naming convention. */
319 return sparc32_path_component(dp
, tmp_buf
);
322 static char * __init
build_path_component(struct device_node
*dp
)
324 char tmp_buf
[64], *n
;
327 __build_path_component(dp
, tmp_buf
);
328 if (tmp_buf
[0] == '\0')
329 strcpy(tmp_buf
, dp
->name
);
331 n
= prom_early_alloc(strlen(tmp_buf
) + 1);
337 static char * __init
build_full_name(struct device_node
*dp
)
339 int len
, ourlen
, plen
;
342 plen
= strlen(dp
->parent
->full_name
);
343 ourlen
= strlen(dp
->path_component_name
);
344 len
= ourlen
+ plen
+ 2;
346 n
= prom_early_alloc(len
);
347 strcpy(n
, dp
->parent
->full_name
);
348 if (!is_root_node(dp
->parent
)) {
349 strcpy(n
+ plen
, "/");
352 strcpy(n
+ plen
, dp
->path_component_name
);
357 static struct property
* __init
build_one_prop(phandle node
, char *prev
)
359 static struct property
*tmp
= NULL
;
365 memset(p
, 0, sizeof(*p
) + 32);
368 p
= prom_early_alloc(sizeof(struct property
) + 32);
370 p
->name
= (char *) (p
+ 1);
372 prom_firstprop(node
, p
->name
);
374 prom_nextprop(node
, prev
, p
->name
);
376 if (strlen(p
->name
) == 0) {
380 p
->length
= prom_getproplen(node
, p
->name
);
381 if (p
->length
<= 0) {
384 p
->value
= prom_early_alloc(p
->length
);
385 len
= prom_getproperty(node
, p
->name
, p
->value
, p
->length
);
390 static struct property
* __init
build_prop_list(phandle node
)
392 struct property
*head
, *tail
;
394 head
= tail
= build_one_prop(node
, NULL
);
396 tail
->next
= build_one_prop(node
, tail
->name
);
403 static char * __init
get_one_property(phandle node
, char *name
)
405 char *buf
= "<NULL>";
408 len
= prom_getproplen(node
, name
);
410 buf
= prom_early_alloc(len
);
411 len
= prom_getproperty(node
, name
, buf
, len
);
417 static struct device_node
* __init
create_node(phandle node
)
419 struct device_node
*dp
;
424 dp
= prom_early_alloc(sizeof(*dp
));
426 kref_init(&dp
->kref
);
428 dp
->name
= get_one_property(node
, "name");
429 dp
->type
= get_one_property(node
, "device_type");
432 /* Build interrupts later... */
434 dp
->properties
= build_prop_list(node
);
439 static struct device_node
* __init
build_tree(struct device_node
*parent
, phandle node
, struct device_node
***nextp
)
441 struct device_node
*dp
;
443 dp
= create_node(node
);
446 *nextp
= &dp
->allnext
;
449 dp
->path_component_name
= build_path_component(dp
);
450 dp
->full_name
= build_full_name(dp
);
452 dp
->child
= build_tree(dp
, prom_getchild(node
), nextp
);
454 dp
->sibling
= build_tree(parent
, prom_getsibling(node
), nextp
);
460 void __init
prom_build_devicetree(void)
462 struct device_node
**nextp
;
464 allnodes
= create_node(prom_root_node
);
465 allnodes
->path_component_name
= "";
466 allnodes
->full_name
= "/";
468 nextp
= &allnodes
->allnext
;
469 allnodes
->child
= build_tree(allnodes
,
470 prom_getchild(allnodes
->node
),
472 printk("PROM: Built device tree with %u bytes of memory.\n",
473 prom_early_allocated
);