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/export.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_BITS_NONE} };
49 static cpumask_t cbe_first_online_cpu = { CPU_BITS_NONE };
50 
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 
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 
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 
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 
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 
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 
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 
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 
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 
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 
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 
160 u32 cbe_node_to_cpu(int node)
161 {
162 	return cpumask_first(&cbe_local_mask[node]);
163 
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 			of_node_put(cpu);
261 			return;
262 		}
263 		map->cpu_node = cpu;
264 
265 		for_each_possible_cpu(i) {
266 			struct cbe_thread_map *thread = &cbe_thread_map[i];
267 
268 			if (thread->cpu_node == cpu) {
269 				thread->regs = map;
270 				thread->cbe_id = cbe_id;
271 				map->be_node = thread->be_node;
272 				cpumask_set_cpu(i, &cbe_local_mask[cbe_id]);
273 				if(thread->thread_id == 0)
274 					cpumask_set_cpu(i, &cbe_first_online_cpu);
275 			}
276 		}
277 
278 		cbe_fill_regs_map(map);
279 	}
280 }
281 
282