Commit | Line | Data |
---|---|---|
a2bd4fd1 DM |
1 | #include <linux/string.h> |
2 | #include <linux/kernel.h> | |
3 | #include <linux/init.h> | |
4 | #include <linux/module.h> | |
5 | #include <linux/mod_devicetable.h> | |
6 | #include <linux/slab.h> | |
7 | ||
8 | #include <asm/errno.h> | |
9 | #include <asm/of_device.h> | |
10 | ||
11 | /** | |
12 | * of_match_device - Tell if an of_device structure has a matching | |
13 | * of_match structure | |
14 | * @ids: array of of device match structures to search in | |
15 | * @dev: the of device structure to match against | |
16 | * | |
17 | * Used by a driver to check whether an of_device present in the | |
18 | * system is in its list of supported devices. | |
19 | */ | |
20 | const struct of_device_id *of_match_device(const struct of_device_id *matches, | |
21 | const struct of_device *dev) | |
22 | { | |
23 | if (!dev->node) | |
24 | return NULL; | |
25 | while (matches->name[0] || matches->type[0] || matches->compatible[0]) { | |
26 | int match = 1; | |
27 | if (matches->name[0]) | |
28 | match &= dev->node->name | |
29 | && !strcmp(matches->name, dev->node->name); | |
30 | if (matches->type[0]) | |
31 | match &= dev->node->type | |
32 | && !strcmp(matches->type, dev->node->type); | |
33 | if (matches->compatible[0]) | |
34 | match &= of_device_is_compatible(dev->node, | |
35 | matches->compatible); | |
36 | if (match) | |
37 | return matches; | |
38 | matches++; | |
39 | } | |
40 | return NULL; | |
41 | } | |
42 | ||
43 | static int of_platform_bus_match(struct device *dev, struct device_driver *drv) | |
44 | { | |
45 | struct of_device * of_dev = to_of_device(dev); | |
46 | struct of_platform_driver * of_drv = to_of_platform_driver(drv); | |
47 | const struct of_device_id * matches = of_drv->match_table; | |
48 | ||
49 | if (!matches) | |
50 | return 0; | |
51 | ||
52 | return of_match_device(matches, of_dev) != NULL; | |
53 | } | |
54 | ||
55 | struct of_device *of_dev_get(struct of_device *dev) | |
56 | { | |
57 | struct device *tmp; | |
58 | ||
59 | if (!dev) | |
60 | return NULL; | |
61 | tmp = get_device(&dev->dev); | |
62 | if (tmp) | |
63 | return to_of_device(tmp); | |
64 | else | |
65 | return NULL; | |
66 | } | |
67 | ||
68 | void of_dev_put(struct of_device *dev) | |
69 | { | |
70 | if (dev) | |
71 | put_device(&dev->dev); | |
72 | } | |
73 | ||
74 | ||
75 | static int of_device_probe(struct device *dev) | |
76 | { | |
77 | int error = -ENODEV; | |
78 | struct of_platform_driver *drv; | |
79 | struct of_device *of_dev; | |
80 | const struct of_device_id *match; | |
81 | ||
82 | drv = to_of_platform_driver(dev->driver); | |
83 | of_dev = to_of_device(dev); | |
84 | ||
85 | if (!drv->probe) | |
86 | return error; | |
87 | ||
88 | of_dev_get(of_dev); | |
89 | ||
90 | match = of_match_device(drv->match_table, of_dev); | |
91 | if (match) | |
92 | error = drv->probe(of_dev, match); | |
93 | if (error) | |
94 | of_dev_put(of_dev); | |
95 | ||
96 | return error; | |
97 | } | |
98 | ||
99 | static int of_device_remove(struct device *dev) | |
100 | { | |
101 | struct of_device * of_dev = to_of_device(dev); | |
102 | struct of_platform_driver * drv = to_of_platform_driver(dev->driver); | |
103 | ||
104 | if (dev->driver && drv->remove) | |
105 | drv->remove(of_dev); | |
106 | return 0; | |
107 | } | |
108 | ||
109 | static int of_device_suspend(struct device *dev, pm_message_t state) | |
110 | { | |
111 | struct of_device * of_dev = to_of_device(dev); | |
112 | struct of_platform_driver * drv = to_of_platform_driver(dev->driver); | |
113 | int error = 0; | |
114 | ||
115 | if (dev->driver && drv->suspend) | |
116 | error = drv->suspend(of_dev, state); | |
117 | return error; | |
118 | } | |
119 | ||
120 | static int of_device_resume(struct device * dev) | |
121 | { | |
122 | struct of_device * of_dev = to_of_device(dev); | |
123 | struct of_platform_driver * drv = to_of_platform_driver(dev->driver); | |
124 | int error = 0; | |
125 | ||
126 | if (dev->driver && drv->resume) | |
127 | error = drv->resume(of_dev); | |
128 | return error; | |
129 | } | |
130 | ||
3ca9fab4 DM |
131 | void __iomem *of_ioremap(struct resource *res, unsigned long offset, unsigned long size, char *name) |
132 | { | |
133 | unsigned long ret = res->start + offset; | |
6bda5736 | 134 | struct resource *r; |
3ca9fab4 | 135 | |
6bda5736 DM |
136 | if (res->flags & IORESOURCE_MEM) |
137 | r = request_mem_region(ret, size, name); | |
138 | else | |
139 | r = request_region(ret, size, name); | |
140 | if (!r) | |
3ca9fab4 DM |
141 | ret = 0; |
142 | ||
143 | return (void __iomem *) ret; | |
144 | } | |
145 | EXPORT_SYMBOL(of_ioremap); | |
146 | ||
e3a411a3 | 147 | void of_iounmap(struct resource *res, void __iomem *base, unsigned long size) |
3ca9fab4 | 148 | { |
e3a411a3 DM |
149 | if (res->flags & IORESOURCE_MEM) |
150 | release_mem_region((unsigned long) base, size); | |
151 | else | |
152 | release_region((unsigned long) base, size); | |
3ca9fab4 DM |
153 | } |
154 | EXPORT_SYMBOL(of_iounmap); | |
155 | ||
2b1e5978 DM |
156 | static int node_match(struct device *dev, void *data) |
157 | { | |
158 | struct of_device *op = to_of_device(dev); | |
159 | struct device_node *dp = data; | |
160 | ||
161 | return (op->node == dp); | |
162 | } | |
163 | ||
164 | struct of_device *of_find_device_by_node(struct device_node *dp) | |
165 | { | |
166 | struct device *dev = bus_find_device(&of_bus_type, NULL, | |
167 | dp, node_match); | |
168 | ||
169 | if (dev) | |
170 | return to_of_device(dev); | |
171 | ||
172 | return NULL; | |
173 | } | |
174 | EXPORT_SYMBOL(of_find_device_by_node); | |
175 | ||
a2bd4fd1 DM |
176 | #ifdef CONFIG_PCI |
177 | struct bus_type isa_bus_type = { | |
178 | .name = "isa", | |
179 | .match = of_platform_bus_match, | |
180 | .probe = of_device_probe, | |
181 | .remove = of_device_remove, | |
182 | .suspend = of_device_suspend, | |
183 | .resume = of_device_resume, | |
184 | }; | |
69853918 | 185 | EXPORT_SYMBOL(isa_bus_type); |
a2bd4fd1 DM |
186 | |
187 | struct bus_type ebus_bus_type = { | |
188 | .name = "ebus", | |
189 | .match = of_platform_bus_match, | |
190 | .probe = of_device_probe, | |
191 | .remove = of_device_remove, | |
192 | .suspend = of_device_suspend, | |
193 | .resume = of_device_resume, | |
194 | }; | |
69853918 | 195 | EXPORT_SYMBOL(ebus_bus_type); |
a2bd4fd1 DM |
196 | #endif |
197 | ||
198 | #ifdef CONFIG_SBUS | |
199 | struct bus_type sbus_bus_type = { | |
200 | .name = "sbus", | |
201 | .match = of_platform_bus_match, | |
202 | .probe = of_device_probe, | |
203 | .remove = of_device_remove, | |
204 | .suspend = of_device_suspend, | |
205 | .resume = of_device_resume, | |
206 | }; | |
69853918 | 207 | EXPORT_SYMBOL(sbus_bus_type); |
a2bd4fd1 DM |
208 | #endif |
209 | ||
cf44bbc2 DM |
210 | struct bus_type of_bus_type = { |
211 | .name = "of", | |
212 | .match = of_platform_bus_match, | |
213 | .probe = of_device_probe, | |
214 | .remove = of_device_remove, | |
215 | .suspend = of_device_suspend, | |
216 | .resume = of_device_resume, | |
217 | }; | |
218 | EXPORT_SYMBOL(of_bus_type); | |
219 | ||
a83f9823 | 220 | static inline u64 of_read_addr(const u32 *cell, int size) |
cf44bbc2 DM |
221 | { |
222 | u64 r = 0; | |
223 | while (size--) | |
224 | r = (r << 32) | *(cell++); | |
225 | return r; | |
226 | } | |
227 | ||
228 | static void __init get_cells(struct device_node *dp, | |
229 | int *addrc, int *sizec) | |
230 | { | |
231 | if (addrc) | |
232 | *addrc = of_n_addr_cells(dp); | |
233 | if (sizec) | |
234 | *sizec = of_n_size_cells(dp); | |
235 | } | |
236 | ||
237 | /* Max address size we deal with */ | |
238 | #define OF_MAX_ADDR_CELLS 4 | |
239 | ||
240 | struct of_bus { | |
241 | const char *name; | |
242 | const char *addr_prop_name; | |
243 | int (*match)(struct device_node *parent); | |
244 | void (*count_cells)(struct device_node *child, | |
245 | int *addrc, int *sizec); | |
a83f9823 DM |
246 | int (*map)(u32 *addr, const u32 *range, |
247 | int na, int ns, int pna); | |
cf44bbc2 DM |
248 | unsigned int (*get_flags)(u32 *addr); |
249 | }; | |
250 | ||
251 | /* | |
252 | * Default translator (generic bus) | |
253 | */ | |
254 | ||
255 | static void of_bus_default_count_cells(struct device_node *dev, | |
256 | int *addrc, int *sizec) | |
257 | { | |
258 | get_cells(dev, addrc, sizec); | |
259 | } | |
260 | ||
a83f9823 DM |
261 | /* Make sure the least significant 64-bits are in-range. Even |
262 | * for 3 or 4 cell values it is a good enough approximation. | |
263 | */ | |
264 | static int of_out_of_range(const u32 *addr, const u32 *base, | |
265 | const u32 *size, int na, int ns) | |
cf44bbc2 | 266 | { |
a83f9823 DM |
267 | u64 a = of_read_addr(addr, na); |
268 | u64 b = of_read_addr(base, na); | |
cf44bbc2 | 269 | |
a83f9823 DM |
270 | if (a < b) |
271 | return 1; | |
cf44bbc2 | 272 | |
a83f9823 DM |
273 | b += of_read_addr(size, ns); |
274 | if (a >= b) | |
275 | return 1; | |
276 | ||
277 | return 0; | |
cf44bbc2 DM |
278 | } |
279 | ||
a83f9823 DM |
280 | static int of_bus_default_map(u32 *addr, const u32 *range, |
281 | int na, int ns, int pna) | |
cf44bbc2 | 282 | { |
a83f9823 DM |
283 | u32 result[OF_MAX_ADDR_CELLS]; |
284 | int i; | |
285 | ||
286 | if (ns > 2) { | |
287 | printk("of_device: Cannot handle size cells (%d) > 2.", ns); | |
288 | return -EINVAL; | |
289 | } | |
290 | ||
291 | if (of_out_of_range(addr, range, range + na + pna, na, ns)) | |
292 | return -EINVAL; | |
293 | ||
294 | /* Start with the parent range base. */ | |
295 | memcpy(result, range + na, pna * 4); | |
296 | ||
297 | /* Add in the child address offset. */ | |
298 | for (i = 0; i < na; i++) | |
299 | result[pna - 1 - i] += | |
300 | (addr[na - 1 - i] - | |
301 | range[na - 1 - i]); | |
302 | ||
303 | memcpy(addr, result, pna * 4); | |
cf44bbc2 DM |
304 | |
305 | return 0; | |
306 | } | |
307 | ||
308 | static unsigned int of_bus_default_get_flags(u32 *addr) | |
309 | { | |
310 | return IORESOURCE_MEM; | |
311 | } | |
312 | ||
cf44bbc2 DM |
313 | /* |
314 | * PCI bus specific translator | |
315 | */ | |
316 | ||
317 | static int of_bus_pci_match(struct device_node *np) | |
318 | { | |
a83f9823 DM |
319 | if (!strcmp(np->type, "pci") || !strcmp(np->type, "pciex")) { |
320 | /* Do not do PCI specific frobbing if the | |
321 | * PCI bridge lacks a ranges property. We | |
322 | * want to pass it through up to the next | |
323 | * parent as-is, not with the PCI translate | |
324 | * method which chops off the top address cell. | |
325 | */ | |
326 | if (!of_find_property(np, "ranges", NULL)) | |
327 | return 0; | |
328 | ||
329 | return 1; | |
330 | } | |
331 | ||
332 | return 0; | |
cf44bbc2 DM |
333 | } |
334 | ||
335 | static void of_bus_pci_count_cells(struct device_node *np, | |
336 | int *addrc, int *sizec) | |
337 | { | |
338 | if (addrc) | |
339 | *addrc = 3; | |
340 | if (sizec) | |
341 | *sizec = 2; | |
342 | } | |
343 | ||
a83f9823 DM |
344 | static int of_bus_pci_map(u32 *addr, const u32 *range, |
345 | int na, int ns, int pna) | |
cf44bbc2 | 346 | { |
a83f9823 DM |
347 | u32 result[OF_MAX_ADDR_CELLS]; |
348 | int i; | |
cf44bbc2 DM |
349 | |
350 | /* Check address type match */ | |
351 | if ((addr[0] ^ range[0]) & 0x03000000) | |
a83f9823 | 352 | return -EINVAL; |
cf44bbc2 | 353 | |
a83f9823 DM |
354 | if (of_out_of_range(addr + 1, range + 1, range + na + pna, |
355 | na - 1, ns)) | |
356 | return -EINVAL; | |
cf44bbc2 | 357 | |
a83f9823 DM |
358 | /* Start with the parent range base. */ |
359 | memcpy(result, range + na, pna * 4); | |
cf44bbc2 | 360 | |
a83f9823 DM |
361 | /* Add in the child address offset, skipping high cell. */ |
362 | for (i = 0; i < na - 1; i++) | |
363 | result[pna - 1 - i] += | |
364 | (addr[na - 1 - i] - | |
365 | range[na - 1 - i]); | |
366 | ||
367 | memcpy(addr, result, pna * 4); | |
368 | ||
369 | return 0; | |
cf44bbc2 DM |
370 | } |
371 | ||
372 | static unsigned int of_bus_pci_get_flags(u32 *addr) | |
373 | { | |
374 | unsigned int flags = 0; | |
375 | u32 w = addr[0]; | |
376 | ||
377 | switch((w >> 24) & 0x03) { | |
378 | case 0x01: | |
379 | flags |= IORESOURCE_IO; | |
380 | case 0x02: /* 32 bits */ | |
381 | case 0x03: /* 64 bits */ | |
382 | flags |= IORESOURCE_MEM; | |
383 | } | |
384 | if (w & 0x40000000) | |
385 | flags |= IORESOURCE_PREFETCH; | |
386 | return flags; | |
387 | } | |
388 | ||
cf44bbc2 DM |
389 | /* |
390 | * SBUS bus specific translator | |
391 | */ | |
392 | ||
393 | static int of_bus_sbus_match(struct device_node *np) | |
394 | { | |
395 | return !strcmp(np->name, "sbus") || | |
396 | !strcmp(np->name, "sbi"); | |
397 | } | |
398 | ||
399 | static void of_bus_sbus_count_cells(struct device_node *child, | |
400 | int *addrc, int *sizec) | |
401 | { | |
402 | if (addrc) | |
403 | *addrc = 2; | |
404 | if (sizec) | |
405 | *sizec = 1; | |
406 | } | |
407 | ||
4130a4b2 DM |
408 | /* |
409 | * FHC/Central bus specific translator. | |
410 | * | |
411 | * This is just needed to hard-code the address and size cell | |
412 | * counts. 'fhc' and 'central' nodes lack the #address-cells and | |
413 | * #size-cells properties, and if you walk to the root on such | |
414 | * Enterprise boxes all you'll get is a #size-cells of 2 which is | |
415 | * not what we want to use. | |
416 | */ | |
417 | static int of_bus_fhc_match(struct device_node *np) | |
cf44bbc2 | 418 | { |
4130a4b2 DM |
419 | return !strcmp(np->name, "fhc") || |
420 | !strcmp(np->name, "central"); | |
cf44bbc2 DM |
421 | } |
422 | ||
4130a4b2 | 423 | #define of_bus_fhc_count_cells of_bus_sbus_count_cells |
cf44bbc2 DM |
424 | |
425 | /* | |
426 | * Array of bus specific translators | |
427 | */ | |
428 | ||
429 | static struct of_bus of_busses[] = { | |
430 | /* PCI */ | |
431 | { | |
432 | .name = "pci", | |
433 | .addr_prop_name = "assigned-addresses", | |
434 | .match = of_bus_pci_match, | |
435 | .count_cells = of_bus_pci_count_cells, | |
436 | .map = of_bus_pci_map, | |
cf44bbc2 DM |
437 | .get_flags = of_bus_pci_get_flags, |
438 | }, | |
cf44bbc2 DM |
439 | /* SBUS */ |
440 | { | |
441 | .name = "sbus", | |
442 | .addr_prop_name = "reg", | |
443 | .match = of_bus_sbus_match, | |
444 | .count_cells = of_bus_sbus_count_cells, | |
4130a4b2 DM |
445 | .map = of_bus_default_map, |
446 | .get_flags = of_bus_default_get_flags, | |
447 | }, | |
448 | /* FHC */ | |
449 | { | |
450 | .name = "fhc", | |
451 | .addr_prop_name = "reg", | |
452 | .match = of_bus_fhc_match, | |
453 | .count_cells = of_bus_fhc_count_cells, | |
454 | .map = of_bus_default_map, | |
455 | .get_flags = of_bus_default_get_flags, | |
cf44bbc2 DM |
456 | }, |
457 | /* Default */ | |
458 | { | |
459 | .name = "default", | |
460 | .addr_prop_name = "reg", | |
461 | .match = NULL, | |
462 | .count_cells = of_bus_default_count_cells, | |
463 | .map = of_bus_default_map, | |
cf44bbc2 DM |
464 | .get_flags = of_bus_default_get_flags, |
465 | }, | |
466 | }; | |
467 | ||
468 | static struct of_bus *of_match_bus(struct device_node *np) | |
469 | { | |
470 | int i; | |
471 | ||
472 | for (i = 0; i < ARRAY_SIZE(of_busses); i ++) | |
473 | if (!of_busses[i].match || of_busses[i].match(np)) | |
474 | return &of_busses[i]; | |
475 | BUG(); | |
476 | return NULL; | |
477 | } | |
478 | ||
479 | static int __init build_one_resource(struct device_node *parent, | |
480 | struct of_bus *bus, | |
481 | struct of_bus *pbus, | |
482 | u32 *addr, | |
483 | int na, int ns, int pna) | |
484 | { | |
485 | u32 *ranges; | |
486 | unsigned int rlen; | |
487 | int rone; | |
cf44bbc2 DM |
488 | |
489 | ranges = of_get_property(parent, "ranges", &rlen); | |
490 | if (ranges == NULL || rlen == 0) { | |
a83f9823 DM |
491 | u32 result[OF_MAX_ADDR_CELLS]; |
492 | int i; | |
493 | ||
494 | memset(result, 0, pna * 4); | |
495 | for (i = 0; i < na; i++) | |
496 | result[pna - 1 - i] = | |
497 | addr[na - 1 - i]; | |
498 | ||
499 | memcpy(addr, result, pna * 4); | |
500 | return 0; | |
cf44bbc2 DM |
501 | } |
502 | ||
503 | /* Now walk through the ranges */ | |
504 | rlen /= 4; | |
505 | rone = na + pna + ns; | |
506 | for (; rlen >= rone; rlen -= rone, ranges += rone) { | |
a83f9823 DM |
507 | if (!bus->map(addr, ranges, na, ns, pna)) |
508 | return 0; | |
cf44bbc2 | 509 | } |
a83f9823 DM |
510 | |
511 | return 1; | |
512 | } | |
513 | ||
514 | static int __init use_1to1_mapping(struct device_node *pp) | |
515 | { | |
516 | char *model; | |
517 | ||
518 | /* If this is on the PMU bus, don't try to translate it even | |
519 | * if a ranges property exists. | |
520 | */ | |
521 | if (!strcmp(pp->name, "pmu")) | |
cf44bbc2 DM |
522 | return 1; |
523 | ||
a83f9823 DM |
524 | /* If we have a ranges property in the parent, use it. */ |
525 | if (of_find_property(pp, "ranges", NULL) != NULL) | |
526 | return 0; | |
cf44bbc2 | 527 | |
a83f9823 DM |
528 | /* If the parent is the dma node of an ISA bus, pass |
529 | * the translation up to the root. | |
530 | */ | |
531 | if (!strcmp(pp->name, "dma")) | |
532 | return 0; | |
533 | ||
534 | /* Similarly for Simba PCI bridges. */ | |
535 | model = of_get_property(pp, "model", NULL); | |
536 | if (model && !strcmp(model, "SUNW,simba")) | |
537 | return 0; | |
538 | ||
539 | return 1; | |
cf44bbc2 DM |
540 | } |
541 | ||
a83f9823 DM |
542 | static int of_resource_verbose; |
543 | ||
cf44bbc2 DM |
544 | static void __init build_device_resources(struct of_device *op, |
545 | struct device *parent) | |
546 | { | |
547 | struct of_device *p_op; | |
548 | struct of_bus *bus; | |
549 | int na, ns; | |
550 | int index, num_reg; | |
551 | void *preg; | |
552 | ||
553 | if (!parent) | |
554 | return; | |
555 | ||
556 | p_op = to_of_device(parent); | |
557 | bus = of_match_bus(p_op->node); | |
558 | bus->count_cells(op->node, &na, &ns); | |
559 | ||
560 | preg = of_get_property(op->node, bus->addr_prop_name, &num_reg); | |
561 | if (!preg || num_reg == 0) | |
562 | return; | |
563 | ||
564 | /* Convert to num-cells. */ | |
565 | num_reg /= 4; | |
566 | ||
46ba6d7d | 567 | /* Convert to num-entries. */ |
cf44bbc2 DM |
568 | num_reg /= na + ns; |
569 | ||
46ba6d7d DM |
570 | /* Prevent overruning the op->resources[] array. */ |
571 | if (num_reg > PROMREG_MAX) { | |
572 | printk(KERN_WARNING "%s: Too many regs (%d), " | |
573 | "limiting to %d.\n", | |
574 | op->node->full_name, num_reg, PROMREG_MAX); | |
575 | num_reg = PROMREG_MAX; | |
576 | } | |
577 | ||
cf44bbc2 DM |
578 | for (index = 0; index < num_reg; index++) { |
579 | struct resource *r = &op->resource[index]; | |
580 | u32 addr[OF_MAX_ADDR_CELLS]; | |
581 | u32 *reg = (preg + (index * ((na + ns) * 4))); | |
582 | struct device_node *dp = op->node; | |
583 | struct device_node *pp = p_op->node; | |
b85cdd49 | 584 | struct of_bus *pbus, *dbus; |
cf44bbc2 DM |
585 | u64 size, result = OF_BAD_ADDR; |
586 | unsigned long flags; | |
587 | int dna, dns; | |
588 | int pna, pns; | |
589 | ||
590 | size = of_read_addr(reg + na, ns); | |
591 | flags = bus->get_flags(reg); | |
592 | ||
593 | memcpy(addr, reg, na * 4); | |
594 | ||
a83f9823 | 595 | if (use_1to1_mapping(pp)) { |
cf44bbc2 DM |
596 | result = of_read_addr(addr, na); |
597 | goto build_res; | |
598 | } | |
599 | ||
600 | dna = na; | |
601 | dns = ns; | |
b85cdd49 | 602 | dbus = bus; |
cf44bbc2 DM |
603 | |
604 | while (1) { | |
605 | dp = pp; | |
606 | pp = dp->parent; | |
607 | if (!pp) { | |
608 | result = of_read_addr(addr, dna); | |
609 | break; | |
610 | } | |
611 | ||
612 | pbus = of_match_bus(pp); | |
613 | pbus->count_cells(dp, &pna, &pns); | |
614 | ||
b85cdd49 | 615 | if (build_one_resource(dp, dbus, pbus, addr, |
a83f9823 | 616 | dna, dns, pna)) |
cf44bbc2 DM |
617 | break; |
618 | ||
619 | dna = pna; | |
620 | dns = pns; | |
b85cdd49 | 621 | dbus = pbus; |
cf44bbc2 DM |
622 | } |
623 | ||
624 | build_res: | |
625 | memset(r, 0, sizeof(*r)); | |
a83f9823 DM |
626 | |
627 | if (of_resource_verbose) | |
628 | printk("%s reg[%d] -> %lx\n", | |
629 | op->node->full_name, index, | |
630 | result); | |
631 | ||
cf44bbc2 | 632 | if (result != OF_BAD_ADDR) { |
1815aed5 DM |
633 | if (tlb_type == hypervisor) |
634 | result &= 0x0fffffffffffffffUL; | |
635 | ||
cf44bbc2 DM |
636 | r->start = result; |
637 | r->end = result + size - 1; | |
638 | r->flags = flags; | |
cf44bbc2 DM |
639 | } |
640 | r->name = op->node->name; | |
641 | } | |
642 | } | |
643 | ||
2b1e5978 DM |
644 | static struct device_node * __init |
645 | apply_interrupt_map(struct device_node *dp, struct device_node *pp, | |
646 | u32 *imap, int imlen, u32 *imask, | |
647 | unsigned int *irq_p) | |
648 | { | |
649 | struct device_node *cp; | |
650 | unsigned int irq = *irq_p; | |
651 | struct of_bus *bus; | |
652 | phandle handle; | |
653 | u32 *reg; | |
654 | int na, num_reg, i; | |
655 | ||
656 | bus = of_match_bus(pp); | |
657 | bus->count_cells(dp, &na, NULL); | |
658 | ||
659 | reg = of_get_property(dp, "reg", &num_reg); | |
660 | if (!reg || !num_reg) | |
661 | return NULL; | |
662 | ||
663 | imlen /= ((na + 3) * 4); | |
664 | handle = 0; | |
665 | for (i = 0; i < imlen; i++) { | |
666 | int j; | |
667 | ||
668 | for (j = 0; j < na; j++) { | |
669 | if ((reg[j] & imask[j]) != imap[j]) | |
670 | goto next; | |
671 | } | |
672 | if (imap[na] == irq) { | |
673 | handle = imap[na + 1]; | |
674 | irq = imap[na + 2]; | |
675 | break; | |
676 | } | |
677 | ||
678 | next: | |
679 | imap += (na + 3); | |
680 | } | |
46ba6d7d DM |
681 | if (i == imlen) { |
682 | /* Psycho and Sabre PCI controllers can have 'interrupt-map' | |
683 | * properties that do not include the on-board device | |
684 | * interrupts. Instead, the device's 'interrupts' property | |
685 | * is already a fully specified INO value. | |
686 | * | |
687 | * Handle this by deciding that, if we didn't get a | |
688 | * match in the parent's 'interrupt-map', and the | |
689 | * parent is an IRQ translater, then use the parent as | |
690 | * our IRQ controller. | |
691 | */ | |
692 | if (pp->irq_trans) | |
693 | return pp; | |
694 | ||
2b1e5978 | 695 | return NULL; |
46ba6d7d | 696 | } |
2b1e5978 DM |
697 | |
698 | *irq_p = irq; | |
699 | cp = of_find_node_by_phandle(handle); | |
700 | ||
701 | return cp; | |
702 | } | |
703 | ||
704 | static unsigned int __init pci_irq_swizzle(struct device_node *dp, | |
705 | struct device_node *pp, | |
706 | unsigned int irq) | |
707 | { | |
708 | struct linux_prom_pci_registers *regs; | |
bb4c18cb | 709 | unsigned int bus, devfn, slot, ret; |
2b1e5978 DM |
710 | |
711 | if (irq < 1 || irq > 4) | |
712 | return irq; | |
713 | ||
714 | regs = of_get_property(dp, "reg", NULL); | |
715 | if (!regs) | |
716 | return irq; | |
717 | ||
bb4c18cb | 718 | bus = (regs->phys_hi >> 16) & 0xff; |
2b1e5978 DM |
719 | devfn = (regs->phys_hi >> 8) & 0xff; |
720 | slot = (devfn >> 3) & 0x1f; | |
721 | ||
bb4c18cb DM |
722 | if (pp->irq_trans) { |
723 | /* Derived from Table 8-3, U2P User's Manual. This branch | |
724 | * is handling a PCI controller that lacks a proper set of | |
725 | * interrupt-map and interrupt-map-mask properties. The | |
726 | * Ultra-E450 is one example. | |
727 | * | |
728 | * The bit layout is BSSLL, where: | |
729 | * B: 0 on bus A, 1 on bus B | |
730 | * D: 2-bit slot number, derived from PCI device number as | |
731 | * (dev - 1) for bus A, or (dev - 2) for bus B | |
732 | * L: 2-bit line number | |
733 | * | |
734 | * Actually, more "portable" way to calculate the funky | |
735 | * slot number is to subtract pbm->pci_first_slot from the | |
736 | * device number, and that's exactly what the pre-OF | |
737 | * sparc64 code did, but we're building this stuff generically | |
738 | * using the OBP tree, not in the PCI controller layer. | |
739 | */ | |
740 | if (bus & 0x80) { | |
741 | /* PBM-A */ | |
742 | bus = 0x00; | |
743 | slot = (slot - 1) << 2; | |
744 | } else { | |
745 | /* PBM-B */ | |
746 | bus = 0x10; | |
747 | slot = (slot - 2) << 2; | |
748 | } | |
749 | irq -= 1; | |
750 | ||
751 | ret = (bus | slot | irq); | |
752 | } else { | |
753 | /* Going through a PCI-PCI bridge that lacks a set of | |
754 | * interrupt-map and interrupt-map-mask properties. | |
755 | */ | |
756 | ret = ((irq - 1 + (slot & 3)) & 3) + 1; | |
757 | } | |
2b1e5978 DM |
758 | |
759 | return ret; | |
760 | } | |
761 | ||
a83f9823 DM |
762 | static int of_irq_verbose; |
763 | ||
2b1e5978 DM |
764 | static unsigned int __init build_one_device_irq(struct of_device *op, |
765 | struct device *parent, | |
766 | unsigned int irq) | |
767 | { | |
768 | struct device_node *dp = op->node; | |
769 | struct device_node *pp, *ip; | |
770 | unsigned int orig_irq = irq; | |
771 | ||
772 | if (irq == 0xffffffff) | |
773 | return irq; | |
774 | ||
775 | if (dp->irq_trans) { | |
776 | irq = dp->irq_trans->irq_build(dp, irq, | |
777 | dp->irq_trans->data); | |
a83f9823 DM |
778 | |
779 | if (of_irq_verbose) | |
780 | printk("%s: direct translate %x --> %x\n", | |
781 | dp->full_name, orig_irq, irq); | |
782 | ||
2b1e5978 DM |
783 | return irq; |
784 | } | |
785 | ||
786 | /* Something more complicated. Walk up to the root, applying | |
787 | * interrupt-map or bus specific translations, until we hit | |
788 | * an IRQ translator. | |
789 | * | |
790 | * If we hit a bus type or situation we cannot handle, we | |
791 | * stop and assume that the original IRQ number was in a | |
792 | * format which has special meaning to it's immediate parent. | |
793 | */ | |
794 | pp = dp->parent; | |
795 | ip = NULL; | |
796 | while (pp) { | |
797 | void *imap, *imsk; | |
798 | int imlen; | |
799 | ||
800 | imap = of_get_property(pp, "interrupt-map", &imlen); | |
801 | imsk = of_get_property(pp, "interrupt-map-mask", NULL); | |
802 | if (imap && imsk) { | |
803 | struct device_node *iret; | |
804 | int this_orig_irq = irq; | |
805 | ||
806 | iret = apply_interrupt_map(dp, pp, | |
807 | imap, imlen, imsk, | |
808 | &irq); | |
a83f9823 DM |
809 | |
810 | if (of_irq_verbose) | |
811 | printk("%s: Apply [%s:%x] imap --> [%s:%x]\n", | |
812 | op->node->full_name, | |
813 | pp->full_name, this_orig_irq, | |
814 | (iret ? iret->full_name : "NULL"), irq); | |
815 | ||
2b1e5978 DM |
816 | if (!iret) |
817 | break; | |
818 | ||
819 | if (iret->irq_trans) { | |
820 | ip = iret; | |
821 | break; | |
822 | } | |
823 | } else { | |
824 | if (!strcmp(pp->type, "pci") || | |
825 | !strcmp(pp->type, "pciex")) { | |
826 | unsigned int this_orig_irq = irq; | |
827 | ||
828 | irq = pci_irq_swizzle(dp, pp, irq); | |
a83f9823 DM |
829 | if (of_irq_verbose) |
830 | printk("%s: PCI swizzle [%s] " | |
831 | "%x --> %x\n", | |
832 | op->node->full_name, | |
833 | pp->full_name, this_orig_irq, | |
834 | irq); | |
835 | ||
2b1e5978 DM |
836 | } |
837 | ||
838 | if (pp->irq_trans) { | |
839 | ip = pp; | |
840 | break; | |
841 | } | |
842 | } | |
843 | dp = pp; | |
844 | pp = pp->parent; | |
845 | } | |
846 | if (!ip) | |
847 | return orig_irq; | |
848 | ||
849 | irq = ip->irq_trans->irq_build(op->node, irq, | |
850 | ip->irq_trans->data); | |
a83f9823 DM |
851 | if (of_irq_verbose) |
852 | printk("%s: Apply IRQ trans [%s] %x --> %x\n", | |
853 | op->node->full_name, ip->full_name, orig_irq, irq); | |
2b1e5978 DM |
854 | |
855 | return irq; | |
856 | } | |
857 | ||
cf44bbc2 DM |
858 | static struct of_device * __init scan_one_device(struct device_node *dp, |
859 | struct device *parent) | |
860 | { | |
861 | struct of_device *op = kzalloc(sizeof(*op), GFP_KERNEL); | |
862 | unsigned int *irq; | |
2b1e5978 | 863 | int len, i; |
cf44bbc2 DM |
864 | |
865 | if (!op) | |
866 | return NULL; | |
867 | ||
868 | op->node = dp; | |
869 | ||
870 | op->clock_freq = of_getintprop_default(dp, "clock-frequency", | |
871 | (25*1000*1000)); | |
872 | op->portid = of_getintprop_default(dp, "upa-portid", -1); | |
873 | if (op->portid == -1) | |
874 | op->portid = of_getintprop_default(dp, "portid", -1); | |
875 | ||
876 | irq = of_get_property(dp, "interrupts", &len); | |
2b1e5978 DM |
877 | if (irq) { |
878 | memcpy(op->irqs, irq, len); | |
879 | op->num_irqs = len / 4; | |
880 | } else { | |
881 | op->num_irqs = 0; | |
882 | } | |
cf44bbc2 | 883 | |
46ba6d7d DM |
884 | /* Prevent overruning the op->irqs[] array. */ |
885 | if (op->num_irqs > PROMINTR_MAX) { | |
886 | printk(KERN_WARNING "%s: Too many irqs (%d), " | |
887 | "limiting to %d.\n", | |
888 | dp->full_name, op->num_irqs, PROMINTR_MAX); | |
889 | op->num_irqs = PROMINTR_MAX; | |
890 | } | |
891 | ||
cf44bbc2 | 892 | build_device_resources(op, parent); |
2b1e5978 DM |
893 | for (i = 0; i < op->num_irqs; i++) |
894 | op->irqs[i] = build_one_device_irq(op, parent, op->irqs[i]); | |
cf44bbc2 DM |
895 | |
896 | op->dev.parent = parent; | |
897 | op->dev.bus = &of_bus_type; | |
898 | if (!parent) | |
899 | strcpy(op->dev.bus_id, "root"); | |
900 | else | |
f5ef9d11 | 901 | sprintf(op->dev.bus_id, "%08x", dp->node); |
cf44bbc2 DM |
902 | |
903 | if (of_device_register(op)) { | |
904 | printk("%s: Could not register of device.\n", | |
905 | dp->full_name); | |
906 | kfree(op); | |
907 | op = NULL; | |
908 | } | |
909 | ||
910 | return op; | |
911 | } | |
912 | ||
913 | static void __init scan_tree(struct device_node *dp, struct device *parent) | |
914 | { | |
915 | while (dp) { | |
916 | struct of_device *op = scan_one_device(dp, parent); | |
917 | ||
918 | if (op) | |
919 | scan_tree(dp->child, &op->dev); | |
920 | ||
921 | dp = dp->sibling; | |
922 | } | |
923 | } | |
924 | ||
925 | static void __init scan_of_devices(void) | |
926 | { | |
927 | struct device_node *root = of_find_node_by_path("/"); | |
928 | struct of_device *parent; | |
929 | ||
930 | parent = scan_one_device(root, NULL); | |
931 | if (!parent) | |
932 | return; | |
933 | ||
934 | scan_tree(root->child, &parent->dev); | |
935 | } | |
936 | ||
a2bd4fd1 DM |
937 | static int __init of_bus_driver_init(void) |
938 | { | |
cf44bbc2 | 939 | int err; |
a2bd4fd1 | 940 | |
cf44bbc2 | 941 | err = bus_register(&of_bus_type); |
a2bd4fd1 DM |
942 | #ifdef CONFIG_PCI |
943 | if (!err) | |
944 | err = bus_register(&isa_bus_type); | |
945 | if (!err) | |
946 | err = bus_register(&ebus_bus_type); | |
947 | #endif | |
948 | #ifdef CONFIG_SBUS | |
949 | if (!err) | |
950 | err = bus_register(&sbus_bus_type); | |
951 | #endif | |
cf44bbc2 DM |
952 | |
953 | if (!err) | |
954 | scan_of_devices(); | |
955 | ||
956 | return err; | |
a2bd4fd1 DM |
957 | } |
958 | ||
959 | postcore_initcall(of_bus_driver_init); | |
960 | ||
a83f9823 DM |
961 | static int __init of_debug(char *str) |
962 | { | |
963 | int val = 0; | |
964 | ||
965 | get_option(&str, &val); | |
966 | if (val & 1) | |
967 | of_resource_verbose = 1; | |
968 | if (val & 2) | |
969 | of_irq_verbose = 1; | |
970 | return 1; | |
971 | } | |
972 | ||
973 | __setup("of_debug=", of_debug); | |
974 | ||
a2bd4fd1 DM |
975 | int of_register_driver(struct of_platform_driver *drv, struct bus_type *bus) |
976 | { | |
977 | /* initialize common driver fields */ | |
978 | drv->driver.name = drv->name; | |
979 | drv->driver.bus = bus; | |
980 | ||
981 | /* register with core */ | |
982 | return driver_register(&drv->driver); | |
983 | } | |
984 | ||
985 | void of_unregister_driver(struct of_platform_driver *drv) | |
986 | { | |
987 | driver_unregister(&drv->driver); | |
988 | } | |
989 | ||
990 | ||
991 | static ssize_t dev_show_devspec(struct device *dev, struct device_attribute *attr, char *buf) | |
992 | { | |
993 | struct of_device *ofdev; | |
994 | ||
995 | ofdev = to_of_device(dev); | |
996 | return sprintf(buf, "%s", ofdev->node->full_name); | |
997 | } | |
998 | ||
999 | static DEVICE_ATTR(devspec, S_IRUGO, dev_show_devspec, NULL); | |
1000 | ||
1001 | /** | |
1002 | * of_release_dev - free an of device structure when all users of it are finished. | |
1003 | * @dev: device that's been disconnected | |
1004 | * | |
1005 | * Will be called only by the device core when all users of this of device are | |
1006 | * done. | |
1007 | */ | |
1008 | void of_release_dev(struct device *dev) | |
1009 | { | |
1010 | struct of_device *ofdev; | |
1011 | ||
1012 | ofdev = to_of_device(dev); | |
1013 | ||
1014 | kfree(ofdev); | |
1015 | } | |
1016 | ||
1017 | int of_device_register(struct of_device *ofdev) | |
1018 | { | |
1019 | int rc; | |
1020 | ||
1021 | BUG_ON(ofdev->node == NULL); | |
1022 | ||
1023 | rc = device_register(&ofdev->dev); | |
1024 | if (rc) | |
1025 | return rc; | |
1026 | ||
6cc8b6f5 AM |
1027 | rc = device_create_file(&ofdev->dev, &dev_attr_devspec); |
1028 | if (rc) | |
1029 | device_unregister(&ofdev->dev); | |
a2bd4fd1 | 1030 | |
6cc8b6f5 | 1031 | return rc; |
a2bd4fd1 DM |
1032 | } |
1033 | ||
1034 | void of_device_unregister(struct of_device *ofdev) | |
1035 | { | |
1036 | device_remove_file(&ofdev->dev, &dev_attr_devspec); | |
1037 | device_unregister(&ofdev->dev); | |
1038 | } | |
1039 | ||
1040 | struct of_device* of_platform_device_create(struct device_node *np, | |
1041 | const char *bus_id, | |
1042 | struct device *parent, | |
1043 | struct bus_type *bus) | |
1044 | { | |
1045 | struct of_device *dev; | |
1046 | ||
982c2064 | 1047 | dev = kzalloc(sizeof(*dev), GFP_KERNEL); |
a2bd4fd1 DM |
1048 | if (!dev) |
1049 | return NULL; | |
a2bd4fd1 DM |
1050 | |
1051 | dev->dev.parent = parent; | |
1052 | dev->dev.bus = bus; | |
1053 | dev->dev.release = of_release_dev; | |
1054 | ||
1055 | strlcpy(dev->dev.bus_id, bus_id, BUS_ID_SIZE); | |
1056 | ||
1057 | if (of_device_register(dev) != 0) { | |
1058 | kfree(dev); | |
1059 | return NULL; | |
1060 | } | |
1061 | ||
1062 | return dev; | |
1063 | } | |
1064 | ||
1065 | EXPORT_SYMBOL(of_match_device); | |
1066 | EXPORT_SYMBOL(of_register_driver); | |
1067 | EXPORT_SYMBOL(of_unregister_driver); | |
1068 | EXPORT_SYMBOL(of_device_register); | |
1069 | EXPORT_SYMBOL(of_device_unregister); | |
1070 | EXPORT_SYMBOL(of_dev_get); | |
1071 | EXPORT_SYMBOL(of_dev_put); | |
1072 | EXPORT_SYMBOL(of_platform_device_create); | |
1073 | EXPORT_SYMBOL(of_release_dev); |