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