xref: /openbmc/linux/drivers/sh/maple/maple.c (revision 9b799b78)
1 /*
2  * Core maple bus functionality
3  *
4  *  Copyright (C) 2007 - 2009 Adrian McMenamin
5  *  Copyright (C) 2001 - 2008 Paul Mundt
6  *  Copyright (C) 2000 - 2001 YAEGASHI Takeshi
7  *  Copyright (C) 2001 M. R. Brown
8  *
9  * This file is subject to the terms and conditions of the GNU General Public
10  * License.  See the file "COPYING" in the main directory of this archive
11  * for more details.
12  */
13 #include <linux/init.h>
14 #include <linux/kernel.h>
15 #include <linux/device.h>
16 #include <linux/interrupt.h>
17 #include <linux/list.h>
18 #include <linux/io.h>
19 #include <linux/slab.h>
20 #include <linux/maple.h>
21 #include <linux/dma-mapping.h>
22 #include <linux/delay.h>
23 #include <linux/module.h>
24 #include <asm/cacheflush.h>
25 #include <asm/dma.h>
26 #include <asm/io.h>
27 #include <mach/dma.h>
28 #include <mach/sysasic.h>
29 
30 MODULE_AUTHOR("Adrian McMenamin <adrian@mcmen.demon.co.uk>");
31 MODULE_DESCRIPTION("Maple bus driver for Dreamcast");
32 MODULE_LICENSE("GPL v2");
33 MODULE_SUPPORTED_DEVICE("{{SEGA, Dreamcast/Maple}}");
34 
35 static void maple_dma_handler(struct work_struct *work);
36 static void maple_vblank_handler(struct work_struct *work);
37 
38 static DECLARE_WORK(maple_dma_process, maple_dma_handler);
39 static DECLARE_WORK(maple_vblank_process, maple_vblank_handler);
40 
41 static LIST_HEAD(maple_waitq);
42 static LIST_HEAD(maple_sentq);
43 
44 /* mutex to protect queue of waiting packets */
45 static DEFINE_MUTEX(maple_wlist_lock);
46 
47 static struct maple_driver maple_unsupported_device;
48 static struct device maple_bus;
49 static int subdevice_map[MAPLE_PORTS];
50 static unsigned long *maple_sendbuf, *maple_sendptr, *maple_lastptr;
51 static unsigned long maple_pnp_time;
52 static int started, scanning, fullscan;
53 static struct kmem_cache *maple_queue_cache;
54 
55 struct maple_device_specify {
56 	int port;
57 	int unit;
58 };
59 
60 static bool checked[MAPLE_PORTS];
61 static bool empty[MAPLE_PORTS];
62 static struct maple_device *baseunits[MAPLE_PORTS];
63 
64 /**
65  * maple_driver_register - register a maple driver
66  * @drv: maple driver to be registered.
67  *
68  * Registers the passed in @drv, while updating the bus type.
69  * Devices with matching function IDs will be automatically probed.
70  */
71 int maple_driver_register(struct maple_driver *drv)
72 {
73 	if (!drv)
74 		return -EINVAL;
75 
76 	drv->drv.bus = &maple_bus_type;
77 
78 	return driver_register(&drv->drv);
79 }
80 EXPORT_SYMBOL_GPL(maple_driver_register);
81 
82 /**
83  * maple_driver_unregister - unregister a maple driver.
84  * @drv: maple driver to unregister.
85  *
86  * Cleans up after maple_driver_register(). To be invoked in the exit
87  * path of any module drivers.
88  */
89 void maple_driver_unregister(struct maple_driver *drv)
90 {
91 	driver_unregister(&drv->drv);
92 }
93 EXPORT_SYMBOL_GPL(maple_driver_unregister);
94 
95 /* set hardware registers to enable next round of dma */
96 static void maple_dma_reset(void)
97 {
98 	__raw_writel(MAPLE_MAGIC, MAPLE_RESET);
99 	/* set trig type to 0 for software trigger, 1 for hardware (VBLANK) */
100 	__raw_writel(1, MAPLE_TRIGTYPE);
101 	/*
102 	* Maple system register
103 	* bits 31 - 16	timeout in units of 20nsec
104 	* bit 12	hard trigger - set 0 to keep responding to VBLANK
105 	* bits 9 - 8	set 00 for 2 Mbps, 01 for 1 Mbps
106 	* bits 3 - 0	delay (in 1.3ms) between VBLANK and start of DMA
107 	* max delay is 11
108 	*/
109 	__raw_writel(MAPLE_2MBPS | MAPLE_TIMEOUT(0xFFFF), MAPLE_SPEED);
110 	__raw_writel(virt_to_phys(maple_sendbuf), MAPLE_DMAADDR);
111 	__raw_writel(1, MAPLE_ENABLE);
112 }
113 
114 /**
115  * maple_getcond_callback - setup handling MAPLE_COMMAND_GETCOND
116  * @dev: device responding
117  * @callback: handler callback
118  * @interval: interval in jiffies between callbacks
119  * @function: the function code for the device
120  */
121 void maple_getcond_callback(struct maple_device *dev,
122 			void (*callback) (struct mapleq *mq),
123 			unsigned long interval, unsigned long function)
124 {
125 	dev->callback = callback;
126 	dev->interval = interval;
127 	dev->function = cpu_to_be32(function);
128 	dev->when = jiffies;
129 }
130 EXPORT_SYMBOL_GPL(maple_getcond_callback);
131 
132 static int maple_dma_done(void)
133 {
134 	return (__raw_readl(MAPLE_STATE) & 1) == 0;
135 }
136 
137 static void maple_release_device(struct device *dev)
138 {
139 	struct maple_device *mdev;
140 	struct mapleq *mq;
141 
142 	mdev = to_maple_dev(dev);
143 	mq = mdev->mq;
144 	kmem_cache_free(maple_queue_cache, mq->recvbuf);
145 	kfree(mq);
146 	kfree(mdev);
147 }
148 
149 /**
150  * maple_add_packet - add a single instruction to the maple bus queue
151  * @mdev: maple device
152  * @function: function on device being queried
153  * @command: maple command to add
154  * @length: length of command string (in 32 bit words)
155  * @data: remainder of command string
156  */
157 int maple_add_packet(struct maple_device *mdev, u32 function, u32 command,
158 	size_t length, void *data)
159 {
160 	int ret = 0;
161 	void *sendbuf = NULL;
162 
163 	if (length) {
164 		sendbuf = kzalloc(length * 4, GFP_KERNEL);
165 		if (!sendbuf) {
166 			ret = -ENOMEM;
167 			goto out;
168 		}
169 		((__be32 *)sendbuf)[0] = cpu_to_be32(function);
170 	}
171 
172 	mdev->mq->command = command;
173 	mdev->mq->length = length;
174 	if (length > 1)
175 		memcpy(sendbuf + 4, data, (length - 1) * 4);
176 	mdev->mq->sendbuf = sendbuf;
177 
178 	mutex_lock(&maple_wlist_lock);
179 	list_add_tail(&mdev->mq->list, &maple_waitq);
180 	mutex_unlock(&maple_wlist_lock);
181 out:
182 	return ret;
183 }
184 EXPORT_SYMBOL_GPL(maple_add_packet);
185 
186 static struct mapleq *maple_allocq(struct maple_device *mdev)
187 {
188 	struct mapleq *mq;
189 
190 	mq = kzalloc(sizeof(*mq), GFP_KERNEL);
191 	if (!mq)
192 		goto failed_nomem;
193 
194 	INIT_LIST_HEAD(&mq->list);
195 	mq->dev = mdev;
196 	mq->recvbuf = kmem_cache_zalloc(maple_queue_cache, GFP_KERNEL);
197 	if (!mq->recvbuf)
198 		goto failed_p2;
199 	mq->recvbuf->buf = &((mq->recvbuf->bufx)[0]);
200 
201 	return mq;
202 
203 failed_p2:
204 	kfree(mq);
205 failed_nomem:
206 	dev_err(&mdev->dev, "could not allocate memory for device (%d, %d)\n",
207 		mdev->port, mdev->unit);
208 	return NULL;
209 }
210 
211 static struct maple_device *maple_alloc_dev(int port, int unit)
212 {
213 	struct maple_device *mdev;
214 
215 	/* zero this out to avoid kobj subsystem
216 	* thinking it has already been registered */
217 
218 	mdev = kzalloc(sizeof(*mdev), GFP_KERNEL);
219 	if (!mdev)
220 		return NULL;
221 
222 	mdev->port = port;
223 	mdev->unit = unit;
224 
225 	mdev->mq = maple_allocq(mdev);
226 
227 	if (!mdev->mq) {
228 		kfree(mdev);
229 		return NULL;
230 	}
231 	mdev->dev.bus = &maple_bus_type;
232 	mdev->dev.parent = &maple_bus;
233 	init_waitqueue_head(&mdev->maple_wait);
234 	return mdev;
235 }
236 
237 static void maple_free_dev(struct maple_device *mdev)
238 {
239 	kmem_cache_free(maple_queue_cache, mdev->mq->recvbuf);
240 	kfree(mdev->mq);
241 	kfree(mdev);
242 }
243 
244 /* process the command queue into a maple command block
245  * terminating command has bit 32 of first long set to 0
246  */
247 static void maple_build_block(struct mapleq *mq)
248 {
249 	int port, unit, from, to, len;
250 	unsigned long *lsendbuf = mq->sendbuf;
251 
252 	port = mq->dev->port & 3;
253 	unit = mq->dev->unit;
254 	len = mq->length;
255 	from = port << 6;
256 	to = (port << 6) | (unit > 0 ? (1 << (unit - 1)) & 0x1f : 0x20);
257 
258 	*maple_lastptr &= 0x7fffffff;
259 	maple_lastptr = maple_sendptr;
260 
261 	*maple_sendptr++ = (port << 16) | len | 0x80000000;
262 	*maple_sendptr++ = virt_to_phys(mq->recvbuf->buf);
263 	*maple_sendptr++ =
264 	    mq->command | (to << 8) | (from << 16) | (len << 24);
265 	while (len-- > 0)
266 		*maple_sendptr++ = *lsendbuf++;
267 }
268 
269 /* build up command queue */
270 static void maple_send(void)
271 {
272 	int i, maple_packets = 0;
273 	struct mapleq *mq, *nmq;
274 
275 	if (!maple_dma_done())
276 		return;
277 
278 	/* disable DMA */
279 	__raw_writel(0, MAPLE_ENABLE);
280 
281 	if (!list_empty(&maple_sentq))
282 		goto finish;
283 
284 	mutex_lock(&maple_wlist_lock);
285 	if (list_empty(&maple_waitq)) {
286 		mutex_unlock(&maple_wlist_lock);
287 		goto finish;
288 	}
289 
290 	maple_lastptr = maple_sendbuf;
291 	maple_sendptr = maple_sendbuf;
292 
293 	list_for_each_entry_safe(mq, nmq, &maple_waitq, list) {
294 		maple_build_block(mq);
295 		list_del_init(&mq->list);
296 		list_add_tail(&mq->list, &maple_sentq);
297 		if (maple_packets++ > MAPLE_MAXPACKETS)
298 			break;
299 	}
300 	mutex_unlock(&maple_wlist_lock);
301 	if (maple_packets > 0) {
302 		for (i = 0; i < (1 << MAPLE_DMA_PAGES); i++)
303 			dma_cache_sync(0, maple_sendbuf + i * PAGE_SIZE,
304 				       PAGE_SIZE, DMA_BIDIRECTIONAL);
305 	}
306 
307 finish:
308 	maple_dma_reset();
309 }
310 
311 /* check if there is a driver registered likely to match this device */
312 static int maple_check_matching_driver(struct device_driver *driver,
313 					void *devptr)
314 {
315 	struct maple_driver *maple_drv;
316 	struct maple_device *mdev;
317 
318 	mdev = devptr;
319 	maple_drv = to_maple_driver(driver);
320 	if (mdev->devinfo.function & cpu_to_be32(maple_drv->function))
321 		return 1;
322 	return 0;
323 }
324 
325 static void maple_detach_driver(struct maple_device *mdev)
326 {
327 	device_unregister(&mdev->dev);
328 }
329 
330 /* process initial MAPLE_COMMAND_DEVINFO for each device or port */
331 static void maple_attach_driver(struct maple_device *mdev)
332 {
333 	char *p, *recvbuf;
334 	unsigned long function;
335 	int matched, error;
336 
337 	recvbuf = mdev->mq->recvbuf->buf;
338 	/* copy the data as individual elements in
339 	* case of memory optimisation */
340 	memcpy(&mdev->devinfo.function, recvbuf + 4, 4);
341 	memcpy(&mdev->devinfo.function_data[0], recvbuf + 8, 12);
342 	memcpy(&mdev->devinfo.area_code, recvbuf + 20, 1);
343 	memcpy(&mdev->devinfo.connector_direction, recvbuf + 21, 1);
344 	memcpy(&mdev->devinfo.product_name[0], recvbuf + 22, 30);
345 	memcpy(&mdev->devinfo.standby_power, recvbuf + 112, 2);
346 	memcpy(&mdev->devinfo.max_power, recvbuf + 114, 2);
347 	memcpy(mdev->product_name, mdev->devinfo.product_name, 30);
348 	mdev->product_name[30] = '\0';
349 	memcpy(mdev->product_licence, mdev->devinfo.product_licence, 60);
350 	mdev->product_licence[60] = '\0';
351 
352 	for (p = mdev->product_name + 29; mdev->product_name <= p; p--)
353 		if (*p == ' ')
354 			*p = '\0';
355 		else
356 			break;
357 	for (p = mdev->product_licence + 59; mdev->product_licence <= p; p--)
358 		if (*p == ' ')
359 			*p = '\0';
360 		else
361 			break;
362 
363 	function = be32_to_cpu(mdev->devinfo.function);
364 
365 	dev_info(&mdev->dev, "detected %s: function 0x%lX: at (%d, %d)\n",
366 		mdev->product_name, function, mdev->port, mdev->unit);
367 
368 	if (function > 0x200) {
369 		/* Do this silently - as not a real device */
370 		function = 0;
371 		mdev->driver = &maple_unsupported_device;
372 		dev_set_name(&mdev->dev, "%d:0.port", mdev->port);
373 	} else {
374 		matched =
375 			bus_for_each_drv(&maple_bus_type, NULL, mdev,
376 				maple_check_matching_driver);
377 
378 		if (matched == 0) {
379 			/* Driver does not exist yet */
380 			dev_info(&mdev->dev, "no driver found\n");
381 			mdev->driver = &maple_unsupported_device;
382 		}
383 		dev_set_name(&mdev->dev, "%d:0%d.%lX", mdev->port,
384 			     mdev->unit, function);
385 	}
386 
387 	mdev->function = function;
388 	mdev->dev.release = &maple_release_device;
389 
390 	atomic_set(&mdev->busy, 0);
391 	error = device_register(&mdev->dev);
392 	if (error) {
393 		dev_warn(&mdev->dev, "could not register device at"
394 			" (%d, %d), with error 0x%X\n", mdev->unit,
395 			mdev->port, error);
396 		maple_free_dev(mdev);
397 		mdev = NULL;
398 		return;
399 	}
400 }
401 
402 /*
403  * if device has been registered for the given
404  * port and unit then return 1 - allows identification
405  * of which devices need to be attached or detached
406  */
407 static int check_maple_device(struct device *device, void *portptr)
408 {
409 	struct maple_device_specify *ds;
410 	struct maple_device *mdev;
411 
412 	ds = portptr;
413 	mdev = to_maple_dev(device);
414 	if (mdev->port == ds->port && mdev->unit == ds->unit)
415 		return 1;
416 	return 0;
417 }
418 
419 static int setup_maple_commands(struct device *device, void *ignored)
420 {
421 	int add;
422 	struct maple_device *mdev = to_maple_dev(device);
423 	if (mdev->interval > 0 && atomic_read(&mdev->busy) == 0 &&
424 		time_after(jiffies, mdev->when)) {
425 		/* bounce if we cannot add */
426 		add = maple_add_packet(mdev,
427 			be32_to_cpu(mdev->devinfo.function),
428 			MAPLE_COMMAND_GETCOND, 1, NULL);
429 		if (!add)
430 			mdev->when = jiffies + mdev->interval;
431 	} else {
432 		if (time_after(jiffies, maple_pnp_time))
433 			/* Ensure we don't have block reads and devinfo
434 			* calls interfering with one another - so flag the
435 			* device as busy */
436 			if (atomic_read(&mdev->busy) == 0) {
437 				atomic_set(&mdev->busy, 1);
438 				maple_add_packet(mdev, 0,
439 					MAPLE_COMMAND_DEVINFO, 0, NULL);
440 			}
441 	}
442 	return 0;
443 }
444 
445 /* VBLANK bottom half - implemented via workqueue */
446 static void maple_vblank_handler(struct work_struct *work)
447 {
448 	int x, locking;
449 	struct maple_device *mdev;
450 
451 	if (!maple_dma_done())
452 		return;
453 
454 	__raw_writel(0, MAPLE_ENABLE);
455 
456 	if (!list_empty(&maple_sentq))
457 		goto finish;
458 
459 	/*
460 	* Set up essential commands - to fetch data and
461 	* check devices are still present
462 	*/
463 	bus_for_each_dev(&maple_bus_type, NULL, NULL,
464 		setup_maple_commands);
465 
466 	if (time_after(jiffies, maple_pnp_time)) {
467 		/*
468 		* Scan the empty ports - bus is flakey and may have
469 		* mis-reported emptyness
470 		*/
471 		for (x = 0; x < MAPLE_PORTS; x++) {
472 			if (checked[x] && empty[x]) {
473 				mdev = baseunits[x];
474 				if (!mdev)
475 					break;
476 				atomic_set(&mdev->busy, 1);
477 				locking = maple_add_packet(mdev, 0,
478 					MAPLE_COMMAND_DEVINFO, 0, NULL);
479 				if (!locking)
480 					break;
481 				}
482 			}
483 
484 		maple_pnp_time = jiffies + MAPLE_PNP_INTERVAL;
485 	}
486 
487 finish:
488 	maple_send();
489 }
490 
491 /* handle devices added via hotplugs - placing them on queue for DEVINFO */
492 static void maple_map_subunits(struct maple_device *mdev, int submask)
493 {
494 	int retval, k, devcheck;
495 	struct maple_device *mdev_add;
496 	struct maple_device_specify ds;
497 
498 	ds.port = mdev->port;
499 	for (k = 0; k < 5; k++) {
500 		ds.unit = k + 1;
501 		retval =
502 		    bus_for_each_dev(&maple_bus_type, NULL, &ds,
503 				     check_maple_device);
504 		if (retval) {
505 			submask = submask >> 1;
506 			continue;
507 		}
508 		devcheck = submask & 0x01;
509 		if (devcheck) {
510 			mdev_add = maple_alloc_dev(mdev->port, k + 1);
511 			if (!mdev_add)
512 				return;
513 			atomic_set(&mdev_add->busy, 1);
514 			maple_add_packet(mdev_add, 0, MAPLE_COMMAND_DEVINFO,
515 				0, NULL);
516 			/* mark that we are checking sub devices */
517 			scanning = 1;
518 		}
519 		submask = submask >> 1;
520 	}
521 }
522 
523 /* mark a device as removed */
524 static void maple_clean_submap(struct maple_device *mdev)
525 {
526 	int killbit;
527 
528 	killbit = (mdev->unit > 0 ? (1 << (mdev->unit - 1)) & 0x1f : 0x20);
529 	killbit = ~killbit;
530 	killbit &= 0xFF;
531 	subdevice_map[mdev->port] = subdevice_map[mdev->port] & killbit;
532 }
533 
534 /* handle empty port or hotplug removal */
535 static void maple_response_none(struct maple_device *mdev)
536 {
537 	maple_clean_submap(mdev);
538 
539 	if (likely(mdev->unit != 0)) {
540 		/*
541 		* Block devices play up
542 		* and give the impression they have
543 		* been removed even when still in place or
544 		* trip the mtd layer when they have
545 		* really gone - this code traps that eventuality
546 		* and ensures we aren't overloaded with useless
547 		* error messages
548 		*/
549 		if (mdev->can_unload) {
550 			if (!mdev->can_unload(mdev)) {
551 				atomic_set(&mdev->busy, 2);
552 				wake_up(&mdev->maple_wait);
553 				return;
554 			}
555 		}
556 
557 		dev_info(&mdev->dev, "detaching device at (%d, %d)\n",
558 			mdev->port, mdev->unit);
559 		maple_detach_driver(mdev);
560 		return;
561 	} else {
562 		if (!started || !fullscan) {
563 			if (checked[mdev->port] == false) {
564 				checked[mdev->port] = true;
565 				empty[mdev->port] = true;
566 				dev_info(&mdev->dev, "no devices"
567 					" to port %d\n", mdev->port);
568 			}
569 			return;
570 		}
571 	}
572 	/* Some hardware devices generate false detach messages on unit 0 */
573 	atomic_set(&mdev->busy, 0);
574 }
575 
576 /* preprocess hotplugs or scans */
577 static void maple_response_devinfo(struct maple_device *mdev,
578 				   char *recvbuf)
579 {
580 	char submask;
581 	if (!started || (scanning == 2) || !fullscan) {
582 		if ((mdev->unit == 0) && (checked[mdev->port] == false)) {
583 			checked[mdev->port] = true;
584 			maple_attach_driver(mdev);
585 		} else {
586 			if (mdev->unit != 0)
587 				maple_attach_driver(mdev);
588 			if (mdev->unit == 0) {
589 				empty[mdev->port] = false;
590 				maple_attach_driver(mdev);
591 			}
592 		}
593 	}
594 	if (mdev->unit == 0) {
595 		submask = recvbuf[2] & 0x1F;
596 		if (submask ^ subdevice_map[mdev->port]) {
597 			maple_map_subunits(mdev, submask);
598 			subdevice_map[mdev->port] = submask;
599 		}
600 	}
601 }
602 
603 static void maple_response_fileerr(struct maple_device *mdev, void *recvbuf)
604 {
605 	if (mdev->fileerr_handler) {
606 		mdev->fileerr_handler(mdev, recvbuf);
607 		return;
608 	} else
609 		dev_warn(&mdev->dev, "device at (%d, %d) reports"
610 			"file error 0x%X\n", mdev->port, mdev->unit,
611 			((int *)recvbuf)[1]);
612 }
613 
614 static void maple_port_rescan(void)
615 {
616 	int i;
617 	struct maple_device *mdev;
618 
619 	fullscan = 1;
620 	for (i = 0; i < MAPLE_PORTS; i++) {
621 		if (checked[i] == false) {
622 			fullscan = 0;
623 			mdev = baseunits[i];
624 			maple_add_packet(mdev, 0, MAPLE_COMMAND_DEVINFO,
625 				0, NULL);
626 		}
627 	}
628 }
629 
630 /* maple dma end bottom half - implemented via workqueue */
631 static void maple_dma_handler(struct work_struct *work)
632 {
633 	struct mapleq *mq, *nmq;
634 	struct maple_device *mdev;
635 	char *recvbuf;
636 	enum maple_code code;
637 
638 	if (!maple_dma_done())
639 		return;
640 	__raw_writel(0, MAPLE_ENABLE);
641 	if (!list_empty(&maple_sentq)) {
642 		list_for_each_entry_safe(mq, nmq, &maple_sentq, list) {
643 			mdev = mq->dev;
644 			recvbuf = mq->recvbuf->buf;
645 			dma_cache_sync(&mdev->dev, recvbuf, 0x400,
646 				DMA_FROM_DEVICE);
647 			code = recvbuf[0];
648 			kfree(mq->sendbuf);
649 			list_del_init(&mq->list);
650 			switch (code) {
651 			case MAPLE_RESPONSE_NONE:
652 				maple_response_none(mdev);
653 				break;
654 
655 			case MAPLE_RESPONSE_DEVINFO:
656 				maple_response_devinfo(mdev, recvbuf);
657 				atomic_set(&mdev->busy, 0);
658 				break;
659 
660 			case MAPLE_RESPONSE_DATATRF:
661 				if (mdev->callback)
662 					mdev->callback(mq);
663 				atomic_set(&mdev->busy, 0);
664 				wake_up(&mdev->maple_wait);
665 				break;
666 
667 			case MAPLE_RESPONSE_FILEERR:
668 				maple_response_fileerr(mdev, recvbuf);
669 				atomic_set(&mdev->busy, 0);
670 				wake_up(&mdev->maple_wait);
671 				break;
672 
673 			case MAPLE_RESPONSE_AGAIN:
674 			case MAPLE_RESPONSE_BADCMD:
675 			case MAPLE_RESPONSE_BADFUNC:
676 				dev_warn(&mdev->dev, "non-fatal error"
677 					" 0x%X at (%d, %d)\n", code,
678 					mdev->port, mdev->unit);
679 				atomic_set(&mdev->busy, 0);
680 				break;
681 
682 			case MAPLE_RESPONSE_ALLINFO:
683 				dev_notice(&mdev->dev, "extended"
684 				" device information request for (%d, %d)"
685 				" but call is not supported\n", mdev->port,
686 				mdev->unit);
687 				atomic_set(&mdev->busy, 0);
688 				break;
689 
690 			case MAPLE_RESPONSE_OK:
691 				atomic_set(&mdev->busy, 0);
692 				wake_up(&mdev->maple_wait);
693 				break;
694 
695 			default:
696 				break;
697 			}
698 		}
699 		/* if scanning is 1 then we have subdevices to check */
700 		if (scanning == 1) {
701 			maple_send();
702 			scanning = 2;
703 		} else
704 			scanning = 0;
705 		/*check if we have actually tested all ports yet */
706 		if (!fullscan)
707 			maple_port_rescan();
708 		/* mark that we have been through the first scan */
709 		started = 1;
710 	}
711 	maple_send();
712 }
713 
714 static irqreturn_t maple_dma_interrupt(int irq, void *dev_id)
715 {
716 	/* Load everything into the bottom half */
717 	schedule_work(&maple_dma_process);
718 	return IRQ_HANDLED;
719 }
720 
721 static irqreturn_t maple_vblank_interrupt(int irq, void *dev_id)
722 {
723 	schedule_work(&maple_vblank_process);
724 	return IRQ_HANDLED;
725 }
726 
727 static int maple_set_dma_interrupt_handler(void)
728 {
729 	return request_irq(HW_EVENT_MAPLE_DMA, maple_dma_interrupt,
730 		IRQF_SHARED, "maple bus DMA", &maple_unsupported_device);
731 }
732 
733 static int maple_set_vblank_interrupt_handler(void)
734 {
735 	return request_irq(HW_EVENT_VSYNC, maple_vblank_interrupt,
736 		IRQF_SHARED, "maple bus VBLANK", &maple_unsupported_device);
737 }
738 
739 static int maple_get_dma_buffer(void)
740 {
741 	maple_sendbuf =
742 	    (void *) __get_free_pages(GFP_KERNEL | __GFP_ZERO,
743 				      MAPLE_DMA_PAGES);
744 	if (!maple_sendbuf)
745 		return -ENOMEM;
746 	return 0;
747 }
748 
749 static int maple_match_bus_driver(struct device *devptr,
750 				  struct device_driver *drvptr)
751 {
752 	struct maple_driver *maple_drv = to_maple_driver(drvptr);
753 	struct maple_device *maple_dev = to_maple_dev(devptr);
754 
755 	/* Trap empty port case */
756 	if (maple_dev->devinfo.function == 0xFFFFFFFF)
757 		return 0;
758 	else if (maple_dev->devinfo.function &
759 		 cpu_to_be32(maple_drv->function))
760 		return 1;
761 	return 0;
762 }
763 
764 static int maple_bus_uevent(struct device *dev,
765 			    struct kobj_uevent_env *env)
766 {
767 	return 0;
768 }
769 
770 static void maple_bus_release(struct device *dev)
771 {
772 }
773 
774 static struct maple_driver maple_unsupported_device = {
775 	.drv = {
776 		.name = "maple_unsupported_device",
777 		.bus = &maple_bus_type,
778 	},
779 };
780 /*
781  * maple_bus_type - core maple bus structure
782  */
783 struct bus_type maple_bus_type = {
784 	.name = "maple",
785 	.match = maple_match_bus_driver,
786 	.uevent = maple_bus_uevent,
787 };
788 EXPORT_SYMBOL_GPL(maple_bus_type);
789 
790 static struct device maple_bus = {
791 	.init_name = "maple",
792 	.release = maple_bus_release,
793 };
794 
795 static int __init maple_bus_init(void)
796 {
797 	int retval, i;
798 	struct maple_device *mdev[MAPLE_PORTS];
799 
800 	__raw_writel(0, MAPLE_ENABLE);
801 
802 	retval = device_register(&maple_bus);
803 	if (retval)
804 		goto cleanup;
805 
806 	retval = bus_register(&maple_bus_type);
807 	if (retval)
808 		goto cleanup_device;
809 
810 	retval = driver_register(&maple_unsupported_device.drv);
811 	if (retval)
812 		goto cleanup_bus;
813 
814 	/* allocate memory for maple bus dma */
815 	retval = maple_get_dma_buffer();
816 	if (retval) {
817 		dev_err(&maple_bus, "failed to allocate DMA buffers\n");
818 		goto cleanup_basic;
819 	}
820 
821 	/* set up DMA interrupt handler */
822 	retval = maple_set_dma_interrupt_handler();
823 	if (retval) {
824 		dev_err(&maple_bus, "bus failed to grab maple "
825 			"DMA IRQ\n");
826 		goto cleanup_dma;
827 	}
828 
829 	/* set up VBLANK interrupt handler */
830 	retval = maple_set_vblank_interrupt_handler();
831 	if (retval) {
832 		dev_err(&maple_bus, "bus failed to grab VBLANK IRQ\n");
833 		goto cleanup_irq;
834 	}
835 
836 	maple_queue_cache = KMEM_CACHE(maple_buffer, SLAB_HWCACHE_ALIGN);
837 
838 	if (!maple_queue_cache)
839 		goto cleanup_bothirqs;
840 
841 	INIT_LIST_HEAD(&maple_waitq);
842 	INIT_LIST_HEAD(&maple_sentq);
843 
844 	/* setup maple ports */
845 	for (i = 0; i < MAPLE_PORTS; i++) {
846 		checked[i] = false;
847 		empty[i] = false;
848 		mdev[i] = maple_alloc_dev(i, 0);
849 		if (!mdev[i]) {
850 			while (i-- > 0)
851 				maple_free_dev(mdev[i]);
852 			goto cleanup_cache;
853 		}
854 		baseunits[i] = mdev[i];
855 		atomic_set(&mdev[i]->busy, 1);
856 		maple_add_packet(mdev[i], 0, MAPLE_COMMAND_DEVINFO, 0, NULL);
857 		subdevice_map[i] = 0;
858 	}
859 
860 	maple_pnp_time = jiffies + HZ;
861 	/* prepare initial queue */
862 	maple_send();
863 	dev_info(&maple_bus, "bus core now registered\n");
864 
865 	return 0;
866 
867 cleanup_cache:
868 	kmem_cache_destroy(maple_queue_cache);
869 
870 cleanup_bothirqs:
871 	free_irq(HW_EVENT_VSYNC, 0);
872 
873 cleanup_irq:
874 	free_irq(HW_EVENT_MAPLE_DMA, 0);
875 
876 cleanup_dma:
877 	free_pages((unsigned long) maple_sendbuf, MAPLE_DMA_PAGES);
878 
879 cleanup_basic:
880 	driver_unregister(&maple_unsupported_device.drv);
881 
882 cleanup_bus:
883 	bus_unregister(&maple_bus_type);
884 
885 cleanup_device:
886 	device_unregister(&maple_bus);
887 
888 cleanup:
889 	printk(KERN_ERR "Maple bus registration failed\n");
890 	return retval;
891 }
892 /* Push init to later to ensure hardware gets detected */
893 fs_initcall(maple_bus_init);
894