Pull bugzilla-8459 into release branch
[linux-2.6] / drivers / sbus / sbus.c
1 /* sbus.c: SBus support routines.
2  *
3  * Copyright (C) 1995, 2006 David S. Miller (davem@davemloft.net)
4  */
5
6 #include <linux/kernel.h>
7 #include <linux/slab.h>
8 #include <linux/init.h>
9 #include <linux/device.h>
10
11 #include <asm/system.h>
12 #include <asm/sbus.h>
13 #include <asm/dma.h>
14 #include <asm/oplib.h>
15 #include <asm/prom.h>
16 #include <asm/of_device.h>
17 #include <asm/bpp.h>
18 #include <asm/irq.h>
19
20 static ssize_t
21 show_sbusobppath_attr(struct device * dev, struct device_attribute * attr, char * buf)
22 {
23         struct sbus_dev *sbus;
24
25         sbus = to_sbus_device(dev);
26
27         return snprintf (buf, PAGE_SIZE, "%s\n", sbus->ofdev.node->full_name);
28 }
29
30 static DEVICE_ATTR(obppath, S_IRUSR | S_IRGRP | S_IROTH, show_sbusobppath_attr, NULL);
31
32 struct sbus_bus *sbus_root;
33
34 static void __init fill_sbus_device(struct device_node *dp, struct sbus_dev *sdev)
35 {
36         struct dev_archdata *sd;
37         unsigned long base;
38         const void *pval;
39         int len, err;
40
41         sdev->prom_node = dp->node;
42         strcpy(sdev->prom_name, dp->name);
43
44         pval = of_get_property(dp, "reg", &len);
45         sdev->num_registers = 0;
46         if (pval) {
47                 memcpy(sdev->reg_addrs, pval, len);
48
49                 sdev->num_registers =
50                         len / sizeof(struct linux_prom_registers);
51
52                 base = (unsigned long) sdev->reg_addrs[0].phys_addr;
53
54                 /* Compute the slot number. */
55                 if (base >= SUN_SBUS_BVADDR && sparc_cpu_model == sun4m)
56                         sdev->slot = sbus_dev_slot(base);
57                 else
58                         sdev->slot = sdev->reg_addrs[0].which_io;
59         }
60
61         pval = of_get_property(dp, "ranges", &len);
62         sdev->num_device_ranges = 0;
63         if (pval) {
64                 memcpy(sdev->device_ranges, pval, len);
65                 sdev->num_device_ranges =
66                         len / sizeof(struct linux_prom_ranges);
67         }
68
69         sbus_fill_device_irq(sdev);
70
71         sd = &sdev->ofdev.dev.archdata;
72         sd->prom_node = dp;
73         sd->op = &sdev->ofdev;
74
75         sdev->ofdev.node = dp;
76         if (sdev->parent)
77                 sdev->ofdev.dev.parent = &sdev->parent->ofdev.dev;
78         else
79                 sdev->ofdev.dev.parent = &sdev->bus->ofdev.dev;
80         sdev->ofdev.dev.bus = &sbus_bus_type;
81         sprintf(sdev->ofdev.dev.bus_id, "sbus[%08x]", dp->node);
82
83         if (of_device_register(&sdev->ofdev) != 0)
84                 printk(KERN_DEBUG "sbus: device registration error for %s!\n",
85                        dp->path_component_name);
86
87         /* WE HAVE BEEN INVADED BY ALIENS! */
88         err = sysfs_create_file(&sdev->ofdev.dev.kobj, &dev_attr_obppath.attr);
89 }
90
91 static void __init sbus_bus_ranges_init(struct device_node *dp, struct sbus_bus *sbus)
92 {
93         const void *pval;
94         int len;
95
96         pval = of_get_property(dp, "ranges", &len);
97         sbus->num_sbus_ranges = 0;
98         if (pval) {
99                 memcpy(sbus->sbus_ranges, pval, len);
100                 sbus->num_sbus_ranges =
101                         len / sizeof(struct linux_prom_ranges);
102
103                 sbus_arch_bus_ranges_init(dp->parent, sbus);
104         }
105 }
106
107 static void __init __apply_ranges_to_regs(struct linux_prom_ranges *ranges,
108                                           int num_ranges,
109                                           struct linux_prom_registers *regs,
110                                           int num_regs)
111 {
112         if (num_ranges) {
113                 int regnum;
114
115                 for (regnum = 0; regnum < num_regs; regnum++) {
116                         int rngnum;
117
118                         for (rngnum = 0; rngnum < num_ranges; rngnum++) {
119                                 if (regs[regnum].which_io == ranges[rngnum].ot_child_space)
120                                         break;
121                         }
122                         if (rngnum == num_ranges) {
123                                 /* We used to flag this as an error.  Actually
124                                  * some devices do not report the regs as we expect.
125                                  * For example, see SUNW,pln device.  In that case
126                                  * the reg property is in a format internal to that
127                                  * node, ie. it is not in the SBUS register space
128                                  * per se. -DaveM
129                                  */
130                                 return;
131                         }
132                         regs[regnum].which_io = ranges[rngnum].ot_parent_space;
133                         regs[regnum].phys_addr -= ranges[rngnum].ot_child_base;
134                         regs[regnum].phys_addr += ranges[rngnum].ot_parent_base;
135                 }
136         }
137 }
138
139 static void __init __fixup_regs_sdev(struct sbus_dev *sdev)
140 {
141         if (sdev->num_registers != 0) {
142                 struct sbus_dev *parent = sdev->parent;
143                 int i;
144
145                 while (parent != NULL) {
146                         __apply_ranges_to_regs(parent->device_ranges,
147                                                parent->num_device_ranges,
148                                                sdev->reg_addrs,
149                                                sdev->num_registers);
150
151                         parent = parent->parent;
152                 }
153
154                 __apply_ranges_to_regs(sdev->bus->sbus_ranges,
155                                        sdev->bus->num_sbus_ranges,
156                                        sdev->reg_addrs,
157                                        sdev->num_registers);
158
159                 for (i = 0; i < sdev->num_registers; i++) {
160                         struct resource *res = &sdev->resource[i];
161
162                         res->start = sdev->reg_addrs[i].phys_addr;
163                         res->end = (res->start +
164                                     (unsigned long)sdev->reg_addrs[i].reg_size - 1UL);
165                         res->flags = IORESOURCE_IO |
166                                 (sdev->reg_addrs[i].which_io & 0xff);
167                 }
168         }
169 }
170
171 static void __init sbus_fixup_all_regs(struct sbus_dev *first_sdev)
172 {
173         struct sbus_dev *sdev;
174
175         for (sdev = first_sdev; sdev; sdev = sdev->next) {
176                 if (sdev->child)
177                         sbus_fixup_all_regs(sdev->child);
178                 __fixup_regs_sdev(sdev);
179         }
180 }
181
182 /* We preserve the "probe order" of these bus and device lists to give
183  * the same ordering as the old code.
184  */
185 static void __init sbus_insert(struct sbus_bus *sbus, struct sbus_bus **root)
186 {
187         while (*root)
188                 root = &(*root)->next;
189         *root = sbus;
190         sbus->next = NULL;
191 }
192
193 static void __init sdev_insert(struct sbus_dev *sdev, struct sbus_dev **root)
194 {
195         while (*root)
196                 root = &(*root)->next;
197         *root = sdev;
198         sdev->next = NULL;
199 }
200
201 static void __init walk_children(struct device_node *dp, struct sbus_dev *parent, struct sbus_bus *sbus)
202 {
203         dp = dp->child;
204         while (dp) {
205                 struct sbus_dev *sdev;
206
207                 sdev = kzalloc(sizeof(struct sbus_dev), GFP_ATOMIC);
208                 if (sdev) {
209                         sdev_insert(sdev, &parent->child);
210
211                         sdev->bus = sbus;
212                         sdev->parent = parent;
213                         sdev->ofdev.dev.archdata.iommu =
214                                 sbus->ofdev.dev.archdata.iommu;
215                         sdev->ofdev.dev.archdata.stc =
216                                 sbus->ofdev.dev.archdata.stc;
217
218                         fill_sbus_device(dp, sdev);
219
220                         walk_children(dp, sdev, sbus);
221                 }
222                 dp = dp->sibling;
223         }
224 }
225
226 static void __init build_one_sbus(struct device_node *dp, int num_sbus)
227 {
228         struct sbus_bus *sbus;
229         unsigned int sbus_clock;
230         struct device_node *dev_dp;
231
232         sbus = kzalloc(sizeof(struct sbus_bus), GFP_ATOMIC);
233         if (!sbus)
234                 return;
235
236         sbus_insert(sbus, &sbus_root);
237         sbus->prom_node = dp->node;
238
239         sbus_setup_iommu(sbus, dp);
240
241         printk("sbus%d: ", num_sbus);
242
243         sbus_clock = of_getintprop_default(dp, "clock-frequency",
244                                            (25*1000*1000));
245         sbus->clock_freq = sbus_clock;
246
247         printk("Clock %d.%d MHz\n", (int) ((sbus_clock/1000)/1000),
248                (int) (((sbus_clock/1000)%1000 != 0) ? 
249                       (((sbus_clock/1000)%1000) + 1000) : 0));
250
251         strcpy(sbus->prom_name, dp->name);
252
253         sbus_setup_arch_props(sbus, dp);
254
255         sbus_bus_ranges_init(dp, sbus);
256
257         sbus->ofdev.node = dp;
258         sbus->ofdev.dev.parent = NULL;
259         sbus->ofdev.dev.bus = &sbus_bus_type;
260         sprintf(sbus->ofdev.dev.bus_id, "sbus%d", num_sbus);
261
262         if (of_device_register(&sbus->ofdev) != 0)
263                 printk(KERN_DEBUG "sbus: device registration error for %s!\n",
264                        sbus->ofdev.dev.bus_id);
265
266         dev_dp = dp->child;
267         while (dev_dp) {
268                 struct sbus_dev *sdev;
269
270                 sdev = kzalloc(sizeof(struct sbus_dev), GFP_ATOMIC);
271                 if (sdev) {
272                         sdev_insert(sdev, &sbus->devices);
273
274                         sdev->bus = sbus;
275                         sdev->parent = NULL;
276                         sdev->ofdev.dev.archdata.iommu =
277                                 sbus->ofdev.dev.archdata.iommu;
278                         sdev->ofdev.dev.archdata.stc =
279                                 sbus->ofdev.dev.archdata.stc;
280
281                         fill_sbus_device(dev_dp, sdev);
282
283                         walk_children(dev_dp, sdev, sbus);
284                 }
285                 dev_dp = dev_dp->sibling;
286         }
287
288         sbus_fixup_all_regs(sbus->devices);
289
290         dvma_init(sbus);
291 }
292
293 static int __init sbus_init(void)
294 {
295         struct device_node *dp;
296         const char *sbus_name = "sbus";
297         int num_sbus = 0;
298
299         if (sbus_arch_preinit())
300                 return 0;
301
302         if (sparc_cpu_model == sun4d)
303                 sbus_name = "sbi";
304
305         for_each_node_by_name(dp, sbus_name) {
306                 build_one_sbus(dp, num_sbus);
307                 num_sbus++;
308
309         }
310
311         sbus_arch_postinit();
312
313         return 0;
314 }
315
316 subsys_initcall(sbus_init);