source: mainline/kernel/generic/src/interrupt/interrupt.c@ 3ac5086

lfn serial ticket/834-toolchain-update topic/msim-upgrade topic/simplify-dev-export
Last change on this file since 3ac5086 was da68871a, checked in by Adam Hraska <adam.hraska+hos@…>, 13 years ago

Merged changes from mainline.
  • Property mode set to 100644
File size: 8.7 KB
Line 
1/*
2 * Copyright (c) 2005 Ondrej Palkovsky
3 * All rights reserved.
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 *
9 * - Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * - 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 * - The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29/** @addtogroup genericinterrupt
30 * @{
31 */
32/**
33 * @file
34 * @brief Interrupt redirector.
35 *
36 * This file provides means of registering interrupt handlers
37 * by kernel functions and calling the handlers when interrupts
38 * occur.
39 *
40 */
41
42#include <interrupt.h>
43#include <debug.h>
44#include <console/kconsole.h>
45#include <console/console.h>
46#include <console/cmd.h>
47#include <synch/mutex.h>
48#include <time/delay.h>
49#include <macros.h>
50#include <panic.h>
51#include <print.h>
52#include <stdarg.h>
53#include <symtab.h>
54#include <proc/thread.h>
55#include <arch/cycle.h>
56#include <str.h>
57#include <trace.h>
58
59exc_table_t exc_table[IVT_ITEMS];
60IRQ_SPINLOCK_INITIALIZE(exctbl_lock);
61
62/** Register exception handler
63 *
64 * @param n Exception number.
65 * @param name Description.
66 * @param hot Whether the exception is actually handled
67 * in any meaningful way.
68 * @param handler New exception handler.
69 *
70 * @return Previously registered exception handler.
71 *
72 */
73iroutine_t exc_register(unsigned int n, const char *name, bool hot,
74 iroutine_t handler)
75{
76#if (IVT_ITEMS > 0)
77 ASSERT(n < IVT_ITEMS);
78#endif
79
80 irq_spinlock_lock(&exctbl_lock, true);
81
82 iroutine_t old = exc_table[n].handler;
83 exc_table[n].handler = handler;
84 exc_table[n].name = name;
85 exc_table[n].hot = hot;
86 exc_table[n].cycles = 0;
87 exc_table[n].count = 0;
88
89 irq_spinlock_unlock(&exctbl_lock, true);
90
91 return old;
92}
93
94/** Dispatch exception according to exception table
95 *
96 * Called directly from the assembler code.
97 * CPU is interrupts_disable()'d.
98 *
99 */
100NO_TRACE void exc_dispatch(unsigned int n, istate_t *istate)
101{
102#if (IVT_ITEMS > 0)
103 ASSERT(n < IVT_ITEMS);
104#endif
105
106 /* Account user cycles */
107 if (THREAD) {
108 irq_spinlock_lock(&THREAD->lock, false);
109 thread_update_accounting(true);
110 irq_spinlock_unlock(&THREAD->lock, false);
111 }
112
113 /* Account CPU usage if it woke up from sleep */
114 if (CPU && CPU->idle) {
115 irq_spinlock_lock(&CPU->lock, false);
116 uint64_t now = get_cycle();
117 CPU->idle_cycles += now - CPU->last_cycle;
118 CPU->last_cycle = now;
119 CPU->idle = false;
120 irq_spinlock_unlock(&CPU->lock, false);
121 }
122
123 uint64_t begin_cycle = get_cycle();
124
125#ifdef CONFIG_UDEBUG
126 if (THREAD)
127 THREAD->udebug.uspace_state = istate;
128#endif
129
130 exc_table[n].handler(n + IVT_FIRST, istate);
131
132#ifdef CONFIG_UDEBUG
133 if (THREAD)
134 THREAD->udebug.uspace_state = NULL;
135#endif
136
137 /* This is a safe place to exit exiting thread */
138 if ((THREAD) && (THREAD->interrupted) && (istate_from_uspace(istate)))
139 thread_exit();
140
141 /* Account exception handling */
142 uint64_t end_cycle = get_cycle();
143
144 irq_spinlock_lock(&exctbl_lock, false);
145 exc_table[n].cycles += end_cycle - begin_cycle;
146 exc_table[n].count++;
147 irq_spinlock_unlock(&exctbl_lock, false);
148
149 /* Do not charge THREAD for exception cycles */
150 if (THREAD) {
151 irq_spinlock_lock(&THREAD->lock, false);
152 THREAD->last_cycle = end_cycle;
153 irq_spinlock_unlock(&THREAD->lock, false);
154 }
155}
156
157/** Default 'null' exception handler
158 *
159 */
160NO_TRACE static void exc_undef(unsigned int n, istate_t *istate)
161{
162 fault_if_from_uspace(istate, "Unhandled exception %u.", n);
163 panic_badtrap(istate, n, "Unhandled exception %u.", n);
164}
165
166static NO_TRACE void fault_from_uspace_core(istate_t *istate, const char *fmt, va_list args)
167{
168 printf("Task %s (%" PRIu64 ") killed due to an exception at "
169 "program counter %p.\n", TASK->name, TASK->taskid,
170 (void *) istate_get_pc(istate));
171
172 istate_decode(istate);
173 stack_trace_istate(istate);
174
175 printf("Kill message: ");
176 vprintf(fmt, args);
177 printf("\n");
178
179 task_kill_self(true);
180}
181
182/** Terminate thread and task after the exception came from userspace.
183 *
184 */
185NO_TRACE void fault_from_uspace(istate_t *istate, const char *fmt, ...)
186{
187 va_list args;
188
189 va_start(args, fmt);
190 fault_from_uspace_core(istate, fmt, args);
191 va_end(args);
192}
193
194/** Terminate thread and task if exception came from userspace.
195 *
196 */
197NO_TRACE void fault_if_from_uspace(istate_t *istate, const char *fmt, ...)
198{
199 if (!istate_from_uspace(istate))
200 return;
201
202 va_list args;
203 va_start(args, fmt);
204 fault_from_uspace_core(istate, fmt, args);
205 va_end(args);
206}
207
208/** Get istate structure of a thread.
209 *
210 * Get pointer to the istate structure at the bottom of the kernel stack.
211 *
212 * This function can be called in interrupt or user context. In interrupt
213 * context the istate structure is created by the low-level exception
214 * handler. In user context the istate structure is created by the
215 * low-level syscall handler.
216 */
217istate_t *istate_get(thread_t *thread)
218{
219 /*
220 * The istate structure should be right at the bottom of the kernel
221 * stack.
222 */
223 return (istate_t *) ((uint8_t *)
224 thread->kstack + STACK_SIZE - sizeof(istate_t));
225}
226
227#ifdef CONFIG_KCONSOLE
228
229static char flag_buf[MAX_CMDLINE + 1];
230
231/** Print all exceptions
232 *
233 */
234NO_TRACE static int cmd_exc_print(cmd_arg_t *argv)
235{
236 bool excs_all;
237
238 if (str_cmp(flag_buf, "-a") == 0)
239 excs_all = true;
240 else if (str_cmp(flag_buf, "") == 0)
241 excs_all = false;
242 else {
243 printf("Unknown argument \"%s\".\n", flag_buf);
244 return 1;
245 }
246
247#if (IVT_ITEMS > 0)
248 unsigned int i;
249 unsigned int rows;
250
251 irq_spinlock_lock(&exctbl_lock, true);
252
253#ifdef __32_BITS__
254 printf("[exc ] [description ] [count ] [cycles ]"
255 " [handler ] [symbol\n");
256 rows = 1;
257#endif
258
259#ifdef __64_BITS__
260 printf("[exc ] [description ] [count ] [cycles ]"
261 " [handler ]\n");
262 printf(" [symbol\n");
263 rows = 2;
264#endif
265
266 for (i = 0; i < IVT_ITEMS; i++) {
267 if ((!excs_all) && (!exc_table[i].hot))
268 continue;
269
270 uint64_t count;
271 char count_suffix;
272
273 order_suffix(exc_table[i].count, &count, &count_suffix);
274
275 uint64_t cycles;
276 char cycles_suffix;
277
278 order_suffix(exc_table[i].cycles, &cycles, &cycles_suffix);
279
280 const char *symbol =
281 symtab_fmt_name_lookup((sysarg_t) exc_table[i].handler);
282
283#ifdef __32_BITS__
284 printf("%-8u %-20s %9" PRIu64 "%c %9" PRIu64 "%c %10p %s\n",
285 i + IVT_FIRST, exc_table[i].name, count, count_suffix,
286 cycles, cycles_suffix, exc_table[i].handler, symbol);
287
288 PAGING(rows, 1, irq_spinlock_unlock(&exctbl_lock, true),
289 irq_spinlock_lock(&exctbl_lock, true));
290#endif
291
292#ifdef __64_BITS__
293 printf("%-8u %-20s %9" PRIu64 "%c %9" PRIu64 "%c %18p\n",
294 i + IVT_FIRST, exc_table[i].name, count, count_suffix,
295 cycles, cycles_suffix, exc_table[i].handler);
296 printf(" %s\n", symbol);
297
298 PAGING(rows, 2, irq_spinlock_unlock(&exctbl_lock, true),
299 irq_spinlock_lock(&exctbl_lock, true));
300#endif
301 }
302
303 irq_spinlock_unlock(&exctbl_lock, true);
304#else /* (IVT_ITEMS > 0) */
305
306 printf("No exception table%s.\n", excs_all ? " (showing all exceptions)" : "");
307
308#endif /* (IVT_ITEMS > 0) */
309
310 return 1;
311}
312
313static cmd_arg_t exc_argv = {
314 .type = ARG_TYPE_STRING_OPTIONAL,
315 .buffer = flag_buf,
316 .len = sizeof(flag_buf)
317};
318
319static cmd_info_t exc_info = {
320 .name = "exc",
321 .description = "Print exception table (use -a for all exceptions).",
322 .func = cmd_exc_print,
323 .help = NULL,
324 .argc = 1,
325 .argv = &exc_argv
326};
327
328#endif /* CONFIG_KCONSOLE */
329
330/** Initialize generic exception handling support
331 *
332 */
333void exc_init(void)
334{
335 (void) exc_undef;
336
337#if (IVT_ITEMS > 0)
338 unsigned int i;
339
340 for (i = 0; i < IVT_ITEMS; i++)
341 exc_register(i, "undef", false, (iroutine_t) exc_undef);
342#endif
343
344#ifdef CONFIG_KCONSOLE
345 cmd_initialize(&exc_info);
346 if (!cmd_register(&exc_info))
347 printf("Cannot register command %s\n", exc_info.name);
348#endif
349}
350
351/** @}
352 */
Note: See TracBrowser for help on using the repository browser.