[SPARC/64]: Prepare to remove of_platform_driver name.
[linux-2.6/linux-acpi-2.6/ibm-acpi-2.6.git] / arch / sparc / kernel / of_device.c
blobfb2caef79cec407f0e36497567902c88c88b2418
1 #include <linux/string.h>
2 #include <linux/kernel.h>
3 #include <linux/of.h>
4 #include <linux/init.h>
5 #include <linux/module.h>
6 #include <linux/mod_devicetable.h>
7 #include <linux/slab.h>
8 #include <linux/errno.h>
9 #include <linux/of_device.h>
10 #include <linux/of_platform.h>
12 static int node_match(struct device *dev, void *data)
14 struct of_device *op = to_of_device(dev);
15 struct device_node *dp = data;
17 return (op->node == dp);
20 struct of_device *of_find_device_by_node(struct device_node *dp)
22 struct device *dev = bus_find_device(&of_platform_bus_type, NULL,
23 dp, node_match);
25 if (dev)
26 return to_of_device(dev);
28 return NULL;
30 EXPORT_SYMBOL(of_find_device_by_node);
32 #ifdef CONFIG_PCI
33 struct bus_type ebus_bus_type;
34 EXPORT_SYMBOL(ebus_bus_type);
35 #endif
37 #ifdef CONFIG_SBUS
38 struct bus_type sbus_bus_type;
39 EXPORT_SYMBOL(sbus_bus_type);
40 #endif
42 struct bus_type of_platform_bus_type;
43 EXPORT_SYMBOL(of_platform_bus_type);
45 static inline u64 of_read_addr(const u32 *cell, int size)
47 u64 r = 0;
48 while (size--)
49 r = (r << 32) | *(cell++);
50 return r;
53 static void __init get_cells(struct device_node *dp,
54 int *addrc, int *sizec)
56 if (addrc)
57 *addrc = of_n_addr_cells(dp);
58 if (sizec)
59 *sizec = of_n_size_cells(dp);
62 /* Max address size we deal with */
63 #define OF_MAX_ADDR_CELLS 4
65 struct of_bus {
66 const char *name;
67 const char *addr_prop_name;
68 int (*match)(struct device_node *parent);
69 void (*count_cells)(struct device_node *child,
70 int *addrc, int *sizec);
71 int (*map)(u32 *addr, const u32 *range,
72 int na, int ns, int pna);
73 unsigned int (*get_flags)(const u32 *addr);
77 * Default translator (generic bus)
80 static void of_bus_default_count_cells(struct device_node *dev,
81 int *addrc, int *sizec)
83 get_cells(dev, addrc, sizec);
86 /* Make sure the least significant 64-bits are in-range. Even
87 * for 3 or 4 cell values it is a good enough approximation.
89 static int of_out_of_range(const u32 *addr, const u32 *base,
90 const u32 *size, int na, int ns)
92 u64 a = of_read_addr(addr, na);
93 u64 b = of_read_addr(base, na);
95 if (a < b)
96 return 1;
98 b += of_read_addr(size, ns);
99 if (a >= b)
100 return 1;
102 return 0;
105 static int of_bus_default_map(u32 *addr, const u32 *range,
106 int na, int ns, int pna)
108 u32 result[OF_MAX_ADDR_CELLS];
109 int i;
111 if (ns > 2) {
112 printk("of_device: Cannot handle size cells (%d) > 2.", ns);
113 return -EINVAL;
116 if (of_out_of_range(addr, range, range + na + pna, na, ns))
117 return -EINVAL;
119 /* Start with the parent range base. */
120 memcpy(result, range + na, pna * 4);
122 /* Add in the child address offset. */
123 for (i = 0; i < na; i++)
124 result[pna - 1 - i] +=
125 (addr[na - 1 - i] -
126 range[na - 1 - i]);
128 memcpy(addr, result, pna * 4);
130 return 0;
133 static unsigned int of_bus_default_get_flags(const u32 *addr)
135 return IORESOURCE_MEM;
139 * PCI bus specific translator
142 static int of_bus_pci_match(struct device_node *np)
144 if (!strcmp(np->type, "pci") || !strcmp(np->type, "pciex")) {
145 /* Do not do PCI specific frobbing if the
146 * PCI bridge lacks a ranges property. We
147 * want to pass it through up to the next
148 * parent as-is, not with the PCI translate
149 * method which chops off the top address cell.
151 if (!of_find_property(np, "ranges", NULL))
152 return 0;
154 return 1;
157 return 0;
160 static void of_bus_pci_count_cells(struct device_node *np,
161 int *addrc, int *sizec)
163 if (addrc)
164 *addrc = 3;
165 if (sizec)
166 *sizec = 2;
169 static int of_bus_pci_map(u32 *addr, const u32 *range,
170 int na, int ns, int pna)
172 u32 result[OF_MAX_ADDR_CELLS];
173 int i;
175 /* Check address type match */
176 if ((addr[0] ^ range[0]) & 0x03000000)
177 return -EINVAL;
179 if (of_out_of_range(addr + 1, range + 1, range + na + pna,
180 na - 1, ns))
181 return -EINVAL;
183 /* Start with the parent range base. */
184 memcpy(result, range + na, pna * 4);
186 /* Add in the child address offset, skipping high cell. */
187 for (i = 0; i < na - 1; i++)
188 result[pna - 1 - i] +=
189 (addr[na - 1 - i] -
190 range[na - 1 - i]);
192 memcpy(addr, result, pna * 4);
194 return 0;
197 static unsigned int of_bus_pci_get_flags(const u32 *addr)
199 unsigned int flags = 0;
200 u32 w = addr[0];
202 switch((w >> 24) & 0x03) {
203 case 0x01:
204 flags |= IORESOURCE_IO;
205 case 0x02: /* 32 bits */
206 case 0x03: /* 64 bits */
207 flags |= IORESOURCE_MEM;
209 if (w & 0x40000000)
210 flags |= IORESOURCE_PREFETCH;
211 return flags;
215 * SBUS bus specific translator
218 static int of_bus_sbus_match(struct device_node *np)
220 return !strcmp(np->name, "sbus") ||
221 !strcmp(np->name, "sbi");
224 static void of_bus_sbus_count_cells(struct device_node *child,
225 int *addrc, int *sizec)
227 if (addrc)
228 *addrc = 2;
229 if (sizec)
230 *sizec = 1;
233 static int of_bus_sbus_map(u32 *addr, const u32 *range, int na, int ns, int pna)
235 return of_bus_default_map(addr, range, na, ns, pna);
238 static unsigned int of_bus_sbus_get_flags(const u32 *addr)
240 return IORESOURCE_MEM;
245 * Array of bus specific translators
248 static struct of_bus of_busses[] = {
249 /* PCI */
251 .name = "pci",
252 .addr_prop_name = "assigned-addresses",
253 .match = of_bus_pci_match,
254 .count_cells = of_bus_pci_count_cells,
255 .map = of_bus_pci_map,
256 .get_flags = of_bus_pci_get_flags,
258 /* SBUS */
260 .name = "sbus",
261 .addr_prop_name = "reg",
262 .match = of_bus_sbus_match,
263 .count_cells = of_bus_sbus_count_cells,
264 .map = of_bus_sbus_map,
265 .get_flags = of_bus_sbus_get_flags,
267 /* Default */
269 .name = "default",
270 .addr_prop_name = "reg",
271 .match = NULL,
272 .count_cells = of_bus_default_count_cells,
273 .map = of_bus_default_map,
274 .get_flags = of_bus_default_get_flags,
278 static struct of_bus *of_match_bus(struct device_node *np)
280 int i;
282 for (i = 0; i < ARRAY_SIZE(of_busses); i ++)
283 if (!of_busses[i].match || of_busses[i].match(np))
284 return &of_busses[i];
285 BUG();
286 return NULL;
289 static int __init build_one_resource(struct device_node *parent,
290 struct of_bus *bus,
291 struct of_bus *pbus,
292 u32 *addr,
293 int na, int ns, int pna)
295 const u32 *ranges;
296 unsigned int rlen;
297 int rone;
299 ranges = of_get_property(parent, "ranges", &rlen);
300 if (ranges == NULL || rlen == 0) {
301 u32 result[OF_MAX_ADDR_CELLS];
302 int i;
304 memset(result, 0, pna * 4);
305 for (i = 0; i < na; i++)
306 result[pna - 1 - i] =
307 addr[na - 1 - i];
309 memcpy(addr, result, pna * 4);
310 return 0;
313 /* Now walk through the ranges */
314 rlen /= 4;
315 rone = na + pna + ns;
316 for (; rlen >= rone; rlen -= rone, ranges += rone) {
317 if (!bus->map(addr, ranges, na, ns, pna))
318 return 0;
321 return 1;
324 static int of_resource_verbose;
326 static void __init build_device_resources(struct of_device *op,
327 struct device *parent)
329 struct of_device *p_op;
330 struct of_bus *bus;
331 int na, ns;
332 int index, num_reg;
333 const void *preg;
335 if (!parent)
336 return;
338 p_op = to_of_device(parent);
339 bus = of_match_bus(p_op->node);
340 bus->count_cells(op->node, &na, &ns);
342 preg = of_get_property(op->node, bus->addr_prop_name, &num_reg);
343 if (!preg || num_reg == 0)
344 return;
346 /* Convert to num-cells. */
347 num_reg /= 4;
349 /* Conver to num-entries. */
350 num_reg /= na + ns;
352 for (index = 0; index < num_reg; index++) {
353 struct resource *r = &op->resource[index];
354 u32 addr[OF_MAX_ADDR_CELLS];
355 const u32 *reg = (preg + (index * ((na + ns) * 4)));
356 struct device_node *dp = op->node;
357 struct device_node *pp = p_op->node;
358 struct of_bus *pbus, *dbus;
359 u64 size, result = OF_BAD_ADDR;
360 unsigned long flags;
361 int dna, dns;
362 int pna, pns;
364 size = of_read_addr(reg + na, ns);
365 flags = bus->get_flags(reg);
367 memcpy(addr, reg, na * 4);
369 /* If the immediate parent has no ranges property to apply,
370 * just use a 1<->1 mapping.
372 if (of_find_property(pp, "ranges", NULL) == NULL) {
373 result = of_read_addr(addr, na);
374 goto build_res;
377 dna = na;
378 dns = ns;
379 dbus = bus;
381 while (1) {
382 dp = pp;
383 pp = dp->parent;
384 if (!pp) {
385 result = of_read_addr(addr, dna);
386 break;
389 pbus = of_match_bus(pp);
390 pbus->count_cells(dp, &pna, &pns);
392 if (build_one_resource(dp, dbus, pbus, addr,
393 dna, dns, pna))
394 break;
396 dna = pna;
397 dns = pns;
398 dbus = pbus;
401 build_res:
402 memset(r, 0, sizeof(*r));
404 if (of_resource_verbose)
405 printk("%s reg[%d] -> %llx\n",
406 op->node->full_name, index,
407 result);
409 if (result != OF_BAD_ADDR) {
410 r->start = result & 0xffffffff;
411 r->end = result + size - 1;
412 r->flags = flags | ((result >> 32ULL) & 0xffUL);
414 r->name = op->node->name;
418 static struct of_device * __init scan_one_device(struct device_node *dp,
419 struct device *parent)
421 struct of_device *op = kzalloc(sizeof(*op), GFP_KERNEL);
422 const struct linux_prom_irqs *intr;
423 struct dev_archdata *sd;
424 int len, i;
426 if (!op)
427 return NULL;
429 sd = &op->dev.archdata;
430 sd->prom_node = dp;
431 sd->op = op;
433 op->node = dp;
435 op->clock_freq = of_getintprop_default(dp, "clock-frequency",
436 (25*1000*1000));
437 op->portid = of_getintprop_default(dp, "upa-portid", -1);
438 if (op->portid == -1)
439 op->portid = of_getintprop_default(dp, "portid", -1);
441 intr = of_get_property(dp, "intr", &len);
442 if (intr) {
443 op->num_irqs = len / sizeof(struct linux_prom_irqs);
444 for (i = 0; i < op->num_irqs; i++)
445 op->irqs[i] = intr[i].pri;
446 } else {
447 const unsigned int *irq =
448 of_get_property(dp, "interrupts", &len);
450 if (irq) {
451 op->num_irqs = len / sizeof(unsigned int);
452 for (i = 0; i < op->num_irqs; i++)
453 op->irqs[i] = irq[i];
454 } else {
455 op->num_irqs = 0;
458 if (sparc_cpu_model == sun4d) {
459 static int pil_to_sbus[] = {
460 0, 0, 1, 2, 0, 3, 0, 4, 0, 5, 0, 6, 0, 7, 0, 0,
462 struct device_node *io_unit, *sbi = dp->parent;
463 const struct linux_prom_registers *regs;
464 int board, slot;
466 while (sbi) {
467 if (!strcmp(sbi->name, "sbi"))
468 break;
470 sbi = sbi->parent;
472 if (!sbi)
473 goto build_resources;
475 regs = of_get_property(dp, "reg", NULL);
476 if (!regs)
477 goto build_resources;
479 slot = regs->which_io;
481 /* If SBI's parent is not io-unit or the io-unit lacks
482 * a "board#" property, something is very wrong.
484 if (!sbi->parent || strcmp(sbi->parent->name, "io-unit")) {
485 printk("%s: Error, parent is not io-unit.\n",
486 sbi->full_name);
487 goto build_resources;
489 io_unit = sbi->parent;
490 board = of_getintprop_default(io_unit, "board#", -1);
491 if (board == -1) {
492 printk("%s: Error, lacks board# property.\n",
493 io_unit->full_name);
494 goto build_resources;
497 for (i = 0; i < op->num_irqs; i++) {
498 int this_irq = op->irqs[i];
499 int sbusl = pil_to_sbus[this_irq];
501 if (sbusl)
502 this_irq = (((board + 1) << 5) +
503 (sbusl << 2) +
504 slot);
506 op->irqs[i] = this_irq;
510 build_resources:
511 build_device_resources(op, parent);
513 op->dev.parent = parent;
514 op->dev.bus = &of_platform_bus_type;
515 if (!parent)
516 strcpy(op->dev.bus_id, "root");
517 else
518 sprintf(op->dev.bus_id, "%08x", dp->node);
520 if (of_device_register(op)) {
521 printk("%s: Could not register of device.\n",
522 dp->full_name);
523 kfree(op);
524 op = NULL;
527 return op;
530 static void __init scan_tree(struct device_node *dp, struct device *parent)
532 while (dp) {
533 struct of_device *op = scan_one_device(dp, parent);
535 if (op)
536 scan_tree(dp->child, &op->dev);
538 dp = dp->sibling;
542 static void __init scan_of_devices(void)
544 struct device_node *root = of_find_node_by_path("/");
545 struct of_device *parent;
547 parent = scan_one_device(root, NULL);
548 if (!parent)
549 return;
551 scan_tree(root->child, &parent->dev);
554 static int __init of_bus_driver_init(void)
556 int err;
558 err = of_bus_type_init(&of_platform_bus_type, "of");
559 #ifdef CONFIG_PCI
560 if (!err)
561 err = of_bus_type_init(&ebus_bus_type, "ebus");
562 #endif
563 #ifdef CONFIG_SBUS
564 if (!err)
565 err = of_bus_type_init(&sbus_bus_type, "sbus");
566 #endif
568 if (!err)
569 scan_of_devices();
571 return err;
574 postcore_initcall(of_bus_driver_init);
576 static int __init of_debug(char *str)
578 int val = 0;
580 get_option(&str, &val);
581 if (val & 1)
582 of_resource_verbose = 1;
583 return 1;
586 __setup("of_debug=", of_debug);
588 int of_register_driver(struct of_platform_driver *drv, struct bus_type *bus)
590 /* initialize common driver fields */
591 if (!drv->driver.name)
592 drv->driver.name = drv->name;
593 if (!drv->driver.owner)
594 drv->driver.owner = drv->owner;
595 drv->driver.bus = bus;
597 /* register with core */
598 return driver_register(&drv->driver);
601 void of_unregister_driver(struct of_platform_driver *drv)
603 driver_unregister(&drv->driver);
606 struct of_device* of_platform_device_create(struct device_node *np,
607 const char *bus_id,
608 struct device *parent,
609 struct bus_type *bus)
611 struct of_device *dev;
613 dev = kzalloc(sizeof(*dev), GFP_KERNEL);
614 if (!dev)
615 return NULL;
617 dev->dev.parent = parent;
618 dev->dev.bus = bus;
619 dev->dev.release = of_release_dev;
621 strlcpy(dev->dev.bus_id, bus_id, BUS_ID_SIZE);
623 if (of_device_register(dev) != 0) {
624 kfree(dev);
625 return NULL;
628 return dev;
631 EXPORT_SYMBOL(of_register_driver);
632 EXPORT_SYMBOL(of_unregister_driver);
633 EXPORT_SYMBOL(of_platform_device_create);