Merge branch 'linux-2.6' into for-2.6.24
[linux-2.6] / arch / powerpc / platforms / cell / cbe_regs.c
1 /*
2  * cbe_regs.c
3  *
4  * Accessor routines for the various MMIO register blocks of the CBE
5  *
6  * (c) 2006 Benjamin Herrenschmidt <benh@kernel.crashing.org>, IBM Corp.
7  */
8
9 #include <linux/percpu.h>
10 #include <linux/types.h>
11 #include <linux/module.h>
12
13 #include <asm/io.h>
14 #include <asm/pgtable.h>
15 #include <asm/prom.h>
16 #include <asm/ptrace.h>
17 #include <asm/of_device.h>
18 #include <asm/of_platform.h>
19
20 #include "cbe_regs.h"
21
22 /*
23  * Current implementation uses "cpu" nodes. We build our own mapping
24  * array of cpu numbers to cpu nodes locally for now to allow interrupt
25  * time code to have a fast path rather than call of_get_cpu_node(). If
26  * we implement cpu hotplug, we'll have to install an appropriate norifier
27  * in order to release references to the cpu going away
28  */
29 static struct cbe_regs_map
30 {
31         struct device_node *cpu_node;
32         struct device_node *be_node;
33         struct cbe_pmd_regs __iomem *pmd_regs;
34         struct cbe_iic_regs __iomem *iic_regs;
35         struct cbe_mic_tm_regs __iomem *mic_tm_regs;
36         struct cbe_pmd_shadow_regs pmd_shadow_regs;
37 } cbe_regs_maps[MAX_CBE];
38 static int cbe_regs_map_count;
39
40 static struct cbe_thread_map
41 {
42         struct device_node *cpu_node;
43         struct device_node *be_node;
44         struct cbe_regs_map *regs;
45         unsigned int thread_id;
46         unsigned int cbe_id;
47 } cbe_thread_map[NR_CPUS];
48
49 static cpumask_t cbe_local_mask[MAX_CBE] = { [0 ... MAX_CBE-1] = CPU_MASK_NONE };
50 static cpumask_t cbe_first_online_cpu = CPU_MASK_NONE;
51
52 static struct cbe_regs_map *cbe_find_map(struct device_node *np)
53 {
54         int i;
55         struct device_node *tmp_np;
56
57         if (strcasecmp(np->type, "spe")) {
58                 for (i = 0; i < cbe_regs_map_count; i++)
59                         if (cbe_regs_maps[i].cpu_node == np ||
60                             cbe_regs_maps[i].be_node == np)
61                                 return &cbe_regs_maps[i];
62                 return NULL;
63         }
64
65         if (np->data)
66                 return np->data;
67
68         /* walk up path until cpu or be node was found */
69         tmp_np = np;
70         do {
71                 tmp_np = tmp_np->parent;
72                 /* on a correct devicetree we wont get up to root */
73                 BUG_ON(!tmp_np);
74         } while (strcasecmp(tmp_np->type, "cpu") &&
75                  strcasecmp(tmp_np->type, "be"));
76
77         np->data = cbe_find_map(tmp_np);
78
79         return np->data;
80 }
81
82 struct cbe_pmd_regs __iomem *cbe_get_pmd_regs(struct device_node *np)
83 {
84         struct cbe_regs_map *map = cbe_find_map(np);
85         if (map == NULL)
86                 return NULL;
87         return map->pmd_regs;
88 }
89 EXPORT_SYMBOL_GPL(cbe_get_pmd_regs);
90
91 struct cbe_pmd_regs __iomem *cbe_get_cpu_pmd_regs(int cpu)
92 {
93         struct cbe_regs_map *map = cbe_thread_map[cpu].regs;
94         if (map == NULL)
95                 return NULL;
96         return map->pmd_regs;
97 }
98 EXPORT_SYMBOL_GPL(cbe_get_cpu_pmd_regs);
99
100 struct cbe_pmd_shadow_regs *cbe_get_pmd_shadow_regs(struct device_node *np)
101 {
102         struct cbe_regs_map *map = cbe_find_map(np);
103         if (map == NULL)
104                 return NULL;
105         return &map->pmd_shadow_regs;
106 }
107
108 struct cbe_pmd_shadow_regs *cbe_get_cpu_pmd_shadow_regs(int cpu)
109 {
110         struct cbe_regs_map *map = cbe_thread_map[cpu].regs;
111         if (map == NULL)
112                 return NULL;
113         return &map->pmd_shadow_regs;
114 }
115
116 struct cbe_iic_regs __iomem *cbe_get_iic_regs(struct device_node *np)
117 {
118         struct cbe_regs_map *map = cbe_find_map(np);
119         if (map == NULL)
120                 return NULL;
121         return map->iic_regs;
122 }
123
124 struct cbe_iic_regs __iomem *cbe_get_cpu_iic_regs(int cpu)
125 {
126         struct cbe_regs_map *map = cbe_thread_map[cpu].regs;
127         if (map == NULL)
128                 return NULL;
129         return map->iic_regs;
130 }
131
132 struct cbe_mic_tm_regs __iomem *cbe_get_mic_tm_regs(struct device_node *np)
133 {
134         struct cbe_regs_map *map = cbe_find_map(np);
135         if (map == NULL)
136                 return NULL;
137         return map->mic_tm_regs;
138 }
139
140 struct cbe_mic_tm_regs __iomem *cbe_get_cpu_mic_tm_regs(int cpu)
141 {
142         struct cbe_regs_map *map = cbe_thread_map[cpu].regs;
143         if (map == NULL)
144                 return NULL;
145         return map->mic_tm_regs;
146 }
147 EXPORT_SYMBOL_GPL(cbe_get_cpu_mic_tm_regs);
148
149 u32 cbe_get_hw_thread_id(int cpu)
150 {
151         return cbe_thread_map[cpu].thread_id;
152 }
153 EXPORT_SYMBOL_GPL(cbe_get_hw_thread_id);
154
155 u32 cbe_cpu_to_node(int cpu)
156 {
157         return cbe_thread_map[cpu].cbe_id;
158 }
159 EXPORT_SYMBOL_GPL(cbe_cpu_to_node);
160
161 u32 cbe_node_to_cpu(int node)
162 {
163         return find_first_bit( (unsigned long *) &cbe_local_mask[node], sizeof(cpumask_t));
164 }
165 EXPORT_SYMBOL_GPL(cbe_node_to_cpu);
166
167 static struct device_node *cbe_get_be_node(int cpu_id)
168 {
169         struct device_node *np;
170
171         for_each_node_by_type (np, "be") {
172                 int len,i;
173                 const phandle *cpu_handle;
174
175                 cpu_handle = of_get_property(np, "cpus", &len);
176
177                 /*
178                  * the CAB SLOF tree is non compliant, so we just assume
179                  * there is only one node
180                  */
181                 if (WARN_ON_ONCE(!cpu_handle))
182                         return np;
183
184                 for (i=0; i<len; i++)
185                         if (of_find_node_by_phandle(cpu_handle[i]) == of_get_cpu_node(cpu_id, NULL))
186                                 return np;
187         }
188
189         return NULL;
190 }
191
192 void __init cbe_fill_regs_map(struct cbe_regs_map *map)
193 {
194         if(map->be_node) {
195                 struct device_node *be, *np;
196
197                 be = map->be_node;
198
199                 for_each_node_by_type(np, "pervasive")
200                         if (of_get_parent(np) == be)
201                                 map->pmd_regs = of_iomap(np, 0);
202
203                 for_each_node_by_type(np, "CBEA-Internal-Interrupt-Controller")
204                         if (of_get_parent(np) == be)
205                                 map->iic_regs = of_iomap(np, 2);
206
207                 for_each_node_by_type(np, "mic-tm")
208                         if (of_get_parent(np) == be)
209                                 map->mic_tm_regs = of_iomap(np, 0);
210         } else {
211                 struct device_node *cpu;
212                 /* That hack must die die die ! */
213                 const struct address_prop {
214                         unsigned long address;
215                         unsigned int len;
216                 } __attribute__((packed)) *prop;
217
218                 cpu = map->cpu_node;
219
220                 prop = of_get_property(cpu, "pervasive", NULL);
221                 if (prop != NULL)
222                         map->pmd_regs = ioremap(prop->address, prop->len);
223
224                 prop = of_get_property(cpu, "iic", NULL);
225                 if (prop != NULL)
226                         map->iic_regs = ioremap(prop->address, prop->len);
227
228                 prop = of_get_property(cpu, "mic-tm", NULL);
229                 if (prop != NULL)
230                         map->mic_tm_regs = ioremap(prop->address, prop->len);
231         }
232 }
233
234
235 void __init cbe_regs_init(void)
236 {
237         int i;
238         unsigned int thread_id;
239         struct device_node *cpu;
240
241         /* Build local fast map of CPUs */
242         for_each_possible_cpu(i) {
243                 cbe_thread_map[i].cpu_node = of_get_cpu_node(i, &thread_id);
244                 cbe_thread_map[i].be_node = cbe_get_be_node(i);
245                 cbe_thread_map[i].thread_id = thread_id;
246         }
247
248         /* Find maps for each device tree CPU */
249         for_each_node_by_type(cpu, "cpu") {
250                 struct cbe_regs_map *map;
251                 unsigned int cbe_id;
252
253                 cbe_id = cbe_regs_map_count++;
254                 map = &cbe_regs_maps[cbe_id];
255
256                 if (cbe_regs_map_count > MAX_CBE) {
257                         printk(KERN_ERR "cbe_regs: More BE chips than supported"
258                                "!\n");
259                         cbe_regs_map_count--;
260                         return;
261                 }
262                 map->cpu_node = cpu;
263
264                 for_each_possible_cpu(i) {
265                         struct cbe_thread_map *thread = &cbe_thread_map[i];
266
267                         if (thread->cpu_node == cpu) {
268                                 thread->regs = map;
269                                 thread->cbe_id = cbe_id;
270                                 map->be_node = thread->be_node;
271                                 cpu_set(i, cbe_local_mask[cbe_id]);
272                                 if(thread->thread_id == 0)
273                                         cpu_set(i, cbe_first_online_cpu);
274                         }
275                 }
276
277                 cbe_fill_regs_map(map);
278         }
279 }
280