1 /*
2  * IBM PowerPC IBM eBus Infrastructure Support.
3  *
4  * Copyright (c) 2005 IBM Corporation
5  *  Joachim Fenkes <fenkes@de.ibm.com>
6  *  Heiko J Schick <schickhj@de.ibm.com>
7  *
8  * All rights reserved.
9  *
10  * This source code is distributed under a dual license of GPL v2.0 and OpenIB
11  * BSD.
12  *
13  * OpenIB BSD License
14  *
15  * Redistribution and use in source and binary forms, with or without
16  * modification, are permitted provided that the following conditions are met:
17  *
18  * Redistributions of source code must retain the above copyright notice, this
19  * list of conditions and the following disclaimer.
20  *
21  * Redistributions in binary form must reproduce the above copyright notice,
22  * this list of conditions and the following disclaimer in the documentation
23  * and/or other materials
24  * provided with the distribution.
25  *
26  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
27  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
30  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
33  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
34  * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36  * POSSIBILITY OF SUCH DAMAGE.
37  */
38 
39 #include <linux/init.h>
40 #include <linux/export.h>
41 #include <linux/console.h>
42 #include <linux/kobject.h>
43 #include <linux/dma-map-ops.h>
44 #include <linux/interrupt.h>
45 #include <linux/irqdomain.h>
46 #include <linux/of.h>
47 #include <linux/slab.h>
48 #include <linux/stat.h>
49 #include <linux/of_platform.h>
50 #include <asm/ibmebus.h>
51 #include <asm/machdep.h>
52 
53 static struct device ibmebus_bus_device = { /* fake "parent" device */
54 	.init_name = "ibmebus",
55 };
56 
57 struct bus_type ibmebus_bus_type;
58 
59 /* These devices will automatically be added to the bus during init */
60 static const struct of_device_id ibmebus_matches[] __initconst = {
61 	{ .compatible = "IBM,lhca" },
62 	{ .compatible = "IBM,lhea" },
63 	{},
64 };
65 
66 static void *ibmebus_alloc_coherent(struct device *dev,
67 				    size_t size,
68 				    dma_addr_t *dma_handle,
69 				    gfp_t flag,
70 				    unsigned long attrs)
71 {
72 	void *mem;
73 
74 	mem = kmalloc(size, flag);
75 	*dma_handle = (dma_addr_t)mem;
76 
77 	return mem;
78 }
79 
80 static void ibmebus_free_coherent(struct device *dev,
81 				  size_t size, void *vaddr,
82 				  dma_addr_t dma_handle,
83 				  unsigned long attrs)
84 {
85 	kfree(vaddr);
86 }
87 
88 static dma_addr_t ibmebus_map_page(struct device *dev,
89 				   struct page *page,
90 				   unsigned long offset,
91 				   size_t size,
92 				   enum dma_data_direction direction,
93 				   unsigned long attrs)
94 {
95 	return (dma_addr_t)(page_address(page) + offset);
96 }
97 
98 static void ibmebus_unmap_page(struct device *dev,
99 			       dma_addr_t dma_addr,
100 			       size_t size,
101 			       enum dma_data_direction direction,
102 			       unsigned long attrs)
103 {
104 	return;
105 }
106 
107 static int ibmebus_map_sg(struct device *dev,
108 			  struct scatterlist *sgl,
109 			  int nents, enum dma_data_direction direction,
110 			  unsigned long attrs)
111 {
112 	struct scatterlist *sg;
113 	int i;
114 
115 	for_each_sg(sgl, sg, nents, i) {
116 		sg->dma_address = (dma_addr_t) sg_virt(sg);
117 		sg->dma_length = sg->length;
118 	}
119 
120 	return nents;
121 }
122 
123 static void ibmebus_unmap_sg(struct device *dev,
124 			     struct scatterlist *sg,
125 			     int nents, enum dma_data_direction direction,
126 			     unsigned long attrs)
127 {
128 	return;
129 }
130 
131 static int ibmebus_dma_supported(struct device *dev, u64 mask)
132 {
133 	return mask == DMA_BIT_MASK(64);
134 }
135 
136 static u64 ibmebus_dma_get_required_mask(struct device *dev)
137 {
138 	return DMA_BIT_MASK(64);
139 }
140 
141 static const struct dma_map_ops ibmebus_dma_ops = {
142 	.alloc              = ibmebus_alloc_coherent,
143 	.free               = ibmebus_free_coherent,
144 	.map_sg             = ibmebus_map_sg,
145 	.unmap_sg           = ibmebus_unmap_sg,
146 	.dma_supported      = ibmebus_dma_supported,
147 	.get_required_mask  = ibmebus_dma_get_required_mask,
148 	.map_page           = ibmebus_map_page,
149 	.unmap_page         = ibmebus_unmap_page,
150 };
151 
152 static int ibmebus_match_path(struct device *dev, const void *data)
153 {
154 	struct device_node *dn = to_platform_device(dev)->dev.of_node;
155 	struct device_node *tn = of_find_node_by_path(data);
156 
157 	of_node_put(tn);
158 
159 	return (tn == dn);
160 }
161 
162 static int ibmebus_match_node(struct device *dev, const void *data)
163 {
164 	return to_platform_device(dev)->dev.of_node == data;
165 }
166 
167 static int ibmebus_create_device(struct device_node *dn)
168 {
169 	struct platform_device *dev;
170 	int ret;
171 
172 	dev = of_device_alloc(dn, NULL, &ibmebus_bus_device);
173 	if (!dev)
174 		return -ENOMEM;
175 
176 	dev->dev.bus = &ibmebus_bus_type;
177 	dev->dev.dma_ops = &ibmebus_dma_ops;
178 
179 	ret = of_device_add(dev);
180 	if (ret)
181 		platform_device_put(dev);
182 	return ret;
183 }
184 
185 static int ibmebus_create_devices(const struct of_device_id *matches)
186 {
187 	struct device_node *root, *child;
188 	struct device *dev;
189 	int ret = 0;
190 
191 	root = of_find_node_by_path("/");
192 
193 	for_each_child_of_node(root, child) {
194 		if (!of_match_node(matches, child))
195 			continue;
196 
197 		dev = bus_find_device(&ibmebus_bus_type, NULL, child,
198 				      ibmebus_match_node);
199 		if (dev) {
200 			put_device(dev);
201 			continue;
202 		}
203 
204 		ret = ibmebus_create_device(child);
205 		if (ret) {
206 			printk(KERN_ERR "%s: failed to create device (%i)",
207 			       __func__, ret);
208 			of_node_put(child);
209 			break;
210 		}
211 	}
212 
213 	of_node_put(root);
214 	return ret;
215 }
216 
217 int ibmebus_register_driver(struct platform_driver *drv)
218 {
219 	/* If the driver uses devices that ibmebus doesn't know, add them */
220 	ibmebus_create_devices(drv->driver.of_match_table);
221 
222 	drv->driver.bus = &ibmebus_bus_type;
223 	return driver_register(&drv->driver);
224 }
225 EXPORT_SYMBOL(ibmebus_register_driver);
226 
227 void ibmebus_unregister_driver(struct platform_driver *drv)
228 {
229 	driver_unregister(&drv->driver);
230 }
231 EXPORT_SYMBOL(ibmebus_unregister_driver);
232 
233 int ibmebus_request_irq(u32 ist, irq_handler_t handler,
234 			unsigned long irq_flags, const char *devname,
235 			void *dev_id)
236 {
237 	unsigned int irq = irq_create_mapping(NULL, ist);
238 
239 	if (!irq)
240 		return -EINVAL;
241 
242 	return request_irq(irq, handler, irq_flags, devname, dev_id);
243 }
244 EXPORT_SYMBOL(ibmebus_request_irq);
245 
246 void ibmebus_free_irq(u32 ist, void *dev_id)
247 {
248 	unsigned int irq = irq_find_mapping(NULL, ist);
249 
250 	free_irq(irq, dev_id);
251 	irq_dispose_mapping(irq);
252 }
253 EXPORT_SYMBOL(ibmebus_free_irq);
254 
255 static char *ibmebus_chomp(const char *in, size_t count)
256 {
257 	char *out = kmalloc(count + 1, GFP_KERNEL);
258 
259 	if (!out)
260 		return NULL;
261 
262 	memcpy(out, in, count);
263 	out[count] = '\0';
264 	if (out[count - 1] == '\n')
265 		out[count - 1] = '\0';
266 
267 	return out;
268 }
269 
270 static ssize_t probe_store(const struct bus_type *bus, const char *buf, size_t count)
271 {
272 	struct device_node *dn = NULL;
273 	struct device *dev;
274 	char *path;
275 	ssize_t rc = 0;
276 
277 	path = ibmebus_chomp(buf, count);
278 	if (!path)
279 		return -ENOMEM;
280 
281 	dev = bus_find_device(&ibmebus_bus_type, NULL, path,
282 			      ibmebus_match_path);
283 	if (dev) {
284 		put_device(dev);
285 		printk(KERN_WARNING "%s: %s has already been probed\n",
286 		       __func__, path);
287 		rc = -EEXIST;
288 		goto out;
289 	}
290 
291 	if ((dn = of_find_node_by_path(path))) {
292 		rc = ibmebus_create_device(dn);
293 		of_node_put(dn);
294 	} else {
295 		printk(KERN_WARNING "%s: no such device node: %s\n",
296 		       __func__, path);
297 		rc = -ENODEV;
298 	}
299 
300 out:
301 	kfree(path);
302 	if (rc)
303 		return rc;
304 	return count;
305 }
306 static BUS_ATTR_WO(probe);
307 
308 static ssize_t remove_store(const struct bus_type *bus, const char *buf, size_t count)
309 {
310 	struct device *dev;
311 	char *path;
312 
313 	path = ibmebus_chomp(buf, count);
314 	if (!path)
315 		return -ENOMEM;
316 
317 	if ((dev = bus_find_device(&ibmebus_bus_type, NULL, path,
318 				   ibmebus_match_path))) {
319 		of_device_unregister(to_platform_device(dev));
320 		put_device(dev);
321 
322 		kfree(path);
323 		return count;
324 	} else {
325 		printk(KERN_WARNING "%s: %s not on the bus\n",
326 		       __func__, path);
327 
328 		kfree(path);
329 		return -ENODEV;
330 	}
331 }
332 static BUS_ATTR_WO(remove);
333 
334 static struct attribute *ibmbus_bus_attrs[] = {
335 	&bus_attr_probe.attr,
336 	&bus_attr_remove.attr,
337 	NULL,
338 };
339 ATTRIBUTE_GROUPS(ibmbus_bus);
340 
341 static int ibmebus_bus_bus_match(struct device *dev, struct device_driver *drv)
342 {
343 	const struct of_device_id *matches = drv->of_match_table;
344 
345 	if (!matches)
346 		return 0;
347 
348 	return of_match_device(matches, dev) != NULL;
349 }
350 
351 static int ibmebus_bus_device_probe(struct device *dev)
352 {
353 	int error = -ENODEV;
354 	struct platform_driver *drv;
355 	struct platform_device *of_dev;
356 
357 	drv = to_platform_driver(dev->driver);
358 	of_dev = to_platform_device(dev);
359 
360 	if (!drv->probe)
361 		return error;
362 
363 	get_device(dev);
364 
365 	if (of_driver_match_device(dev, dev->driver))
366 		error = drv->probe(of_dev);
367 	if (error)
368 		put_device(dev);
369 
370 	return error;
371 }
372 
373 static void ibmebus_bus_device_remove(struct device *dev)
374 {
375 	struct platform_device *of_dev = to_platform_device(dev);
376 	struct platform_driver *drv = to_platform_driver(dev->driver);
377 
378 	if (dev->driver && drv->remove)
379 		drv->remove(of_dev);
380 }
381 
382 static void ibmebus_bus_device_shutdown(struct device *dev)
383 {
384 	struct platform_device *of_dev = to_platform_device(dev);
385 	struct platform_driver *drv = to_platform_driver(dev->driver);
386 
387 	if (dev->driver && drv->shutdown)
388 		drv->shutdown(of_dev);
389 }
390 
391 /*
392  * ibmebus_bus_device_attrs
393  */
394 static ssize_t devspec_show(struct device *dev,
395 				struct device_attribute *attr, char *buf)
396 {
397 	struct platform_device *ofdev;
398 
399 	ofdev = to_platform_device(dev);
400 	return sprintf(buf, "%pOF\n", ofdev->dev.of_node);
401 }
402 static DEVICE_ATTR_RO(devspec);
403 
404 static ssize_t name_show(struct device *dev,
405 				struct device_attribute *attr, char *buf)
406 {
407 	struct platform_device *ofdev;
408 
409 	ofdev = to_platform_device(dev);
410 	return sprintf(buf, "%pOFn\n", ofdev->dev.of_node);
411 }
412 static DEVICE_ATTR_RO(name);
413 
414 static ssize_t modalias_show(struct device *dev,
415 				struct device_attribute *attr, char *buf)
416 {
417 	return of_device_modalias(dev, buf, PAGE_SIZE);
418 }
419 static DEVICE_ATTR_RO(modalias);
420 
421 static struct attribute *ibmebus_bus_device_attrs[] = {
422 	&dev_attr_devspec.attr,
423 	&dev_attr_name.attr,
424 	&dev_attr_modalias.attr,
425 	NULL,
426 };
427 ATTRIBUTE_GROUPS(ibmebus_bus_device);
428 
429 static int ibmebus_bus_modalias(const struct device *dev, struct kobj_uevent_env *env)
430 {
431 	return of_device_uevent_modalias(dev, env);
432 }
433 
434 struct bus_type ibmebus_bus_type = {
435 	.name      = "ibmebus",
436 	.uevent    = ibmebus_bus_modalias,
437 	.bus_groups = ibmbus_bus_groups,
438 	.match     = ibmebus_bus_bus_match,
439 	.probe     = ibmebus_bus_device_probe,
440 	.remove    = ibmebus_bus_device_remove,
441 	.shutdown  = ibmebus_bus_device_shutdown,
442 	.dev_groups = ibmebus_bus_device_groups,
443 };
444 EXPORT_SYMBOL(ibmebus_bus_type);
445 
446 static int __init ibmebus_bus_init(void)
447 {
448 	int err;
449 
450 	printk(KERN_INFO "IBM eBus Device Driver\n");
451 
452 	err = bus_register(&ibmebus_bus_type);
453 	if (err) {
454 		printk(KERN_ERR "%s: failed to register IBM eBus.\n",
455 		       __func__);
456 		return err;
457 	}
458 
459 	err = device_register(&ibmebus_bus_device);
460 	if (err) {
461 		printk(KERN_WARNING "%s: device_register returned %i\n",
462 		       __func__, err);
463 		bus_unregister(&ibmebus_bus_type);
464 
465 		return err;
466 	}
467 
468 	err = ibmebus_create_devices(ibmebus_matches);
469 	if (err) {
470 		device_unregister(&ibmebus_bus_device);
471 		bus_unregister(&ibmebus_bus_type);
472 		return err;
473 	}
474 
475 	return 0;
476 }
477 machine_postcore_initcall(pseries, ibmebus_bus_init);
478