Loading...
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 sparc32 by David S. Miller davem@davemloft.net
11 *
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.
16 */
17
18#include <linux/kernel.h>
19#include <linux/types.h>
20#include <linux/string.h>
21#include <linux/mm.h>
22#include <linux/bootmem.h>
23#include <linux/module.h>
24
25#include <asm/prom.h>
26#include <asm/oplib.h>
27#include <asm/leon.h>
28#include <asm/leon_amba.h>
29
30#include "prom.h"
31
32void * __init prom_early_alloc(unsigned long size)
33{
34 void *ret;
35
36 ret = __alloc_bootmem(size, SMP_CACHE_BYTES, 0UL);
37 if (ret != NULL)
38 memset(ret, 0, size);
39
40 prom_early_allocated += size;
41
42 return ret;
43}
44
45/* The following routines deal with the black magic of fully naming a
46 * node.
47 *
48 * Certain well known named nodes are just the simple name string.
49 *
50 * Actual devices have an address specifier appended to the base name
51 * string, like this "foo@addr". The "addr" can be in any number of
52 * formats, and the platform plus the type of the node determine the
53 * format and how it is constructed.
54 *
55 * For children of the ROOT node, the naming convention is fixed and
56 * determined by whether this is a sun4u or sun4v system.
57 *
58 * For children of other nodes, it is bus type specific. So
59 * we walk up the tree until we discover a "device_type" property
60 * we recognize and we go from there.
61 */
62static void __init sparc32_path_component(struct device_node *dp, char *tmp_buf)
63{
64 struct linux_prom_registers *regs;
65 struct property *rprop;
66
67 rprop = of_find_property(dp, "reg", NULL);
68 if (!rprop)
69 return;
70
71 regs = rprop->value;
72 sprintf(tmp_buf, "%s@%x,%x",
73 dp->name,
74 regs->which_io, regs->phys_addr);
75}
76
77/* "name@slot,offset" */
78static void __init sbus_path_component(struct device_node *dp, char *tmp_buf)
79{
80 struct linux_prom_registers *regs;
81 struct property *prop;
82
83 prop = of_find_property(dp, "reg", NULL);
84 if (!prop)
85 return;
86
87 regs = prop->value;
88 sprintf(tmp_buf, "%s@%x,%x",
89 dp->name,
90 regs->which_io,
91 regs->phys_addr);
92}
93
94/* "name@devnum[,func]" */
95static void __init pci_path_component(struct device_node *dp, char *tmp_buf)
96{
97 struct linux_prom_pci_registers *regs;
98 struct property *prop;
99 unsigned int devfn;
100
101 prop = of_find_property(dp, "reg", NULL);
102 if (!prop)
103 return;
104
105 regs = prop->value;
106 devfn = (regs->phys_hi >> 8) & 0xff;
107 if (devfn & 0x07) {
108 sprintf(tmp_buf, "%s@%x,%x",
109 dp->name,
110 devfn >> 3,
111 devfn & 0x07);
112 } else {
113 sprintf(tmp_buf, "%s@%x",
114 dp->name,
115 devfn >> 3);
116 }
117}
118
119/* "name@addrhi,addrlo" */
120static void __init ebus_path_component(struct device_node *dp, char *tmp_buf)
121{
122 struct linux_prom_registers *regs;
123 struct property *prop;
124
125 prop = of_find_property(dp, "reg", NULL);
126 if (!prop)
127 return;
128
129 regs = prop->value;
130
131 sprintf(tmp_buf, "%s@%x,%x",
132 dp->name,
133 regs->which_io, regs->phys_addr);
134}
135
136/* "name:vendor:device@irq,addrlo" */
137static void __init ambapp_path_component(struct device_node *dp, char *tmp_buf)
138{
139 struct amba_prom_registers *regs;
140 unsigned int *intr, *device, *vendor, reg0;
141 struct property *prop;
142 int interrupt = 0;
143
144 /* In order to get a unique ID in the device tree (multiple AMBA devices
145 * may have the same name) the node number is printed
146 */
147 prop = of_find_property(dp, "reg", NULL);
148 if (!prop) {
149 reg0 = (unsigned int)dp->phandle;
150 } else {
151 regs = prop->value;
152 reg0 = regs->phys_addr;
153 }
154
155 /* Not all cores have Interrupt */
156 prop = of_find_property(dp, "interrupts", NULL);
157 if (!prop)
158 intr = &interrupt; /* IRQ0 does not exist */
159 else
160 intr = prop->value;
161
162 prop = of_find_property(dp, "vendor", NULL);
163 if (!prop)
164 return;
165 vendor = prop->value;
166 prop = of_find_property(dp, "device", NULL);
167 if (!prop)
168 return;
169 device = prop->value;
170
171 sprintf(tmp_buf, "%s:%d:%d@%x,%x",
172 dp->name, *vendor, *device,
173 *intr, reg0);
174}
175
176static void __init __build_path_component(struct device_node *dp, char *tmp_buf)
177{
178 struct device_node *parent = dp->parent;
179
180 if (parent != NULL) {
181 if (!strcmp(parent->type, "pci") ||
182 !strcmp(parent->type, "pciex"))
183 return pci_path_component(dp, tmp_buf);
184 if (!strcmp(parent->type, "sbus"))
185 return sbus_path_component(dp, tmp_buf);
186 if (!strcmp(parent->type, "ebus"))
187 return ebus_path_component(dp, tmp_buf);
188 if (!strcmp(parent->type, "ambapp"))
189 return ambapp_path_component(dp, tmp_buf);
190
191 /* "isa" is handled with platform naming */
192 }
193
194 /* Use platform naming convention. */
195 return sparc32_path_component(dp, tmp_buf);
196}
197
198char * __init build_path_component(struct device_node *dp)
199{
200 char tmp_buf[64], *n;
201
202 tmp_buf[0] = '\0';
203 __build_path_component(dp, tmp_buf);
204 if (tmp_buf[0] == '\0')
205 strcpy(tmp_buf, dp->name);
206
207 n = prom_early_alloc(strlen(tmp_buf) + 1);
208 strcpy(n, tmp_buf);
209
210 return n;
211}
212
213extern void restore_current(void);
214
215void __init of_console_init(void)
216{
217 char *msg = "OF stdout device is: %s\n";
218 struct device_node *dp;
219 unsigned long flags;
220 const char *type;
221 phandle node;
222 int skip, tmp, fd;
223
224 of_console_path = prom_early_alloc(256);
225
226 switch (prom_vers) {
227 case PROM_V0:
228 skip = 0;
229 switch (*romvec->pv_stdout) {
230 case PROMDEV_SCREEN:
231 type = "display";
232 break;
233
234 case PROMDEV_TTYB:
235 skip = 1;
236 /* FALLTHRU */
237
238 case PROMDEV_TTYA:
239 type = "serial";
240 break;
241
242 default:
243 prom_printf("Invalid PROM_V0 stdout value %u\n",
244 *romvec->pv_stdout);
245 prom_halt();
246 }
247
248 tmp = skip;
249 for_each_node_by_type(dp, type) {
250 if (!tmp--)
251 break;
252 }
253 if (!dp) {
254 prom_printf("Cannot find PROM_V0 console node.\n");
255 prom_halt();
256 }
257 of_console_device = dp;
258
259 strcpy(of_console_path, dp->full_name);
260 if (!strcmp(type, "serial")) {
261 strcat(of_console_path,
262 (skip ? ":b" : ":a"));
263 }
264 break;
265
266 default:
267 case PROM_V2:
268 case PROM_V3:
269 fd = *romvec->pv_v2bootargs.fd_stdout;
270
271 spin_lock_irqsave(&prom_lock, flags);
272 node = (*romvec->pv_v2devops.v2_inst2pkg)(fd);
273 restore_current();
274 spin_unlock_irqrestore(&prom_lock, flags);
275
276 if (!node) {
277 prom_printf("Cannot resolve stdout node from "
278 "instance %08x.\n", fd);
279 prom_halt();
280 }
281 dp = of_find_node_by_phandle(node);
282 type = of_get_property(dp, "device_type", NULL);
283
284 if (!type) {
285 prom_printf("Console stdout lacks "
286 "device_type property.\n");
287 prom_halt();
288 }
289
290 if (strcmp(type, "display") && strcmp(type, "serial")) {
291 prom_printf("Console device_type is neither display "
292 "nor serial.\n");
293 prom_halt();
294 }
295
296 of_console_device = dp;
297
298 if (prom_vers == PROM_V2) {
299 strcpy(of_console_path, dp->full_name);
300 switch (*romvec->pv_stdout) {
301 case PROMDEV_TTYA:
302 strcat(of_console_path, ":a");
303 break;
304 case PROMDEV_TTYB:
305 strcat(of_console_path, ":b");
306 break;
307 }
308 } else {
309 const char *path;
310
311 dp = of_find_node_by_path("/");
312 path = of_get_property(dp, "stdout-path", NULL);
313 if (!path) {
314 prom_printf("No stdout-path in root node.\n");
315 prom_halt();
316 }
317 strcpy(of_console_path, path);
318 }
319 break;
320 }
321
322 of_console_options = strrchr(of_console_path, ':');
323 if (of_console_options) {
324 of_console_options++;
325 if (*of_console_options == '\0')
326 of_console_options = NULL;
327 }
328
329 printk(msg, of_console_path);
330}
331
332void __init of_fill_in_cpu_data(void)
333{
334}
335
336void __init irq_trans_init(struct device_node *dp)
337{
338}
1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * Procedures for creating, accessing and interpreting the device tree.
4 *
5 * Paul Mackerras August 1996.
6 * Copyright (C) 1996-2005 Paul Mackerras.
7 *
8 * Adapted for 64bit PowerPC by Dave Engebretsen and Peter Bergner.
9 * {engebret|bergner}@us.ibm.com
10 *
11 * Adapted for sparc32 by David S. Miller davem@davemloft.net
12 */
13
14#include <linux/kernel.h>
15#include <linux/types.h>
16#include <linux/string.h>
17#include <linux/mm.h>
18#include <linux/memblock.h>
19
20#include <asm/prom.h>
21#include <asm/oplib.h>
22#include <asm/leon.h>
23#include <asm/leon_amba.h>
24
25#include "prom.h"
26
27void * __init prom_early_alloc(unsigned long size)
28{
29 void *ret;
30
31 ret = memblock_alloc(size, SMP_CACHE_BYTES);
32 if (!ret)
33 panic("%s: Failed to allocate %lu bytes\n", __func__, size);
34
35 prom_early_allocated += size;
36
37 return ret;
38}
39
40/* The following routines deal with the black magic of fully naming a
41 * node.
42 *
43 * Certain well known named nodes are just the simple name string.
44 *
45 * Actual devices have an address specifier appended to the base name
46 * string, like this "foo@addr". The "addr" can be in any number of
47 * formats, and the platform plus the type of the node determine the
48 * format and how it is constructed.
49 *
50 * For children of the ROOT node, the naming convention is fixed and
51 * determined by whether this is a sun4u or sun4v system.
52 *
53 * For children of other nodes, it is bus type specific. So
54 * we walk up the tree until we discover a "device_type" property
55 * we recognize and we go from there.
56 */
57static void __init sparc32_path_component(struct device_node *dp, char *tmp_buf)
58{
59 const char *name = of_get_property(dp, "name", NULL);
60 struct linux_prom_registers *regs;
61 struct property *rprop;
62
63 rprop = of_find_property(dp, "reg", NULL);
64 if (!rprop)
65 return;
66
67 regs = rprop->value;
68 sprintf(tmp_buf, "%s@%x,%x",
69 name,
70 regs->which_io, regs->phys_addr);
71}
72
73/* "name@slot,offset" */
74static void __init sbus_path_component(struct device_node *dp, char *tmp_buf)
75{
76 const char *name = of_get_property(dp, "name", NULL);
77 struct linux_prom_registers *regs;
78 struct property *prop;
79
80 prop = of_find_property(dp, "reg", NULL);
81 if (!prop)
82 return;
83
84 regs = prop->value;
85 sprintf(tmp_buf, "%s@%x,%x",
86 name,
87 regs->which_io,
88 regs->phys_addr);
89}
90
91/* "name@devnum[,func]" */
92static void __init pci_path_component(struct device_node *dp, char *tmp_buf)
93{
94 const char *name = of_get_property(dp, "name", NULL);
95 struct linux_prom_pci_registers *regs;
96 struct property *prop;
97 unsigned int devfn;
98
99 prop = of_find_property(dp, "reg", NULL);
100 if (!prop)
101 return;
102
103 regs = prop->value;
104 devfn = (regs->phys_hi >> 8) & 0xff;
105 if (devfn & 0x07) {
106 sprintf(tmp_buf, "%s@%x,%x",
107 name,
108 devfn >> 3,
109 devfn & 0x07);
110 } else {
111 sprintf(tmp_buf, "%s@%x",
112 name,
113 devfn >> 3);
114 }
115}
116
117/* "name@addrhi,addrlo" */
118static void __init ebus_path_component(struct device_node *dp, char *tmp_buf)
119{
120 const char *name = of_get_property(dp, "name", NULL);
121 struct linux_prom_registers *regs;
122 struct property *prop;
123
124 prop = of_find_property(dp, "reg", NULL);
125 if (!prop)
126 return;
127
128 regs = prop->value;
129
130 sprintf(tmp_buf, "%s@%x,%x",
131 name,
132 regs->which_io, regs->phys_addr);
133}
134
135/* "name:vendor:device@irq,addrlo" */
136static void __init ambapp_path_component(struct device_node *dp, char *tmp_buf)
137{
138 const char *name = of_get_property(dp, "name", NULL);
139 struct amba_prom_registers *regs;
140 unsigned int *intr, *device, *vendor, reg0;
141 struct property *prop;
142 int interrupt = 0;
143
144 /* In order to get a unique ID in the device tree (multiple AMBA devices
145 * may have the same name) the node number is printed
146 */
147 prop = of_find_property(dp, "reg", NULL);
148 if (!prop) {
149 reg0 = (unsigned int)dp->phandle;
150 } else {
151 regs = prop->value;
152 reg0 = regs->phys_addr;
153 }
154
155 /* Not all cores have Interrupt */
156 prop = of_find_property(dp, "interrupts", NULL);
157 if (!prop)
158 intr = &interrupt; /* IRQ0 does not exist */
159 else
160 intr = prop->value;
161
162 prop = of_find_property(dp, "vendor", NULL);
163 if (!prop)
164 return;
165 vendor = prop->value;
166 prop = of_find_property(dp, "device", NULL);
167 if (!prop)
168 return;
169 device = prop->value;
170
171 sprintf(tmp_buf, "%s:%d:%d@%x,%x",
172 name, *vendor, *device,
173 *intr, reg0);
174}
175
176static void __init __build_path_component(struct device_node *dp, char *tmp_buf)
177{
178 struct device_node *parent = dp->parent;
179
180 if (parent != NULL) {
181 if (of_node_is_type(parent, "pci") ||
182 of_node_is_type(parent, "pciex"))
183 return pci_path_component(dp, tmp_buf);
184 if (of_node_is_type(parent, "sbus"))
185 return sbus_path_component(dp, tmp_buf);
186 if (of_node_is_type(parent, "ebus"))
187 return ebus_path_component(dp, tmp_buf);
188 if (of_node_is_type(parent, "ambapp"))
189 return ambapp_path_component(dp, tmp_buf);
190
191 /* "isa" is handled with platform naming */
192 }
193
194 /* Use platform naming convention. */
195 return sparc32_path_component(dp, tmp_buf);
196}
197
198char * __init build_path_component(struct device_node *dp)
199{
200 const char *name = of_get_property(dp, "name", NULL);
201 char tmp_buf[64], *n;
202
203 tmp_buf[0] = '\0';
204 __build_path_component(dp, tmp_buf);
205 if (tmp_buf[0] == '\0')
206 strcpy(tmp_buf, name);
207
208 n = prom_early_alloc(strlen(tmp_buf) + 1);
209 strcpy(n, tmp_buf);
210
211 return n;
212}
213
214extern void restore_current(void);
215
216void __init of_console_init(void)
217{
218 char *msg = "OF stdout device is: %s\n";
219 struct device_node *dp;
220 unsigned long flags;
221 const char *type;
222 phandle node;
223 int skip, tmp, fd;
224
225 of_console_path = prom_early_alloc(256);
226
227 switch (prom_vers) {
228 case PROM_V0:
229 skip = 0;
230 switch (*romvec->pv_stdout) {
231 case PROMDEV_SCREEN:
232 type = "display";
233 break;
234
235 case PROMDEV_TTYB:
236 skip = 1;
237 /* FALLTHRU */
238
239 case PROMDEV_TTYA:
240 type = "serial";
241 break;
242
243 default:
244 prom_printf("Invalid PROM_V0 stdout value %u\n",
245 *romvec->pv_stdout);
246 prom_halt();
247 }
248
249 tmp = skip;
250 for_each_node_by_type(dp, type) {
251 if (!tmp--)
252 break;
253 }
254 if (!dp) {
255 prom_printf("Cannot find PROM_V0 console node.\n");
256 prom_halt();
257 }
258 of_console_device = dp;
259
260 sprintf(of_console_path, "%pOF", dp);
261 if (!strcmp(type, "serial")) {
262 strcat(of_console_path,
263 (skip ? ":b" : ":a"));
264 }
265 break;
266
267 default:
268 case PROM_V2:
269 case PROM_V3:
270 fd = *romvec->pv_v2bootargs.fd_stdout;
271
272 spin_lock_irqsave(&prom_lock, flags);
273 node = (*romvec->pv_v2devops.v2_inst2pkg)(fd);
274 restore_current();
275 spin_unlock_irqrestore(&prom_lock, flags);
276
277 if (!node) {
278 prom_printf("Cannot resolve stdout node from "
279 "instance %08x.\n", fd);
280 prom_halt();
281 }
282 dp = of_find_node_by_phandle(node);
283
284 if (!of_node_is_type(dp, "display") &&
285 !of_node_is_type(dp, "serial")) {
286 prom_printf("Console device_type is neither display "
287 "nor serial.\n");
288 prom_halt();
289 }
290
291 of_console_device = dp;
292
293 if (prom_vers == PROM_V2) {
294 sprintf(of_console_path, "%pOF", dp);
295 switch (*romvec->pv_stdout) {
296 case PROMDEV_TTYA:
297 strcat(of_console_path, ":a");
298 break;
299 case PROMDEV_TTYB:
300 strcat(of_console_path, ":b");
301 break;
302 }
303 } else {
304 const char *path;
305
306 dp = of_find_node_by_path("/");
307 path = of_get_property(dp, "stdout-path", NULL);
308 if (!path) {
309 prom_printf("No stdout-path in root node.\n");
310 prom_halt();
311 }
312 strcpy(of_console_path, path);
313 }
314 break;
315 }
316
317 of_console_options = strrchr(of_console_path, ':');
318 if (of_console_options) {
319 of_console_options++;
320 if (*of_console_options == '\0')
321 of_console_options = NULL;
322 }
323
324 printk(msg, of_console_path);
325}
326
327void __init of_fill_in_cpu_data(void)
328{
329}
330
331void __init irq_trans_init(struct device_node *dp)
332{
333}