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