WebSVN – HelenOS – Diff – /branches/dynload/kernel/arch/ia32/src/interrupt.c


/*
 * Copyright (C) 2001-2004 Jakub Jermar
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - 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.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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.
 */
 
#include <arch/interrupt.h>
#include <print.h>
#include <debug.h>
#include <panic.h>
#include <arch/i8259.h>
#include <func.h>
#include <cpu.h>
#include <arch/asm.h>
#include <mm/tlb.h>
#include <arch.h>
#include <symtab.h>
 
/*
 * Interrupt and exception dispatching.
 */
 
static iroutine ivt[IVT_ITEMS];
 
void (* disable_irqs_function)(__u16 irqmask) = NULL;
void (* enable_irqs_function)(__u16 irqmask) = NULL;
void (* eoi_function)(void) = NULL;
 
#define PRINT_INFO_ERRCODE(x) { \
    char *symbol = get_symtab_entry(stack[1]); \
    if (!symbol) \
        symbol = ""; \
    printf("----------------EXCEPTION OCCURED----------------\n"); \
    printf("%%eip: %X (%s)\n",x[1],symbol); \
    printf("ERROR_WORD=%X\n", x[0]); \
    printf("%%cs=%X,flags=%X\n", x[2], x[3]); \
    printf("%%eax=%X, %%ebx=%X, %%ecx=%X, %%edx=%X\n",\
           x[-2],x[-5],x[-3],x[-4]); \
    printf("%%esi=%X, %%edi=%X, %%ebp=%X, %%esp=%X\n",\
           x[-8],x[-9],x[-1],x); \
    printf("stack: %X, %X, %X, %X\n", x[4], x[5], x[6], x[7]); \
    printf("       %X, %X, %X, %X\n", x[8], x[9], x[10], x[11]); \
        }
 
iroutine trap_register(__u8 n, iroutine f)
{
    ASSERT(n < IVT_ITEMS);
   
    iroutine old;
   
    old = ivt[n];
    ivt[n] = f;
   
    return old;
}
 
/*
 * Called directly from the assembler code.
 * CPU is cpu_priority_high().
 */
void trap_dispatcher(__u8 n, __native stack[])
{
    ASSERT(n < IVT_ITEMS);
   
    ivt[n](n, stack);
}
 
void null_interrupt(__u8 n, __native stack[])
{
    printf("int %d: null_interrupt\n", n);
    printf("stack: %L, %L, %L, %L\n", stack[0], stack[1], stack[2], stack[3]);
    panic("unserviced interrupt\n");
}
 
void gp_fault(__u8 n, __native stack[])
{
    PRINT_INFO_ERRCODE(stack);
    panic("general protection fault\n");
}
 
void ss_fault(__u8 n, __native stack[])
{
    PRINT_INFO_ERRCODE(stack);
    panic("stack fault\n");
}
 
 
void nm_fault(__u8 n, __native stack[])
{
    reset_TS_flag();
    if (CPU->fpu_owner != NULL) {  
        fpu_lazy_context_save(&((CPU->fpu_owner)->saved_fpu_context));
        CPU->fpu_owner->fpu_context_engaged=0; /* don't prevent migration */
    }
    if (THREAD->fpu_context_exists)
        fpu_lazy_context_restore(&(THREAD->saved_fpu_context));
    else {
        fpu_init();
        THREAD->fpu_context_exists=1;
    }
 
 
    CPU->fpu_owner=THREAD;
}
 
 
 
void page_fault(__u8 n, __native stack[])
{
    PRINT_INFO_ERRCODE(stack);
    printf("page fault address: %X\n", read_cr2());
    panic("page fault\n");
}
 
void syscall(__u8 n, __native stack[])
{
    printf("cpu%d: syscall\n", CPU->id);
    thread_usleep(1000);
}
 
void tlb_shootdown_ipi(__u8 n, __native stack[])
{
    trap_virtual_eoi();
    tlb_shootdown_ipi_recv();
}
 
void wakeup_ipi(__u8 n, __native stack[])
{
    trap_virtual_eoi();
}
 
void trap_virtual_enable_irqs(__u16 irqmask)
{
    if (enable_irqs_function)
        enable_irqs_function(irqmask);
    else
        panic("no enable_irqs_function\n");
}
 
void trap_virtual_disable_irqs(__u16 irqmask)
{
    if (disable_irqs_function)
        disable_irqs_function(irqmask);
    else
        panic("no disable_irqs_function\n");
}
 
void trap_virtual_eoi(void)
{
    if (eoi_function)
        eoi_function();
    else
        panic("no eoi_function\n");
 
}
 

Rev 268	Rev 281
1	/*	1	/*
2	* Copyright (C) 2001-2004 Jakub Jermar	2	* Copyright (C) 2001-2004 Jakub Jermar
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	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	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.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	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	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	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	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	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	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.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	*/	27	*/
28		28
29	#include <arch/interrupt.h>	29	#include <arch/interrupt.h>
30	#include <print.h>	30	#include <print.h>
31	#include <debug.h>	31	#include <debug.h>
32	#include <panic.h>	32	#include <panic.h>
33	#include <arch/i8259.h>	33	#include <arch/i8259.h>
34	#include <func.h>	34	#include <func.h>
35	#include <cpu.h>	35	#include <cpu.h>
36	#include <arch/asm.h>	36	#include <arch/asm.h>
37	#include <mm/tlb.h>	37	#include <mm/tlb.h>
38	#include <arch.h>	38	#include <arch.h>
39	#include <symtab.h>	39	#include <symtab.h>
40		40
41	/*	41	/*
42	* Interrupt and exception dispatching.	42	* Interrupt and exception dispatching.
43	*/	43	*/
44		44
45	static iroutine ivt[IVT_ITEMS];	45	static iroutine ivt[IVT_ITEMS];
46		46
47	void (* disable_irqs_function)(__u16 irqmask) = NULL;	47	void (* disable_irqs_function)(__u16 irqmask) = NULL;
48	void (* enable_irqs_function)(__u16 irqmask) = NULL;	48	void (* enable_irqs_function)(__u16 irqmask) = NULL;
49	void (* eoi_function)(void) = NULL;	49	void (* eoi_function)(void) = NULL;
50		50
51	#define PRINT_INFO_ERRCODE(x) { \	51	#define PRINT_INFO_ERRCODE(x) { \
52	char *symbol = get_symtab_entry(stack[1]); \	52	char *symbol = get_symtab_entry(stack[1]); \
53	if (!symbol) \	53	if (!symbol) \
54	symbol = ""; \	54	symbol = ""; \
55	printf("----------------EXCEPTION OCCURED----------------\n"); \	55	printf("----------------EXCEPTION OCCURED----------------\n"); \
56	printf("%%eip: %X (%s)\n",x[1],symbol); \	56	printf("%%eip: %X (%s)\n",x[1],symbol); \
57	printf("ERROR_WORD=%X\n", x[0]); \	57	printf("ERROR_WORD=%X\n", x[0]); \
58	printf("%%cs=%X,flags=%X\n", x[2], x[3]); \	58	printf("%%cs=%X,flags=%X\n", x[2], x[3]); \
59	printf("%%eax=%X, %%ebx=%X, %%ecx=%X, %%edx=%X\n",\	59	printf("%%eax=%X, %%ebx=%X, %%ecx=%X, %%edx=%X\n",\
60	x[-2],x[-5],x[-3],x[-4]); \	60	x[-2],x[-5],x[-3],x[-4]); \
61	printf("%%esi=%X, %%edi=%X, %%ebp=%X, %%esp=%X\n",\	61	printf("%%esi=%X, %%edi=%X, %%ebp=%X, %%esp=%X\n",\
62	x[-8],x[-9],x[-1],x); \	62	x[-8],x[-9],x[-1],x); \
63	printf("stack: %X, %X, %X, %X\n", x[4], x[5], x[6], x[7]); \	63	printf("stack: %X, %X, %X, %X\n", x[4], x[5], x[6], x[7]); \
64	printf(" %X, %X, %X, %X\n", x[8], x[9], x[10], x[11]); \	64	printf(" %X, %X, %X, %X\n", x[8], x[9], x[10], x[11]); \
65	}	65	}
66		66
67	iroutine trap_register(__u8 n, iroutine f)	67	iroutine trap_register(__u8 n, iroutine f)
68	{	68	{
69	ASSERT(n < IVT_ITEMS);	69	ASSERT(n < IVT_ITEMS);
70		70
71	iroutine old;	71	iroutine old;
72		72
73	old = ivt[n];	73	old = ivt[n];
74	ivt[n] = f;	74	ivt[n] = f;
75		75
76	return old;	76	return old;
77	}	77	}
78		78
79	/*	79	/*
80	* Called directly from the assembler code.	80	* Called directly from the assembler code.
81	* CPU is cpu_priority_high().	81	* CPU is cpu_priority_high().
82	*/	82	*/
83	void trap_dispatcher(__u8 n, __native stack[])	83	void trap_dispatcher(__u8 n, __native stack[])
84	{	84	{
85	ASSERT(n < IVT_ITEMS);	85	ASSERT(n < IVT_ITEMS);
86		86
87	ivt[n](n, stack);	87	ivt[n](n, stack);
88	}	88	}
89		89
90	void null_interrupt(__u8 n, __native stack[])	90	void null_interrupt(__u8 n, __native stack[])
91	{	91	{
92	printf("int %d: null_interrupt\n", n);	92	printf("int %d: null_interrupt\n", n);
93	printf("stack: %L, %L, %L, %L\n", stack[0], stack[1], stack[2], stack[3]);	93	printf("stack: %L, %L, %L, %L\n", stack[0], stack[1], stack[2], stack[3]);
94	panic("unserviced interrupt\n");	94	panic("unserviced interrupt\n");
95	}	95	}
96		96
97	void gp_fault(__u8 n, __native stack[])	97	void gp_fault(__u8 n, __native stack[])
98	{	98	{
99	PRINT_INFO_ERRCODE(stack);	99	PRINT_INFO_ERRCODE(stack);
100	panic("general protection fault\n");	100	panic("general protection fault\n");
101	}	101	}
102		102
103	void ss_fault(__u8 n, __native stack[])	103	void ss_fault(__u8 n, __native stack[])
104	{	104	{
105	PRINT_INFO_ERRCODE(stack);	105	PRINT_INFO_ERRCODE(stack);
106	panic("stack fault\n");	106	panic("stack fault\n");
107	}	107	}
108		108
109		109
110	void nm_fault(__u8 n, __native stack[])	110	void nm_fault(__u8 n, __native stack[])
111	{	111	{
112	reset_TS_flag();	112	reset_TS_flag();
113	if ((CPU->fpu_owner)!=NULL) {	113	if (CPU->fpu_owner != NULL) {
114	fpu_lazy_context_save(&((CPU->fpu_owner)->saved_fpu_context));	114	fpu_lazy_context_save(&((CPU->fpu_owner)->saved_fpu_context));
115	(CPU->fpu_owner)->fpu_context_engaged=0; /* don't prevent migration */	115	CPU->fpu_owner->fpu_context_engaged=0; /* don't prevent migration */
-		116	}
-		117	if (THREAD->fpu_context_exists)
-		118	fpu_lazy_context_restore(&(THREAD->saved_fpu_context));
-		119	else {
-		120	fpu_init();
-		121	THREAD->fpu_context_exists=1;
116	}	122	}
117	if(THREAD->fpu_context_exists) fpu_lazy_context_restore(&(THREAD->saved_fpu_context));	-
118	else {fpu_init();THREAD->fpu_context_exists=1;}	-
119	CPU->fpu_owner=THREAD;	123	CPU->fpu_owner=THREAD;
120	}	124	}
121		125
122		126
123		127
124	void page_fault(__u8 n, __native stack[])	128	void page_fault(__u8 n, __native stack[])
125	{	129	{
126	PRINT_INFO_ERRCODE(stack);	130	PRINT_INFO_ERRCODE(stack);
127	printf("page fault address: %X\n", read_cr2());	131	printf("page fault address: %X\n", read_cr2());
128	panic("page fault\n");	132	panic("page fault\n");
129	}	133	}
130		134
131	void syscall(__u8 n, __native stack[])	135	void syscall(__u8 n, __native stack[])
132	{	136	{
133	printf("cpu%d: syscall\n", CPU->id);	137	printf("cpu%d: syscall\n", CPU->id);
134	thread_usleep(1000);	138	thread_usleep(1000);
135	}	139	}
136		140
137	void tlb_shootdown_ipi(__u8 n, __native stack[])	141	void tlb_shootdown_ipi(__u8 n, __native stack[])
138	{	142	{
139	trap_virtual_eoi();	143	trap_virtual_eoi();
140	tlb_shootdown_ipi_recv();	144	tlb_shootdown_ipi_recv();
141	}	145	}
142		146
143	void wakeup_ipi(__u8 n, __native stack[])	147	void wakeup_ipi(__u8 n, __native stack[])
144	{	148	{
145	trap_virtual_eoi();	149	trap_virtual_eoi();
146	}	150	}
147		151
148	void trap_virtual_enable_irqs(__u16 irqmask)	152	void trap_virtual_enable_irqs(__u16 irqmask)
149	{	153	{
150	if (enable_irqs_function)	154	if (enable_irqs_function)
151	enable_irqs_function(irqmask);	155	enable_irqs_function(irqmask);
152	else	156	else
153	panic("no enable_irqs_function\n");	157	panic("no enable_irqs_function\n");
154	}	158	}
155		159
156	void trap_virtual_disable_irqs(__u16 irqmask)	160	void trap_virtual_disable_irqs(__u16 irqmask)
157	{	161	{
158	if (disable_irqs_function)	162	if (disable_irqs_function)
159	disable_irqs_function(irqmask);	163	disable_irqs_function(irqmask);
160	else	164	else
161	panic("no disable_irqs_function\n");	165	panic("no disable_irqs_function\n");
162	}	166	}
163		167
164	void trap_virtual_eoi(void)	168	void trap_virtual_eoi(void)
165	{	169	{
166	if (eoi_function)	170	if (eoi_function)
167	eoi_function();	171	eoi_function();
168	else	172	else
169	panic("no eoi_function\n");	173	panic("no eoi_function\n");
170		174
171	}	175	}
172		176

Subversion Repositories HelenOS

(root)/branches/dynload/kernel/arch/ia32/src/interrupt.c @ 4340 – Rev 268 → 281