Home | History | Annotate | Line # | Download | only in alchemy
au_icu.c revision 1.28
      1 /*	$NetBSD: au_icu.c,v 1.28 2011/07/10 23:13:23 matt Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2006 Itronix Inc.
      5  * All rights reserved.
      6  *
      7  * Written by Garrett D'Amore for Itronix Inc.
      8  *
      9  * Redistribution and use in source and binary forms, with or without
     10  * modification, are permitted provided that the following conditions
     11  * are met:
     12  * 1. Redistributions of source code must retain the above copyright
     13  *    notice, this list of conditions and the following disclaimer.
     14  * 2. Redistributions in binary form must reproduce the above copyright
     15  *    notice, this list of conditions and the following disclaimer in the
     16  *    documentation and/or other materials provided with the distribution.
     17  * 3. The name of Itronix Inc. may not be used to endorse
     18  *    or promote products derived from this software without specific
     19  *    prior written permission.
     20  *
     21  * THIS SOFTWARE IS PROVIDED BY ITRONIX INC. ``AS IS'' AND
     22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     23  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     24  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL ITRONIX INC. BE LIABLE FOR ANY
     25  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
     26  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     27  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
     28  * ON ANY THEORY OF LIABILITY, WHETHER IN
     29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     31  * POSSIBILITY OF SUCH DAMAGE.
     32  */
     33 
     34 /*-
     35  * Copyright (c) 2001 The NetBSD Foundation, Inc.
     36  * All rights reserved.
     37  *
     38  * This code is derived from software contributed to The NetBSD Foundation
     39  * by Jason R. Thorpe.
     40  *
     41  * Redistribution and use in source and binary forms, with or without
     42  * modification, are permitted provided that the following conditions
     43  * are met:
     44  * 1. Redistributions of source code must retain the above copyright
     45  *    notice, this list of conditions and the following disclaimer.
     46  * 2. Redistributions in binary form must reproduce the above copyright
     47  *    notice, this list of conditions and the following disclaimer in the
     48  *    documentation and/or other materials provided with the distribution.
     49  *
     50  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     51  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     52  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     53  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     54  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     55  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     56  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     57  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     58  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     59  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     60  * POSSIBILITY OF SUCH DAMAGE.
     61  */
     62 
     63 /*
     64  * Interrupt support for the Alchemy Semiconductor Au1x00 CPUs.
     65  *
     66  * The Alchemy Semiconductor Au1x00's interrupts are wired to two internal
     67  * interrupt controllers.
     68  */
     69 
     70 #include <sys/cdefs.h>
     71 __KERNEL_RCSID(0, "$NetBSD: au_icu.c,v 1.28 2011/07/10 23:13:23 matt Exp $");
     72 
     73 #include "opt_ddb.h"
     74 #define __INTR_PRIVATE
     75 
     76 #include <sys/param.h>
     77 #include <sys/bus.h>
     78 #include <sys/device.h>
     79 #include <sys/intr.h>
     80 #include <sys/kernel.h>
     81 #include <sys/malloc.h>
     82 #include <sys/systm.h>
     83 
     84 #include <mips/locore.h>
     85 #include <mips/alchemy/include/aureg.h>
     86 #include <mips/alchemy/include/auvar.h>
     87 
     88 #define	REGVAL(x)	*((volatile uint32_t *)(MIPS_PHYS_TO_KSEG1((x))))
     89 
     90 /*
     91  * This is a mask of bits to clear in the SR when we go to a
     92  * given hardware interrupt priority level.
     93  */
     94 
     95 static const struct ipl_sr_map alchemy_ipl_sr_map = {
     96     .sr_bits = {
     97 	[IPL_NONE] =		0,
     98 	[IPL_SOFTCLOCK] =	MIPS_SOFT_INT_MASK_0,
     99 	[IPL_SOFTBIO] =		MIPS_SOFT_INT_MASK_0,
    100 	[IPL_SOFTNET] =		MIPS_SOFT_INT_MASK,
    101 	[IPL_SOFTSERIAL] =	MIPS_SOFT_INT_MASK,
    102 	[IPL_VM] =		MIPS_SOFT_INT_MASK|MIPS_INT_MASK_0,
    103 	[IPL_SCHED] =		MIPS_INT_MASK,
    104 	[IPL_HIGH] =		MIPS_INT_MASK,
    105     },
    106 };
    107 
    108 #define	NIRQS		64
    109 
    110 struct au_icu_intrhead {
    111 	struct evcnt intr_count;
    112 	int intr_refcnt;
    113 };
    114 struct au_icu_intrhead au_icu_intrtab[NIRQS];
    115 
    116 #define	NINTRS			4	/* MIPS INT0 - INT3 */
    117 
    118 struct au_intrhand {
    119 	LIST_ENTRY(au_intrhand) ih_q;
    120 	int (*ih_func)(void *);
    121 	void *ih_arg;
    122 	int ih_irq;
    123 	int ih_mask;
    124 };
    125 
    126 struct au_cpuintr {
    127 	LIST_HEAD(, au_intrhand) cintr_list;
    128 	struct evcnt cintr_count;
    129 };
    130 
    131 struct au_cpuintr au_cpuintrs[NINTRS];
    132 const char * const au_cpuintrnames[NINTRS] = {
    133 	"icu 0, req 0",
    134 	"icu 0, req 1",
    135 	"icu 1, req 0",
    136 	"icu 1, req 1",
    137 };
    138 
    139 static bus_addr_t ic0_base, ic1_base;
    140 
    141 void
    142 au_intr_init(void)
    143 {
    144 	ipl_sr_map = alchemy_ipl_sr_map;
    145 
    146 	for (size_t i = 0; i < NINTRS; i++) {
    147 		LIST_INIT(&au_cpuintrs[i].cintr_list);
    148 		evcnt_attach_dynamic(&au_cpuintrs[i].cintr_count,
    149 		    EVCNT_TYPE_INTR, NULL, "mips", au_cpuintrnames[i]);
    150 	}
    151 
    152 	struct au_chipdep * const chip = au_chipdep();
    153 	KASSERT(chip != NULL);
    154 
    155 	ic0_base = chip->icus[0];
    156 	ic1_base = chip->icus[1];
    157 
    158 	for (size_t i = 0; i < NIRQS; i++) {
    159 		au_icu_intrtab[i].intr_refcnt = 0;
    160 		evcnt_attach_dynamic(&au_icu_intrtab[i].intr_count,
    161 		    EVCNT_TYPE_INTR, NULL, chip->name, chip->irqnames[i]);
    162 	}
    163 
    164 	/* start with all interrupts masked */
    165 	REGVAL(ic0_base + IC_MASK_CLEAR) = 0xffffffff;
    166 	REGVAL(ic0_base + IC_WAKEUP_CLEAR) = 0xffffffff;
    167 	REGVAL(ic0_base + IC_SOURCE_SET) = 0xffffffff;
    168 	REGVAL(ic0_base + IC_RISING_EDGE) = 0xffffffff;
    169 	REGVAL(ic0_base + IC_FALLING_EDGE) = 0xffffffff;
    170 	REGVAL(ic0_base + IC_TEST_BIT) = 0;
    171 
    172 	REGVAL(ic1_base + IC_MASK_CLEAR) = 0xffffffff;
    173 	REGVAL(ic1_base + IC_WAKEUP_CLEAR) = 0xffffffff;
    174 	REGVAL(ic1_base + IC_SOURCE_SET) = 0xffffffff;
    175 	REGVAL(ic1_base + IC_RISING_EDGE) = 0xffffffff;
    176 	REGVAL(ic1_base + IC_FALLING_EDGE) = 0xffffffff;
    177 	REGVAL(ic1_base + IC_TEST_BIT) = 0;
    178 }
    179 
    180 void *
    181 au_intr_establish(int irq, int req, int level, int type,
    182     int (*func)(void *), void *arg)
    183 {
    184 	struct au_intrhand	*ih;
    185 	uint32_t		icu_base;
    186 	int			cpu_int, s;
    187 	struct au_chipdep	*chip;
    188 
    189 	chip = au_chipdep();
    190 	KASSERT(chip != NULL);
    191 
    192 	if (irq >= NIRQS)
    193 		panic("au_intr_establish: bogus IRQ %d", irq);
    194 	if (req > 1)
    195 		panic("au_intr_establish: bogus request %d", req);
    196 
    197 	ih = malloc(sizeof(*ih), M_DEVBUF, M_NOWAIT);
    198 	if (ih == NULL)
    199 		return (NULL);
    200 
    201 	ih->ih_func = func;
    202 	ih->ih_arg = arg;
    203 	ih->ih_irq = irq;
    204 	ih->ih_mask = (1 << (irq & 31));
    205 
    206 	s = splhigh();
    207 
    208 	/*
    209 	 * First, link it into the tables.
    210 	 * XXX do we want a separate list (really, should only be one item, not
    211 	 *     a list anyway) per irq, not per CPU interrupt?
    212 	 */
    213 	cpu_int = (irq < 32 ? 0 : 2) + req;
    214 	LIST_INSERT_HEAD(&au_cpuintrs[cpu_int].cintr_list, ih, ih_q);
    215 
    216 	/*
    217 	 * Now enable it.
    218 	 */
    219 	if (au_icu_intrtab[irq].intr_refcnt++ == 0) {
    220 		icu_base = (irq < 32) ? ic0_base : ic1_base;
    221 
    222 		irq &= 31;	/* throw away high bit if set */
    223 		irq = 1 << irq;	/* only used as a mask from here on */
    224 
    225 		/* XXX Only level interrupts for now */
    226 		switch (type) {
    227 		case IST_NONE:
    228 		case IST_PULSE:
    229 		case IST_EDGE:
    230 			panic("unsupported irq type %d", type);
    231 			/* NOTREACHED */
    232 		case IST_LEVEL:
    233 		case IST_LEVEL_HIGH:
    234 			REGVAL(icu_base + IC_CONFIG2_SET) = irq;
    235 			REGVAL(icu_base + IC_CONFIG1_CLEAR) = irq;
    236 			REGVAL(icu_base + IC_CONFIG0_SET) = irq;
    237 			break;
    238 		case IST_LEVEL_LOW:
    239 			REGVAL(icu_base + IC_CONFIG2_SET) = irq;
    240 			REGVAL(icu_base + IC_CONFIG1_SET) = irq;
    241 			REGVAL(icu_base + IC_CONFIG0_CLEAR) = irq;
    242 			break;
    243 		}
    244 		wbflush();
    245 
    246 		/* XXX handle GPIO interrupts - not done at all yet */
    247 		if (cpu_int & 0x1)
    248 			REGVAL(icu_base + IC_ASSIGN_REQUEST_CLEAR) = irq;
    249 		else
    250 			REGVAL(icu_base + IC_ASSIGN_REQUEST_SET) = irq;
    251 
    252 		/* Associate interrupt with peripheral */
    253 		REGVAL(icu_base + IC_SOURCE_SET) = irq;
    254 
    255 		/* Actually enable the interrupt */
    256 		REGVAL(icu_base + IC_MASK_SET) = irq;
    257 
    258 		/* And allow the interrupt to interrupt idle */
    259 		REGVAL(icu_base + IC_WAKEUP_SET) = irq;
    260 
    261 		wbflush();
    262 	}
    263 	splx(s);
    264 
    265 	return (ih);
    266 }
    267 
    268 void
    269 au_intr_disestablish(void *cookie)
    270 {
    271 	struct au_intrhand *ih = cookie;
    272 	uint32_t icu_base;
    273 	int irq, s;
    274 
    275 	irq = ih->ih_irq;
    276 
    277 	s = splhigh();
    278 
    279 	/*
    280 	 * First, remove it from the table.
    281 	 */
    282 	LIST_REMOVE(ih, ih_q);
    283 
    284 	/*
    285 	 * Now, disable it, if there is nothing remaining on the
    286 	 * list.
    287 	 */
    288 	if (au_icu_intrtab[irq].intr_refcnt-- == 1) {
    289 		icu_base = (irq < 32) ? ic0_base : ic1_base;
    290 
    291 		irq &= 31;	/* throw away high bit if set */
    292 		irq = 1 << irq;	/* only used as a mask from here on */
    293 
    294 		REGVAL(icu_base + IC_CONFIG2_CLEAR) = irq;
    295 		REGVAL(icu_base + IC_CONFIG1_CLEAR) = irq;
    296 		REGVAL(icu_base + IC_CONFIG0_CLEAR) = irq;
    297 
    298 		/* disable with MASK_CLEAR and WAKEUP_CLEAR */
    299 		REGVAL(icu_base + IC_MASK_CLEAR) = irq;
    300 		REGVAL(icu_base + IC_WAKEUP_CLEAR) = irq;
    301 		wbflush();
    302 	}
    303 
    304 	splx(s);
    305 
    306 	free(ih, M_DEVBUF);
    307 }
    308 
    309 void
    310 au_iointr(int ipl, vaddr_t pc, uint32_t ipending)
    311 {
    312 	struct au_intrhand *ih;
    313 	int level;
    314 	uint32_t icu_base, irqstat, irqmask;
    315 
    316 	icu_base = irqstat = 0;
    317 
    318 	for (level = 3; level >= 0; level--) {
    319 		if ((ipending & (MIPS_INT_MASK_0 << level)) == 0)
    320 			continue;
    321 
    322 		/*
    323 		 * XXX	the following may well be slow to execute.
    324 		 *	investigate and possibly speed up.
    325 		 *
    326 		 * is something like:
    327 		 *
    328 		 *    irqstat = REGVAL(
    329 		 *	 (level & 4 == 0) ? IC0_BASE ? IC1_BASE +
    330 		 *	 (level & 2 == 0) ? IC_REQUEST0_INT : IC_REQUEST1_INT);
    331 		 *
    332 		 * be any better?
    333 		 *
    334 		 */
    335 		switch (level) {
    336 		case 0:
    337 			icu_base = ic0_base;
    338 			irqstat = REGVAL(icu_base + IC_REQUEST0_INT);
    339 			break;
    340 		case 1:
    341 			icu_base = ic0_base;
    342 			irqstat = REGVAL(icu_base + IC_REQUEST1_INT);
    343 			break;
    344 		case 2:
    345 			icu_base = ic1_base;
    346 			irqstat = REGVAL(icu_base + IC_REQUEST0_INT);
    347 			break;
    348 		case 3:
    349 			icu_base = ic1_base;
    350 			irqstat = REGVAL(icu_base + IC_REQUEST1_INT);
    351 			break;
    352 		}
    353 		irqmask = REGVAL(icu_base + IC_MASK_READ);
    354 		au_cpuintrs[level].cintr_count.ev_count++;
    355 		LIST_FOREACH(ih, &au_cpuintrs[level].cintr_list, ih_q) {
    356 			int mask = ih->ih_mask;
    357 
    358 			if (mask & irqmask & irqstat) {
    359 				au_icu_intrtab[ih->ih_irq].intr_count.ev_count++;
    360 				(*ih->ih_func)(ih->ih_arg);
    361 
    362 				if (REGVAL(icu_base + IC_MASK_READ) & mask) {
    363 					REGVAL(icu_base + IC_MASK_CLEAR) = mask;
    364 					REGVAL(icu_base + IC_MASK_SET) = mask;
    365 					wbflush();
    366 				}
    367 			}
    368 		}
    369 	}
    370 }
    371 
    372 /*
    373  * Some devices (e.g. PCMCIA) want to be able to mask interrupts at
    374  * the ICU, and leave them masked off until some later time
    375  * (e.g. reenabled by a soft interrupt).
    376  */
    377 
    378 void
    379 au_intr_enable(int irq)
    380 {
    381 	int		s;
    382 	uint32_t	icu_base, mask;
    383 
    384 	if (irq >= NIRQS)
    385 		panic("au_intr_enable: bogus IRQ %d", irq);
    386 
    387 	icu_base = (irq < 32) ? ic0_base : ic1_base;
    388 	mask = irq & 31;
    389 	mask = 1 << mask;
    390 
    391 	s = splhigh();
    392 	/* only enable the interrupt if we have a handler */
    393 	if (au_icu_intrtab[irq].intr_refcnt) {
    394 		REGVAL(icu_base + IC_MASK_SET) = mask;
    395 		REGVAL(icu_base + IC_WAKEUP_SET) = mask;
    396 		wbflush();
    397 	}
    398 	splx(s);
    399 }
    400 
    401 void
    402 au_intr_disable(int irq)
    403 {
    404 	int		s;
    405 	uint32_t	icu_base, mask;
    406 
    407 	if (irq >= NIRQS)
    408 		panic("au_intr_disable: bogus IRQ %d", irq);
    409 
    410 	icu_base = (irq < 32) ? ic0_base : ic1_base;
    411 	mask = irq & 31;
    412 	mask = 1 << mask;
    413 
    414 	s = splhigh();
    415 	REGVAL(icu_base + IC_MASK_CLEAR) = mask;
    416 	REGVAL(icu_base + IC_WAKEUP_CLEAR) = mask;
    417 	wbflush();
    418 	splx(s);
    419 }
    420