xref: /freebsd/sys/arm/mv/mvebu_gpio.c (revision 911f0260390e18cf85f3dbf2c719b593efdc1e3c)
1 /*-
2  * Copyright (c) 2020 Michal Meloun <mmel@FreeBSD.org>
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  * 1. Redistributions of source code must retain the above copyright
8  *    notice, this list of conditions and the following disclaimer.
9  * 2. Redistributions in binary form must reproduce the above copyright
10  *    notice, this list of conditions and the following disclaimer in the
11  *    documentation and/or other materials provided with the distribution.
12  *
13  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
14  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
17  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
23  * SUCH DAMAGE.
24  */
25 
26 #include <sys/cdefs.h>
27 __FBSDID("$FreeBSD$");
28 
29 /*
30  * ARMADA 8040 GPIO driver.
31  */
32 #include "opt_platform.h"
33 #include <sys/param.h>
34 #include <sys/systm.h>
35 #include <sys/bus.h>
36 #include <sys/gpio.h>
37 #include <sys/kernel.h>
38 #include <sys/proc.h>
39 #include <sys/rman.h>
40 #include <sys/lock.h>
41 #include <sys/module.h>
42 #include <sys/mutex.h>
43 
44 #include <machine/bus.h>
45 #include <machine/intr.h>
46 #include <machine/resource.h>
47 
48 #include <dev/extres/syscon/syscon.h>
49 
50 #include <dev/gpio/gpiobusvar.h>
51 
52 #include <dev/ofw/openfirm.h>
53 #include <dev/ofw/ofw_bus.h>
54 #include <dev/ofw/ofw_bus_subr.h>
55 
56 #include "pic_if.h"
57 #include "syscon_if.h"
58 
59 #define	GPIO_LOCK(_sc)		mtx_lock(&(_sc)->mtx)
60 #define	GPIO_UNLOCK(_sc)	mtx_unlock(&(_sc)->mtx)
61 #define	GPIO_LOCK_INIT(_sc)	mtx_init(&_sc->mtx, 			\
62 	    device_get_nameunit(_sc->dev), "mvebu_gpio", MTX_DEF)
63 #define	GPIO_LOCK_DESTROY(_sc)	mtx_destroy(&_sc->mtx);
64 #define	GPIO_ASSERT_LOCKED(_sc)	mtx_assert(&_sc->mtx, MA_OWNED);
65 #define	GPIO_ASSERT_UNLOCKED(_sc) mtx_assert(&_sc->mtx, MA_NOTOWNED);
66 
67 #define	GPIO_DATA_OUT		0x00
68 #define	GPIO_CONTROL		0x04
69 #define	GPIO_BLINK_ENA		0x08
70 #define	GPIO_DATA_IN_POL	0x0C
71 #define	GPIO_DATA_IN		0x10
72 #define	GPIO_INT_CAUSE		0x14
73 #define	GPIO_INT_MASK		0x18
74 #define	GPIO_INT_LEVEL_MASK	0x1C
75 #define	GPIO_CONTROL_SET	0x28
76 #define	GPIO_CONTROL_CLR	0x2C
77 #define	GPIO_DATA_SET		0x30
78 #define	GPIO_DATA_CLR		0x34
79 
80 #define	GPIO_BIT(_p)		((_p) % 32)
81 #define	GPIO_REGNUM(_p)		((_p) / 32)
82 
83 #define	MV_GPIO_MAX_NIRQS	4
84 #define	MV_GPIO_MAX_NPINS	32
85 
86 struct mvebu_gpio_irqsrc {
87 	struct intr_irqsrc	isrc;
88 	u_int			irq;
89 	bool			is_level;
90 	bool			is_inverted;
91 };
92 
93 struct mvebu_gpio_softc;
94 struct mvebu_gpio_irq_cookie {
95 	struct mvebu_gpio_softc	*sc;
96 	int			bank_num;
97 };
98 
99 struct mvebu_gpio_softc {
100 	device_t		dev;
101 	device_t		busdev;
102 	struct mtx		mtx;
103 	struct syscon		*syscon;
104 	uint32_t		offset;
105 	struct resource		*irq_res[MV_GPIO_MAX_NIRQS];
106 	void			*irq_ih[MV_GPIO_MAX_NIRQS];
107 	struct mvebu_gpio_irq_cookie irq_cookies[MV_GPIO_MAX_NIRQS];
108 	int			gpio_npins;
109 	struct gpio_pin		gpio_pins[MV_GPIO_MAX_NPINS];
110 	struct mvebu_gpio_irqsrc *isrcs;
111 };
112 
113 static struct ofw_compat_data compat_data[] = {
114 	{"marvell,armada-8k-gpio", 1},
115 	{NULL, 0}
116 };
117 
118 /* --------------------------------------------------------------------------
119  *
120  * GPIO
121  *
122  */
123 static inline void
124 gpio_write(struct mvebu_gpio_softc *sc, bus_size_t reg,
125     struct gpio_pin *pin, uint32_t val)
126 {
127 	int bit;
128 
129 	bit = GPIO_BIT(pin->gp_pin);
130 	SYSCON_WRITE_4(sc->syscon, sc->offset + GPIO_REGNUM(pin->gp_pin) + reg,
131 	    (val & 1) << bit);
132 }
133 
134 static inline uint32_t
135 gpio_read(struct mvebu_gpio_softc *sc, bus_size_t reg, struct gpio_pin *pin)
136 {
137 	int bit;
138 	uint32_t val;
139 
140 	bit = GPIO_BIT(pin->gp_pin);
141 	val = SYSCON_READ_4(sc->syscon,
142 	    sc->offset + GPIO_REGNUM(pin->gp_pin) + reg);
143 
144 	return (val >> bit) & 1;
145 }
146 
147 static inline void
148 gpio_modify(struct mvebu_gpio_softc *sc, bus_size_t reg,
149     struct gpio_pin *pin, uint32_t val)
150 {
151 	int bit;
152 
153 	bit = GPIO_BIT(pin->gp_pin);
154 	SYSCON_MODIFY_4(sc->syscon, sc->offset + GPIO_REGNUM(pin->gp_pin) + reg,
155 	    1 << bit, (val & 1) << bit);
156 }
157 
158 static void
159 mvebu_gpio_pin_configure(struct mvebu_gpio_softc *sc, struct gpio_pin *pin,
160     unsigned int flags)
161 {
162 
163 	if ((flags & (GPIO_PIN_INPUT | GPIO_PIN_OUTPUT)) == 0)
164 		return;
165 
166 	/* Manage input/output */
167 	pin->gp_flags &= ~(GPIO_PIN_INPUT | GPIO_PIN_OUTPUT);
168 	if (flags & GPIO_PIN_OUTPUT) {
169 		pin->gp_flags |= GPIO_PIN_OUTPUT;
170 		gpio_write(sc, GPIO_CONTROL_CLR, pin, 1);
171 	} else {
172 		pin->gp_flags |= GPIO_PIN_INPUT;
173 		gpio_write(sc, GPIO_CONTROL_SET, pin, 1);
174 	}
175 }
176 
177 static device_t
178 mvebu_gpio_get_bus(device_t dev)
179 {
180 	struct mvebu_gpio_softc *sc;
181 
182 	sc = device_get_softc(dev);
183 	return (sc->busdev);
184 }
185 
186 static int
187 mvebu_gpio_pin_max(device_t dev, int *maxpin)
188 {
189 	struct mvebu_gpio_softc *sc;
190 
191 	sc = device_get_softc(dev);
192 	*maxpin = sc->gpio_npins - 1;
193 	return (0);
194 }
195 
196 static int
197 mvebu_gpio_pin_getcaps(device_t dev, uint32_t pin, uint32_t *caps)
198 {
199 	struct mvebu_gpio_softc *sc;
200 
201 	sc = device_get_softc(dev);
202 	if (pin >= sc->gpio_npins)
203 		return (EINVAL);
204 
205 	*caps = sc->gpio_pins[pin].gp_caps;
206 
207 	return (0);
208 }
209 
210 static int
211 mvebu_gpio_pin_getflags(device_t dev, uint32_t pin, uint32_t *flags)
212 {
213 	struct mvebu_gpio_softc *sc;
214 
215 	sc = device_get_softc(dev);
216 	if (pin >= sc->gpio_npins)
217 		return (EINVAL);
218 
219 	*flags = sc->gpio_pins[pin].gp_flags;
220 
221 	return (0);
222 }
223 
224 static int
225 mvebu_gpio_pin_getname(device_t dev, uint32_t pin, char *name)
226 {
227 	struct mvebu_gpio_softc *sc;
228 
229 	sc = device_get_softc(dev);
230 	if (pin >= sc->gpio_npins)
231 		return (EINVAL);
232 
233 	memcpy(name, sc->gpio_pins[pin].gp_name, GPIOMAXNAME);
234 
235 	return (0);
236 }
237 
238 static int
239 mvebu_gpio_pin_setflags(device_t dev, uint32_t pin, uint32_t flags)
240 {
241 	struct mvebu_gpio_softc *sc;
242 
243 	sc = device_get_softc(dev);
244 	if (pin >= sc->gpio_npins)
245 		return (EINVAL);
246 
247 	mvebu_gpio_pin_configure(sc, &sc->gpio_pins[pin], flags);
248 
249 	return (0);
250 }
251 
252 static int
253 mvebu_gpio_pin_set(device_t dev, uint32_t pin, unsigned int value)
254 {
255 	struct mvebu_gpio_softc *sc;
256 
257 	sc = device_get_softc(dev);
258 	if (pin >= sc->gpio_npins)
259 		return (EINVAL);
260 
261 	if (value != 0)
262 		gpio_write(sc, GPIO_DATA_SET, &sc->gpio_pins[pin], 1);
263 	else
264 		gpio_write(sc, GPIO_DATA_CLR, &sc->gpio_pins[pin], 1);
265 
266 	return (0);
267 }
268 
269 static int
270 mvebu_gpio_pin_get(device_t dev, uint32_t pin, unsigned int *val)
271 {
272 	struct mvebu_gpio_softc *sc;
273 
274 	sc = device_get_softc(dev);
275 	if (pin >= sc->gpio_npins)
276 		return (EINVAL);
277 
278 	GPIO_LOCK(sc);
279 	*val = gpio_read(sc, GPIO_DATA_IN, &sc->gpio_pins[pin]);
280 	*val ^= gpio_read(sc, GPIO_DATA_IN_POL, &sc->gpio_pins[pin]);
281 	GPIO_UNLOCK(sc);
282 
283 	return (0);
284 }
285 
286 static int
287 mvebu_gpio_pin_toggle(device_t dev, uint32_t pin)
288 {
289 	struct mvebu_gpio_softc *sc;
290 	uint32_t val;
291 
292 	sc = device_get_softc(dev);
293 	if (pin >= sc->gpio_npins)
294 		return (EINVAL);
295 
296 	GPIO_LOCK(sc);
297 	mvebu_gpio_pin_get(sc->dev, pin, &val);
298 	if (val != 0)
299 		gpio_write(sc, GPIO_DATA_CLR, &sc->gpio_pins[pin], 1);
300 	else
301 		gpio_write(sc, GPIO_DATA_SET, &sc->gpio_pins[pin], 1);
302 	GPIO_UNLOCK(sc);
303 
304 	return (0);
305 }
306 
307 /* --------------------------------------------------------------------------
308  *
309  * Interrupts
310  *
311  */
312 static inline void
313 intr_modify(struct mvebu_gpio_softc *sc, bus_addr_t reg,
314     struct mvebu_gpio_irqsrc *mgi, uint32_t val)
315 {
316 	int bit;
317 
318 	bit = GPIO_BIT(mgi->irq);
319 	SYSCON_MODIFY_4(sc->syscon,
320 	    sc->offset + GPIO_REGNUM(mgi->irq) + reg, 1 << bit,
321 	    (val & 1) << bit);
322 }
323 
324 static inline void
325 mvebu_gpio_isrc_mask(struct mvebu_gpio_softc *sc,
326      struct mvebu_gpio_irqsrc *mgi, uint32_t val)
327 {
328 
329 	if (mgi->is_level)
330 		intr_modify(sc, GPIO_INT_LEVEL_MASK, mgi, val);
331 	else
332 		intr_modify(sc, GPIO_INT_MASK, mgi, val);
333 }
334 
335 static inline void
336 mvebu_gpio_isrc_eoi(struct mvebu_gpio_softc *sc,
337      struct mvebu_gpio_irqsrc *mgi)
338 {
339 	int bit;
340 
341 	if (!mgi->is_level) {
342 		bit = GPIO_BIT(mgi->irq);
343 		SYSCON_WRITE_4(sc->syscon,
344 		    sc->offset + GPIO_REGNUM(mgi->irq) + GPIO_INT_CAUSE,
345 		    ~(1 << bit));
346 	}
347 }
348 
349 static int
350 mvebu_gpio_pic_attach(struct mvebu_gpio_softc *sc)
351 {
352 	int rv;
353 	uint32_t irq;
354 	const char *name;
355 
356 	sc->isrcs = malloc(sizeof(*sc->isrcs) * sc->gpio_npins, M_DEVBUF,
357 	    M_WAITOK | M_ZERO);
358 
359 	name = device_get_nameunit(sc->dev);
360 	for (irq = 0; irq < sc->gpio_npins; irq++) {
361 		sc->isrcs[irq].irq = irq;
362 		sc->isrcs[irq].is_level = false;
363 		sc->isrcs[irq].is_inverted = false;
364 		rv = intr_isrc_register(&sc->isrcs[irq].isrc,
365 		    sc->dev, 0, "%s,%u", name, irq);
366 		if (rv != 0)
367 			return (rv); /* XXX deregister ISRCs */
368 	}
369 	if (intr_pic_register(sc->dev,
370 	    OF_xref_from_node(ofw_bus_get_node(sc->dev))) == NULL)
371 		return (ENXIO);
372 
373 	return (0);
374 }
375 
376 static int
377 mvebu_gpio_pic_detach(struct mvebu_gpio_softc *sc)
378 {
379 
380 	/*
381 	 *  There has not been established any procedure yet
382 	 *  how to detach PIC from living system correctly.
383 	 */
384 	device_printf(sc->dev, "%s: not implemented yet\n", __func__);
385 	return (EBUSY);
386 }
387 
388 static void
389 mvebu_gpio_pic_disable_intr(device_t dev, struct intr_irqsrc *isrc)
390 {
391 	struct mvebu_gpio_softc *sc;
392 	struct mvebu_gpio_irqsrc *mgi;
393 
394 	sc = device_get_softc(dev);
395 	mgi = (struct mvebu_gpio_irqsrc *)isrc;
396 	mvebu_gpio_isrc_mask(sc, mgi, 0);
397 }
398 
399 static void
400 mvebu_gpio_pic_enable_intr(device_t dev, struct intr_irqsrc *isrc)
401 {
402 	struct mvebu_gpio_softc *sc;
403 	struct mvebu_gpio_irqsrc *mgi;
404 
405 	sc = device_get_softc(dev);
406 	mgi = (struct mvebu_gpio_irqsrc *)isrc;
407 	mvebu_gpio_isrc_mask(sc, mgi, 1);
408 }
409 
410 static int
411 mvebu_gpio_pic_map_fdt(struct mvebu_gpio_softc *sc, u_int ncells,
412     pcell_t *cells, u_int *irqp, bool *invertedp, bool *levelp)
413 {
414 	bool inverted, level;
415 
416 	/*
417 	 * The first cell is the interrupt number.
418 	 * The second cell is used to specify flags:
419 	 *	bits[3:0] trigger type and level flags:
420 	 *		1 = low-to-high edge triggered.
421 	 *		2 = high-to-low edge triggered.
422 	 *		4 = active high level-sensitive.
423 	 *		8 = active low level-sensitive.
424 	 */
425 	if (ncells != 2 || cells[0] >= sc->gpio_npins)
426 		return (EINVAL);
427 
428 	switch (cells[1]) {
429 	case 1:
430 		inverted  = false;
431 		level  = false;
432 		break;
433 	case 2:
434 		inverted  = true;
435 		level  = false;
436 		break;
437 	case 4:
438 		inverted  = false;
439 		level  = true;
440 		break;
441 	case 8:
442 		inverted  = true;
443 		level  = true;
444 		break;
445 	default:
446 		return (EINVAL);
447 	}
448 	*irqp = cells[0];
449 	if (invertedp != NULL)
450 		*invertedp = inverted;
451 	if (levelp != NULL)
452 		*levelp = level;
453 	return (0);
454 }
455 
456 static int
457 mvebu_gpio_pic_map_gpio(struct mvebu_gpio_softc *sc, u_int gpio_pin_num,
458     u_int gpio_pin_flags, u_int intr_mode, u_int *irqp, bool *invertedp,
459     bool *levelp)
460 {
461 	bool inverted, level;
462 
463 	if (gpio_pin_num >= sc->gpio_npins)
464 		return (EINVAL);
465 
466 	switch (intr_mode) {
467 	case GPIO_INTR_LEVEL_LOW:
468 		inverted  = true;
469 		level = true;
470 		break;
471 	case GPIO_INTR_LEVEL_HIGH:
472 		inverted  = false;
473 		level = true;
474 		break;
475 	case GPIO_INTR_CONFORM:
476 	case GPIO_INTR_EDGE_RISING:
477 		inverted  = false;
478 		level = false;
479 		break;
480 	case GPIO_INTR_EDGE_FALLING:
481 		inverted  = true;
482 		level = false;
483 		break;
484 	default:
485 		return (EINVAL);
486 	}
487 	*irqp = gpio_pin_num;
488 	if (invertedp != NULL)
489 		*invertedp = inverted;
490 	if (levelp != NULL)
491 		*levelp = level;
492 	return (0);
493 }
494 
495 static int
496 mvebu_gpio_pic_map_intr(device_t dev, struct intr_map_data *data,
497     struct intr_irqsrc **isrcp)
498 {
499 	int rv;
500 	u_int irq;
501 	struct mvebu_gpio_softc *sc;
502 
503 	sc = device_get_softc(dev);
504 
505 	if (data->type == INTR_MAP_DATA_FDT) {
506 		struct intr_map_data_fdt *daf;
507 
508 		daf = (struct intr_map_data_fdt *)data;
509 		rv = mvebu_gpio_pic_map_fdt(sc, daf->ncells, daf->cells, &irq,
510 		    NULL, NULL);
511 	} else if (data->type == INTR_MAP_DATA_GPIO) {
512 		struct intr_map_data_gpio *dag;
513 
514 		dag = (struct intr_map_data_gpio *)data;
515 		rv = mvebu_gpio_pic_map_gpio(sc, dag->gpio_pin_num,
516 		   dag->gpio_pin_flags, dag->gpio_intr_mode, &irq, NULL, NULL);
517 	} else
518 		return (ENOTSUP);
519 
520 	if (rv == 0)
521 		*isrcp = &sc->isrcs[irq].isrc;
522 	return (rv);
523 }
524 
525 static void
526 mvebu_gpio_pic_post_filter(device_t dev, struct intr_irqsrc *isrc)
527 {
528 	struct mvebu_gpio_softc *sc;
529 	struct mvebu_gpio_irqsrc *mgi;
530 
531 	sc = device_get_softc(dev);
532 	mgi = (struct mvebu_gpio_irqsrc *)isrc;
533 	if (mgi->is_level)
534 		mvebu_gpio_isrc_eoi(sc, mgi);
535 }
536 
537 static void
538 mvebu_gpio_pic_post_ithread(device_t dev, struct intr_irqsrc *isrc)
539 {
540 	struct mvebu_gpio_softc *sc;
541 	struct mvebu_gpio_irqsrc *mgi;
542 
543 	sc = device_get_softc(dev);
544 	mgi = (struct mvebu_gpio_irqsrc *)isrc;
545 	mvebu_gpio_isrc_mask(sc, mgi, 1);
546 }
547 
548 static void
549 mvebu_gpio_pic_pre_ithread(device_t dev, struct intr_irqsrc *isrc)
550 {
551 	struct mvebu_gpio_softc *sc;
552 	struct mvebu_gpio_irqsrc *mgi;
553 
554 	sc = device_get_softc(dev);
555 	mgi = (struct mvebu_gpio_irqsrc *)isrc;
556 
557 	mvebu_gpio_isrc_mask(sc, mgi, 0);
558 	if (mgi->is_level)
559 		mvebu_gpio_isrc_eoi(sc, mgi);
560 }
561 
562 static int
563 mvebu_gpio_pic_setup_intr(device_t dev, struct intr_irqsrc *isrc,
564     struct resource *res, struct intr_map_data *data)
565 {
566 	u_int irq;
567 	bool inverted, level;
568 	int rv;
569 	struct mvebu_gpio_softc *sc;
570 	struct mvebu_gpio_irqsrc *mgi;
571 
572 	sc = device_get_softc(dev);
573 	mgi = (struct mvebu_gpio_irqsrc *)isrc;
574 
575 	if (data == NULL)
576 		return (ENOTSUP);
577 
578 	/* Get and check config for an interrupt. */
579 	if (data->type == INTR_MAP_DATA_FDT) {
580 		struct intr_map_data_fdt *daf;
581 
582 		daf = (struct intr_map_data_fdt *)data;
583 		rv = mvebu_gpio_pic_map_fdt(sc, daf->ncells, daf->cells, &irq,
584 		    &inverted, &level);
585 	} else if (data->type == INTR_MAP_DATA_GPIO) {
586 		struct intr_map_data_gpio *dag;
587 
588 		dag = (struct intr_map_data_gpio *)data;
589 		rv = mvebu_gpio_pic_map_gpio(sc, dag->gpio_pin_num,
590 		   dag->gpio_pin_flags, dag->gpio_intr_mode, &irq,
591 		   &inverted, &level);
592 	} else
593 		return (ENOTSUP);
594 
595 	if (rv != 0)
596 		return (EINVAL);
597 
598 	/*
599 	 * If this is a setup for another handler,
600 	 * only check that its configuration match.
601 	 */
602 	if (isrc->isrc_handlers != 0)
603 		return (
604 		    mgi->is_level == level && mgi->is_inverted == inverted ?
605 		    0 : EINVAL);
606 
607 	mgi->is_level = level;
608 	mgi->is_inverted = inverted;
609 
610 	GPIO_LOCK(sc);
611 	intr_modify(sc, GPIO_DATA_IN_POL, mgi, inverted ? 1 : 0);
612 	mvebu_gpio_pic_enable_intr(dev, isrc);
613 	GPIO_UNLOCK(sc);
614 
615 	return (0);
616 }
617 
618 static int
619 mvebu_gpio_pic_teardown_intr(device_t dev, struct intr_irqsrc *isrc,
620     struct resource *res, struct intr_map_data *data)
621 {
622 	struct mvebu_gpio_softc *sc;
623 	struct mvebu_gpio_irqsrc *mgi;
624 
625 	sc = device_get_softc(dev);
626 	mgi = (struct mvebu_gpio_irqsrc *)isrc;
627 
628 	if (isrc->isrc_handlers == 0)
629 		mvebu_gpio_isrc_mask(sc, mgi, 0);
630 	return (0);
631 }
632 
633 /* --------------------------------------------------------------------------
634  *
635  * Bus
636  *
637  */
638 
639 static int
640 mvebu_gpio_intr(void *arg)
641 {
642 	u_int i, lvl, edge;
643 	struct mvebu_gpio_softc *sc;
644 	struct trapframe *tf;
645 	struct mvebu_gpio_irqsrc *mgi;
646 	struct mvebu_gpio_irq_cookie *cookie;
647 
648 	cookie = (struct mvebu_gpio_irq_cookie *)arg;
649 	sc = cookie->sc;
650 	tf = curthread->td_intr_frame;
651 
652 	for (i = 0; i < sc->gpio_npins; i++) {
653 		lvl = gpio_read(sc, GPIO_DATA_IN, &sc->gpio_pins[i]);
654 		lvl &= gpio_read(sc, GPIO_INT_LEVEL_MASK, &sc->gpio_pins[i]);
655 		edge = gpio_read(sc, GPIO_DATA_IN, &sc->gpio_pins[i]);
656 		edge &= gpio_read(sc, GPIO_INT_LEVEL_MASK, &sc->gpio_pins[i]);
657 		if (edge == 0  && lvl == 0)
658 			continue;
659 
660 		mgi = &sc->isrcs[i];
661 		if (!mgi->is_level)
662 			mvebu_gpio_isrc_eoi(sc, mgi);
663 
664 		if (intr_isrc_dispatch(&mgi->isrc, tf) != 0) {
665 			mvebu_gpio_isrc_mask(sc, mgi, 0);
666 			if (mgi->is_level)
667 				mvebu_gpio_isrc_eoi(sc, mgi);
668 			device_printf(sc->dev,
669 			    "Stray irq %u disabled\n", mgi->irq);
670 		}
671 	}
672 	return (FILTER_HANDLED);
673 }
674 
675 static int
676 mvebu_gpio_probe(device_t dev)
677 {
678 
679 	if (!ofw_bus_status_okay(dev))
680 		return (ENXIO);
681 	if (ofw_bus_search_compatible(dev, compat_data)->ocd_data == 0)
682 		return (ENXIO);
683 
684 	device_set_desc(dev, "Marvell Integrated GPIO Controller");
685 	return (0);
686 }
687 
688 static int
689 mvebu_gpio_detach(device_t dev)
690 {
691 	struct mvebu_gpio_softc *sc;
692 	int i;
693 
694 	sc = device_get_softc(dev);
695 
696 	KASSERT(mtx_initialized(&sc->mtx), ("gpio mutex not initialized"));
697 
698 	for (i = 0; i < MV_GPIO_MAX_NIRQS; i++) {
699 		if (sc->irq_ih[i] != NULL)
700 			bus_teardown_intr(dev, sc->irq_res[i], sc->irq_ih[i]);
701 	}
702 
703 	if (sc->isrcs != NULL)
704 		mvebu_gpio_pic_detach(sc);
705 
706 	gpiobus_detach_bus(dev);
707 
708 	for (i = 0; i < MV_GPIO_MAX_NIRQS; i++) {
709 		if (sc->irq_res[i] != NULL)
710 			bus_release_resource(dev, SYS_RES_IRQ, 0,
711 			     sc->irq_res[i]);
712 	}
713 	GPIO_LOCK_DESTROY(sc);
714 
715 	return(0);
716 }
717 
718 static int
719 mvebu_gpio_attach(device_t dev)
720 {
721 	struct mvebu_gpio_softc *sc;
722 	phandle_t node;
723 	struct gpio_pin *pin;
724 	pcell_t pincnt;
725 	int i, rv, rid;
726 
727 	sc = device_get_softc(dev);
728 	sc->dev = dev;
729 	node = ofw_bus_get_node(dev);
730 
731 	GPIO_LOCK_INIT(sc);
732 
733 	pincnt = 0;
734 	rv = OF_getencprop(node, "ngpios", &pincnt, sizeof(pcell_t));
735 	if (rv < 0) {
736 		device_printf(dev,
737 		    "ERROR: no pin-count or ngpios entry found!\n");
738 		return (ENXIO);
739 	}
740 
741 	sc->gpio_npins = MIN(pincnt, MV_GPIO_MAX_NPINS);
742 	if (bootverbose)
743 		device_printf(dev,
744 		    "%d pins available\n", sc->gpio_npins);
745 
746 	rv = OF_getencprop(node, "offset", &sc->offset, sizeof(sc->offset));
747 	if (rv == -1) {
748 		device_printf(dev, "ERROR: no 'offset' property found!\n");
749 		return (ENXIO);
750 	}
751 
752 	if (SYSCON_GET_HANDLE(sc->dev, &sc->syscon) != 0 ||
753 	    sc->syscon == NULL) {
754 		device_printf(dev, "ERROR: cannot get syscon handle!\n");
755 		return (ENXIO);
756 	}
757 
758 	/* Allocate interrupts. */
759 	for (i = 0; i < MV_GPIO_MAX_NIRQS; i++) {
760 		sc->irq_cookies[i].sc = sc;
761 		sc->irq_cookies[i].bank_num = i;
762 		rid = i;
763 		sc->irq_res[i] = bus_alloc_resource_any(dev, SYS_RES_IRQ,
764 		    &rid, RF_ACTIVE);
765 		if (sc->irq_res[i] == NULL)
766 			break;
767 		if ((bus_setup_intr(dev, sc->irq_res[i],
768 		    INTR_TYPE_MISC | INTR_MPSAFE, mvebu_gpio_intr, NULL,
769 		    &sc->irq_cookies[i], &sc->irq_ih[i]))) {
770 			device_printf(dev,
771 			    "WARNING: unable to register interrupt handler\n");
772 			mvebu_gpio_detach(dev);
773 			return (ENXIO);
774 		}
775 	}
776 
777 	/* Init GPIO pins */
778 	for (i = 0; i < sc->gpio_npins; i++) {
779 		pin = sc->gpio_pins + i;
780 		pin->gp_pin = i;
781 		if (sc->irq_res[0] != NULL)
782 			pin->gp_caps = GPIO_PIN_INPUT | GPIO_PIN_OUTPUT |
783 			    GPIO_INTR_LEVEL_LOW | GPIO_INTR_LEVEL_HIGH |
784 			    GPIO_INTR_EDGE_RISING | GPIO_INTR_EDGE_FALLING;
785 		else
786 			pin->gp_caps = GPIO_PIN_INPUT | GPIO_PIN_OUTPUT;
787 		pin->gp_flags =
788 		    gpio_read(sc, GPIO_CONTROL, &sc->gpio_pins[i]) == 0 ?
789 		    GPIO_PIN_OUTPUT : GPIO_PIN_INPUT;
790 		snprintf(pin->gp_name, GPIOMAXNAME, "gpio%d", i);
791 
792 		/* Init HW */
793 		gpio_modify(sc, GPIO_INT_MASK, pin, 0);
794 		gpio_modify(sc, GPIO_INT_LEVEL_MASK, pin, 0);
795 		gpio_modify(sc, GPIO_INT_CAUSE, pin, 0);
796 		gpio_modify(sc, GPIO_DATA_IN_POL, pin, 0);
797 		gpio_modify(sc, GPIO_BLINK_ENA, pin, 0);
798 	}
799 
800 	if (sc->irq_res[0] != NULL) {
801 		rv = mvebu_gpio_pic_attach(sc);
802 		if (rv != 0) {
803 			device_printf(dev, "WARNING: unable to attach PIC\n");
804 			mvebu_gpio_detach(dev);
805 			return (rv);
806 		}
807 	}
808 
809 	sc->busdev = gpiobus_attach_bus(dev);
810 	if (sc->busdev == NULL) {
811 		mvebu_gpio_detach(dev);
812 		return (ENXIO);
813 	}
814 
815 	return (bus_generic_attach(dev));
816 }
817 
818 static int
819 mvebu_gpio_map_gpios(device_t dev, phandle_t pdev, phandle_t gparent,
820     int gcells, pcell_t *gpios, uint32_t *pin, uint32_t *flags)
821 {
822 
823 	if (gcells != 2)
824 		return (ERANGE);
825 	*pin = gpios[0];
826 	*flags= gpios[1];
827 	return (0);
828 }
829 
830 static phandle_t
831 mvebu_gpio_get_node(device_t bus, device_t dev)
832 {
833 
834 	/* We only have one child, the GPIO bus, which needs our own node. */
835 	return (ofw_bus_get_node(bus));
836 }
837 
838 static device_method_t mvebu_gpio_methods[] = {
839 	DEVMETHOD(device_probe,		mvebu_gpio_probe),
840 	DEVMETHOD(device_attach,	mvebu_gpio_attach),
841 	DEVMETHOD(device_detach,	mvebu_gpio_detach),
842 
843 	/* Interrupt controller interface */
844 	DEVMETHOD(pic_disable_intr,	mvebu_gpio_pic_disable_intr),
845 	DEVMETHOD(pic_enable_intr,	mvebu_gpio_pic_enable_intr),
846 	DEVMETHOD(pic_map_intr,		mvebu_gpio_pic_map_intr),
847 	DEVMETHOD(pic_setup_intr,	mvebu_gpio_pic_setup_intr),
848 	DEVMETHOD(pic_teardown_intr,	mvebu_gpio_pic_teardown_intr),
849 	DEVMETHOD(pic_post_filter,	mvebu_gpio_pic_post_filter),
850 	DEVMETHOD(pic_post_ithread,	mvebu_gpio_pic_post_ithread),
851 	DEVMETHOD(pic_pre_ithread,	mvebu_gpio_pic_pre_ithread),
852 
853 	/* GPIO protocol */
854 	DEVMETHOD(gpio_get_bus,		mvebu_gpio_get_bus),
855 	DEVMETHOD(gpio_pin_max,		mvebu_gpio_pin_max),
856 	DEVMETHOD(gpio_pin_getname,	mvebu_gpio_pin_getname),
857 	DEVMETHOD(gpio_pin_getflags,	mvebu_gpio_pin_getflags),
858 	DEVMETHOD(gpio_pin_getcaps,	mvebu_gpio_pin_getcaps),
859 	DEVMETHOD(gpio_pin_setflags,	mvebu_gpio_pin_setflags),
860 	DEVMETHOD(gpio_pin_get,		mvebu_gpio_pin_get),
861 	DEVMETHOD(gpio_pin_set,		mvebu_gpio_pin_set),
862 	DEVMETHOD(gpio_pin_toggle,	mvebu_gpio_pin_toggle),
863 	DEVMETHOD(gpio_map_gpios,	mvebu_gpio_map_gpios),
864 
865 	/* ofw_bus interface */
866 	DEVMETHOD(ofw_bus_get_node,	mvebu_gpio_get_node),
867 
868 	DEVMETHOD_END
869 };
870 
871 static DEFINE_CLASS_0(gpio, mvebu_gpio_driver, mvebu_gpio_methods,
872     sizeof(struct mvebu_gpio_softc));
873 EARLY_DRIVER_MODULE(mvebu_gpio, simplebus, mvebu_gpio_driver, NULL, NULL,
874      BUS_PASS_TIMER + BUS_PASS_ORDER_LAST);
875