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
prom_early_alloc(unsigned long size)27 void * __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 */
sparc32_path_component(struct device_node * dp,char * tmp_buf)57 static 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" */
sbus_path_component(struct device_node * dp,char * tmp_buf)74 static 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]" */
pci_path_component(struct device_node * dp,char * tmp_buf)92 static 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" */
ebus_path_component(struct device_node * dp,char * tmp_buf)118 static 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@irq,addrlo" */
ambapp_path_component(struct device_node * dp,char * tmp_buf)136 static 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;
141 unsigned int reg0;
142 struct property *prop;
143 int interrupt = 0;
144
145 /* In order to get a unique ID in the device tree (multiple AMBA devices
146 * may have the same name) the node number is printed
147 */
148 prop = of_find_property(dp, "reg", NULL);
149 if (!prop) {
150 reg0 = (unsigned int)dp->phandle;
151 } else {
152 regs = prop->value;
153 reg0 = regs->phys_addr;
154 }
155
156 /* Not all cores have Interrupt */
157 prop = of_find_property(dp, "interrupts", NULL);
158 if (!prop)
159 intr = &interrupt; /* IRQ0 does not exist */
160 else
161 intr = prop->value;
162
163 sprintf(tmp_buf, "%s@%x,%x", name, *intr, reg0);
164 }
165
__build_path_component(struct device_node * dp,char * tmp_buf)166 static void __init __build_path_component(struct device_node *dp, char *tmp_buf)
167 {
168 struct device_node *parent = dp->parent;
169
170 if (parent != NULL) {
171 if (of_node_is_type(parent, "pci") ||
172 of_node_is_type(parent, "pciex"))
173 return pci_path_component(dp, tmp_buf);
174 if (of_node_is_type(parent, "sbus"))
175 return sbus_path_component(dp, tmp_buf);
176 if (of_node_is_type(parent, "ebus"))
177 return ebus_path_component(dp, tmp_buf);
178 if (of_node_is_type(parent, "ambapp"))
179 return ambapp_path_component(dp, tmp_buf);
180
181 /* "isa" is handled with platform naming */
182 }
183
184 /* Use platform naming convention. */
185 return sparc32_path_component(dp, tmp_buf);
186 }
187
build_path_component(struct device_node * dp)188 char * __init build_path_component(struct device_node *dp)
189 {
190 const char *name = of_get_property(dp, "name", NULL);
191 char tmp_buf[64], *n;
192
193 tmp_buf[0] = '\0';
194 __build_path_component(dp, tmp_buf);
195 if (tmp_buf[0] == '\0')
196 strcpy(tmp_buf, name);
197
198 n = prom_early_alloc(strlen(tmp_buf) + 1);
199 strcpy(n, tmp_buf);
200
201 return n;
202 }
203
204 extern void restore_current(void);
205
of_console_init(void)206 void __init of_console_init(void)
207 {
208 char *msg = "OF stdout device is: %s\n";
209 struct device_node *dp;
210 unsigned long flags;
211 const char *type;
212 phandle node;
213 int skip, tmp, fd;
214
215 of_console_path = prom_early_alloc(256);
216
217 switch (prom_vers) {
218 case PROM_V0:
219 skip = 0;
220 switch (*romvec->pv_stdout) {
221 case PROMDEV_SCREEN:
222 type = "display";
223 break;
224
225 case PROMDEV_TTYB:
226 skip = 1;
227 fallthrough;
228
229 case PROMDEV_TTYA:
230 type = "serial";
231 break;
232
233 default:
234 prom_printf("Invalid PROM_V0 stdout value %u\n",
235 *romvec->pv_stdout);
236 prom_halt();
237 }
238
239 tmp = skip;
240 for_each_node_by_type(dp, type) {
241 if (!tmp--)
242 break;
243 }
244 if (!dp) {
245 prom_printf("Cannot find PROM_V0 console node.\n");
246 prom_halt();
247 }
248 of_console_device = dp;
249
250 sprintf(of_console_path, "%pOF", dp);
251 if (!strcmp(type, "serial")) {
252 strcat(of_console_path,
253 (skip ? ":b" : ":a"));
254 }
255 break;
256
257 default:
258 case PROM_V2:
259 case PROM_V3:
260 fd = *romvec->pv_v2bootargs.fd_stdout;
261
262 spin_lock_irqsave(&prom_lock, flags);
263 node = (*romvec->pv_v2devops.v2_inst2pkg)(fd);
264 restore_current();
265 spin_unlock_irqrestore(&prom_lock, flags);
266
267 if (!node) {
268 prom_printf("Cannot resolve stdout node from "
269 "instance %08x.\n", fd);
270 prom_halt();
271 }
272 dp = of_find_node_by_phandle(node);
273
274 if (!of_node_is_type(dp, "display") &&
275 !of_node_is_type(dp, "serial")) {
276 prom_printf("Console device_type is neither display "
277 "nor serial.\n");
278 prom_halt();
279 }
280
281 of_console_device = dp;
282
283 if (prom_vers == PROM_V2) {
284 sprintf(of_console_path, "%pOF", dp);
285 switch (*romvec->pv_stdout) {
286 case PROMDEV_TTYA:
287 strcat(of_console_path, ":a");
288 break;
289 case PROMDEV_TTYB:
290 strcat(of_console_path, ":b");
291 break;
292 }
293 } else {
294 const char *path;
295
296 dp = of_find_node_by_path("/");
297 path = of_get_property(dp, "stdout-path", NULL);
298 if (!path) {
299 prom_printf("No stdout-path in root node.\n");
300 prom_halt();
301 }
302 strcpy(of_console_path, path);
303 }
304 break;
305 }
306
307 of_console_options = strrchr(of_console_path, ':');
308 if (of_console_options) {
309 of_console_options++;
310 if (*of_console_options == '\0')
311 of_console_options = NULL;
312 }
313
314 printk(msg, of_console_path);
315 }
316
of_fill_in_cpu_data(void)317 void __init of_fill_in_cpu_data(void)
318 {
319 }
320
irq_trans_init(struct device_node * dp)321 void __init irq_trans_init(struct device_node *dp)
322 {
323 }
324