Misc interrupts/LWKT 1/2: interlock the idle thread. Put execution of
[dragonfly.git] / sys / kern / kern_intr.c
CommitLineData
984263bc 1/*
ef0fdad1
MD
2 * Copyright (c) 2003, Matthew Dillon <dillon@backplane.com> All rights reserved.
3 * Copyright (c) 1997, Stefan Esser <se@freebsd.org> All rights reserved.
984263bc
MD
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice unmodified, this list of conditions, and the following
10 * disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25 *
26 * $FreeBSD: src/sys/kern/kern_intr.c,v 1.24.2.1 2001/10/14 20:05:50 luigi Exp $
4b5f931b 27 * $DragonFly: src/sys/kern/kern_intr.c,v 1.5 2003/06/29 07:37:06 dillon Exp $
984263bc
MD
28 *
29 */
30
984263bc
MD
31#include <sys/param.h>
32#include <sys/systm.h>
33#include <sys/malloc.h>
34#include <sys/kernel.h>
35#include <sys/sysctl.h>
ef0fdad1
MD
36#include <sys/thread.h>
37#include <sys/proc.h>
38#include <sys/thread2.h>
984263bc
MD
39
40#include <machine/ipl.h>
41
42#include <sys/interrupt.h>
43
ef0fdad1
MD
44typedef struct intrec {
45 struct intrec *next;
46 inthand2_t *handler;
47 void *argument;
48 const char *name;
49 int intr;
50} intrec_t;
51
52static intrec_t *intlists[NHWI+NSWI];
53static thread_t ithreads[NHWI+NSWI];
54static struct thread ithread_ary[NHWI+NSWI];
984263bc 55
ef0fdad1 56static void ithread_handler(void *arg);
984263bc
MD
57
58void
ef0fdad1 59register_swi(int intr, inthand2_t *handler, void *arg, const char *name)
984263bc 60{
ef0fdad1
MD
61 if (intr < NHWI || intr >= NHWI + NSWI)
62 panic("register_swi: bad intr %d", intr);
63 register_int(intr, handler, arg, name);
984263bc
MD
64}
65
66void
ef0fdad1 67register_int(int intr, inthand2_t *handler, void *arg, const char *name)
984263bc 68{
ef0fdad1
MD
69 intrec_t **list;
70 intrec_t *rec;
71 thread_t td;
72
73 if (intr < 0 || intr > NHWI + NSWI)
74 panic("register_int: bad intr %d", intr);
75
76 rec = malloc(sizeof(intrec_t), M_DEVBUF, M_NOWAIT);
77 if (rec == NULL)
78 panic("register_swi: malloc failed");
79 rec->handler = handler;
80 rec->argument = arg;
81 rec->name = name;
82 rec->intr = intr;
83 rec->next = NULL;
84
85 list = &intlists[intr];
86
87 /*
88 * Create an interrupt thread if necessary, leave it in an unscheduled
89 * state.
90 */
91 if ((td = ithreads[intr]) == NULL) {
92 lwkt_create((void *)ithread_handler, (void *)intr, &ithreads[intr],
93 &ithread_ary[intr], TDF_STOPREQ, "ithread %d", intr);
94 td = ithreads[intr];
4b5f931b
MD
95 if (intr >= NHWI && intr < NHWI + NSWI)
96 lwkt_setpri(td, TDPRI_SOFT_NORM);
97 else
98 lwkt_setpri(td, TDPRI_INT_MED);
ef0fdad1
MD
99 }
100
101 /*
102 * Add the record to the interrupt list
103 */
104 crit_enter(); /* token */
105 while (*list != NULL)
106 list = &(*list)->next;
107 *list = rec;
108 crit_exit();
109}
984263bc 110
ef0fdad1
MD
111void
112unregister_swi(int intr, inthand2_t *handler)
113{
114 if (intr < NHWI || intr >= NHWI + NSWI)
115 panic("register_swi: bad intr %d", intr);
116 unregister_int(intr, handler);
984263bc
MD
117}
118
119void
ef0fdad1 120unregister_int(int intr, inthand2_t handler)
984263bc 121{
ef0fdad1
MD
122 intrec_t **list;
123 intrec_t *rec;
124
125 if (intr < 0 || intr > NHWI + NSWI)
126 panic("register_int: bad intr %d", intr);
127 list = &intlists[intr];
128 crit_enter();
129 while ((rec = *list) != NULL) {
130 if (rec->handler == (void *)handler) {
131 *list = rec->next;
132 break;
984263bc 133 }
ef0fdad1
MD
134 list = &rec->next;
135 }
136 crit_exit();
137 if (rec != NULL) {
138 free(rec, M_DEVBUF);
139 } else {
140 printf("warning: unregister_int: int %d handler %p not found\n",
141 intr, handler);
142 }
984263bc
MD
143}
144
4b5f931b
MD
145void
146swi_setpriority(int intr, int pri)
147{
148 struct thread *td;
149
150 if (intr < NHWI || intr >= NHWI + NSWI)
151 panic("register_swi: bad intr %d", intr);
152 if ((td = ithreads[intr]) != NULL)
153 lwkt_setpri(td, pri);
154}
155
ef0fdad1 156/*
b68b7282
MD
157 * Dispatch an interrupt. If there's nothing to do we have a stray
158 * interrupt and can just return, leaving the interrupt masked.
ef0fdad1
MD
159 */
160void
161sched_ithd(int intr)
162{
163 thread_t td;
164
165 if ((td = ithreads[intr]) != NULL) {
b68b7282 166 if (intlists[intr] == NULL) {
ef0fdad1 167 printf("sched_ithd: stray interrupt %d\n", intr);
b68b7282 168 } else {
ef0fdad1 169 lwkt_schedule(td);
b68b7282
MD
170 lwkt_preempt(td, intr);
171 }
ef0fdad1
MD
172 } else {
173 printf("sched_ithd: stray interrupt %d\n", intr);
174 }
175}
176
b68b7282
MD
177/*
178 * Interrupt threads run this as their main loop.
179 */
ef0fdad1
MD
180static void
181ithread_handler(void *arg)
182{
183 int intr = (int)arg;
184 intrec_t **list = &intlists[intr];
185 intrec_t *rec;
186 intrec_t *nrec;
4b5f931b 187 int xpri = (curthread->td_pri & TDPRI_MASK) + TDPRI_CRIT; /* DEBUG YYY */
ef0fdad1
MD
188
189 crit_enter(); /* replaces SPLs */
190 for (;;) {
191 for (rec = *list; rec; rec = nrec) {
192 nrec = rec->next;
193 rec->handler(rec->argument);
194 }
195 ithread_done(intr);
b68b7282
MD
196
197 /*
198 * temporary sanity check. If we preempted another thread we
199 * are placed in another critical section by that thread which
200 * will be released when we block and resume the original thread.
201 */
4b5f931b
MD
202 KKASSERT(curthread->td_pri == xpri ||
203 (curthread->td_preempted && curthread->td_pri == xpri + TDPRI_CRIT));
ef0fdad1
MD
204 }
205 crit_exit(); /* not reached */
206}
207
208
984263bc
MD
209/*
210 * Sysctls used by systat and others: hw.intrnames and hw.intrcnt.
211 * The data for this machine dependent, and the declarations are in machine
212 * dependent code. The layout of intrnames and intrcnt however is machine
213 * independent.
214 *
215 * We do not know the length of intrcnt and intrnames at compile time, so
216 * calculate things at run time.
217 */
218static int
219sysctl_intrnames(SYSCTL_HANDLER_ARGS)
220{
221 return (sysctl_handle_opaque(oidp, intrnames, eintrnames - intrnames,
222 req));
223}
224
225SYSCTL_PROC(_hw, OID_AUTO, intrnames, CTLTYPE_OPAQUE | CTLFLAG_RD,
226 NULL, 0, sysctl_intrnames, "", "Interrupt Names");
227
228static int
229sysctl_intrcnt(SYSCTL_HANDLER_ARGS)
230{
231 return (sysctl_handle_opaque(oidp, intrcnt,
232 (char *)eintrcnt - (char *)intrcnt, req));
233}
234
235SYSCTL_PROC(_hw, OID_AUTO, intrcnt, CTLTYPE_OPAQUE | CTLFLAG_RD,
236 NULL, 0, sysctl_intrcnt, "", "Interrupt Counts");