/* $NetBSD: isr.c,v 1.33 2010/12/20 00:25:39 matt Exp $ */ /*- * Copyright (c) 1996 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Adam Glass, Gordon W. Ross, and Jason R. Thorpe. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */ /* * Link and dispatch interrupts. */ #include __KERNEL_RCSID(0, "$NetBSD: isr.c,v 1.33 2010/12/20 00:25:39 matt Exp $"); #include #include #include #include #include #include #include #include volatile unsigned int interrupt_depth; isr_autovec_list_t isr_autovec[NISRAUTOVEC]; struct isr_vectored isr_vectored[NISRVECTORED]; static const char irqgroupname[] = "hard irqs"; struct evcnt mvme68k_irq_evcnt[] = { EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, irqgroupname, "spur"), EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, irqgroupname, "lev1"), EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, irqgroupname, "lev2"), EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, irqgroupname, "lev3"), EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, irqgroupname, "lev4"), EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, irqgroupname, "lev5"), EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, irqgroupname, "lev6"), EVCNT_INITIALIZER(EVCNT_TYPE_INTR, NULL, irqgroupname, "nmi") }; static int idepth; extern int intrcnt[]; /* from locore.s. XXXSCW: will go away soon */ extern void (*vectab[])(void); extern void badtrap(void); extern void intrhand_vectored(void); static int spurintr(void *); void isrinit(void) { int i; /* Initialize the autovector lists. */ for (i = 0; i < NISRAUTOVEC; ++i) LIST_INIT(&isr_autovec[i]); /* Initialise the interrupt event counts */ for (i = 0; i < (sizeof(mvme68k_irq_evcnt) / sizeof(struct evcnt)); i++) evcnt_attach_static(&mvme68k_irq_evcnt[i]); /* Arrange to trap Spurious and NMI auto-vectored Interrupts */ isrlink_autovec(spurintr, NULL, 0, 0, NULL); isrlink_autovec(nmihand, NULL, 7, 0, NULL); } /* * Establish an autovectored interrupt handler. * Called by driver attach functions. */ void isrlink_autovec(int (*func)(void *), void *arg, int ipl, int priority, struct evcnt *evcnt) { struct isr_autovec *newisr, *curisr; isr_autovec_list_t *list; #ifdef DIAGNOSTIC if ((ipl < 0) || (ipl >= NISRAUTOVEC)) panic("%s: bad ipl %d", __func__, ipl); #endif newisr = malloc(sizeof(struct isr_autovec), M_DEVBUF, M_NOWAIT); if (newisr == NULL) panic("%s: can't allocate space for isr", __func__); /* Fill in the new entry. */ newisr->isr_func = func; newisr->isr_arg = arg; newisr->isr_ipl = ipl; newisr->isr_priority = priority; newisr->isr_evcnt = evcnt; /* * Some devices are particularly sensitive to interrupt * handling latency. The SCC, for example, can lose many * characters if its interrupt isn't handled with reasonable * speed. * * To work around this problem, each device can give itself a * "priority". An unbuffered SCC would give itself a higher * priority than a SCSI device, for example. * * This solution was originally developed for the hp300, which * has a flat spl scheme (by necessity). Thankfully, the * MVME systems don't have this problem, though this may serve * a useful purpose in any case. */ /* * Get the appropriate ISR list. If the list is empty, no * additional work is necessary; we simply insert ourselves * at the head of the list. */ list = &isr_autovec[ipl]; if (list->lh_first == NULL) { LIST_INSERT_HEAD(list, newisr, isr_link); return; } /* * A little extra work is required. We traverse the list * and place ourselves after any ISRs with our current (or * higher) priority. */ for (curisr = list->lh_first; curisr->isr_link.le_next != NULL; curisr = curisr->isr_link.le_next) { if (newisr->isr_priority > curisr->isr_priority) { LIST_INSERT_BEFORE(curisr, newisr, isr_link); return; } } /* * We're the least important entry, it seems. We just go * on the end. */ LIST_INSERT_AFTER(curisr, newisr, isr_link); } /* * Establish a vectored interrupt handler. * Called by bus interrupt establish functions. */ void isrlink_vectored(int (*func)(void *), void *arg, int ipl, int vec, struct evcnt *evcnt) { struct isr_vectored *isr; #ifdef DIAGNOSTIC if ((ipl < 0) || (ipl >= NISRAUTOVEC)) panic("%s: bad ipl %d", __func__, ipl); if ((vec < ISRVECTORED) || (vec >= ISRVECTORED + NISRVECTORED)) panic("%s: bad vec 0x%x", __func__, vec); #endif isr = &isr_vectored[vec - ISRVECTORED]; #ifdef DIAGNOSTIC if ((vectab[vec] != badtrap) || (isr->isr_func != NULL)) panic("%s: vec 0x%x not available", __func__, vec); #endif /* Fill in the new entry. */ isr->isr_func = func; isr->isr_arg = arg; isr->isr_ipl = ipl; isr->isr_evcnt = evcnt; /* Hook into the vector table. */ vectab[vec] = intrhand_vectored; } /* * Return a pointer to the evcnt structure for * the specified ipl. */ struct evcnt * isrlink_evcnt(int ipl) { #ifdef DIAGNOSTIC if (ipl < 0 || ipl >= (sizeof(mvme68k_irq_evcnt) / sizeof(struct evcnt))) panic("%s: bad ipl %d", __func__, ipl); #endif return &mvme68k_irq_evcnt[ipl]; } /* * Unhook a vectored interrupt. */ void isrunlink_vectored(int vec) { #ifdef DIAGNOSTIC if ((vec < ISRVECTORED) || (vec >= ISRVECTORED + NISRVECTORED)) panic("%s: bad vec 0x%x", __func__, vec); if (vectab[vec] != intrhand_vectored) panic("%s: not vectored interrupt", __func__); #endif vectab[vec] = badtrap; memset(&isr_vectored[vec - ISRVECTORED], 0, sizeof(struct isr_vectored)); } /* * This is the dispatcher called by the low-level * assembly language autovectored interrupt routine. */ void isrdispatch_autovec(struct clockframe *frame) { struct isr_autovec *isr; isr_autovec_list_t *list; int handled, ipl; void *arg; static int straycount, unexpected; idepth++; ipl = (frame->vec >> 2) - ISRAUTOVEC; #ifdef DIAGNOSTIC if ((ipl < 0) || (ipl >= NISRAUTOVEC)) panic("%s: bad vec 0x%x", __func__, frame->vec); #endif intrcnt[ipl]++; /* XXXSCW: Will go away soon */ mvme68k_irq_evcnt[ipl].ev_count++; curcpu()->ci_data.cpu_nintr++; list = &isr_autovec[ipl]; if (list->lh_first == NULL) { printf("%s: ipl %d unexpected\n", __func__, ipl); if (++unexpected > 10) panic("too many unexpected interrupts"); idepth--; return; } /* Give all the handlers a chance. */ handled = 0; for (isr = list->lh_first ; isr != NULL; isr = isr->isr_link.le_next) { arg = isr->isr_arg ? isr->isr_arg : frame; if ((*isr->isr_func)(arg) != 0) { if (isr->isr_evcnt) isr->isr_evcnt->ev_count++; handled++; } } if (handled) straycount = 0; else if (++straycount > 50) panic("%s: too many stray interrupts", __func__); else printf("%s: stray level %d interrupt\n", __func__, ipl); idepth--; } /* * This is the dispatcher called by the low-level * assembly language vectored interrupt routine. */ void isrdispatch_vectored(int ipl, struct clockframe *frame) { struct isr_vectored *isr; int vec; idepth++; vec = (frame->vec >> 2) - ISRVECTORED; #ifdef DIAGNOSTIC if ((vec < 0) || (vec >= NISRVECTORED)) panic("%s: bad vec 0x%x", __func__, frame->vec); #endif isr = &isr_vectored[vec]; intrcnt[ipl]++; /* XXXSCW: Will go away soon */ mvme68k_irq_evcnt[ipl].ev_count++; curcpu()->ci_data.cpu_nintr++; if (isr->isr_func == NULL) { printf("%s: no handler for vec 0x%x\n", __func__, frame->vec); vectab[vec + ISRVECTORED] = badtrap; idepth--; return; } /* * Handler gets exception frame if argument is NULL. */ if ((*isr->isr_func)(isr->isr_arg ? isr->isr_arg : frame) == 0) printf("%s: vec 0x%x not claimed\n", __func__, frame->vec); else if (isr->isr_evcnt) isr->isr_evcnt->ev_count++; idepth--; } bool cpu_intr_p(void) { return idepth != 0; } /* ARGSUSED */ static int spurintr(void *arg) { return 1; }