Subversion Repositories HelenOS-historic

Rev

Rev 281 | Rev 391 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 281 Rev 309
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();
-
 
113
    if (CPU->fpu_owner != NULL) {  
112
#ifdef FPU_LAZY     
114
        fpu_lazy_context_save(&((CPU->fpu_owner)->saved_fpu_context));
-
 
115
        CPU->fpu_owner->fpu_context_engaged=0; /* don't prevent migration */
-
 
116
    }
-
 
117
    if (THREAD->fpu_context_exists)
113
    scheduler_fpu_lazy_request();
118
        fpu_lazy_context_restore(&(THREAD->saved_fpu_context));
-
 
119
    else {
114
#else
120
        fpu_init();
115
    panic("fpu fault");
121
        THREAD->fpu_context_exists=1;
-
 
122
    }
116
#endif
123
    CPU->fpu_owner=THREAD;
-
 
124
}
117
}
125
 
118
 
126
 
119
 
127
 
120
 
128
void page_fault(__u8 n, __native stack[])
121
void page_fault(__u8 n, __native stack[])
129
{
122
{
130
    PRINT_INFO_ERRCODE(stack);
123
    PRINT_INFO_ERRCODE(stack);
131
    printf("page fault address: %X\n", read_cr2());
124
    printf("page fault address: %X\n", read_cr2());
132
    panic("page fault\n");
125
    panic("page fault\n");
133
}
126
}
134
 
127
 
135
void syscall(__u8 n, __native stack[])
128
void syscall(__u8 n, __native stack[])
136
{
129
{
137
    printf("cpu%d: syscall\n", CPU->id);
130
    printf("cpu%d: syscall\n", CPU->id);
138
    thread_usleep(1000);
131
    thread_usleep(1000);
139
}
132
}
140
 
133
 
141
void tlb_shootdown_ipi(__u8 n, __native stack[])
134
void tlb_shootdown_ipi(__u8 n, __native stack[])
142
{
135
{
143
    trap_virtual_eoi();
136
    trap_virtual_eoi();
144
    tlb_shootdown_ipi_recv();
137
    tlb_shootdown_ipi_recv();
145
}
138
}
146
 
139
 
147
void wakeup_ipi(__u8 n, __native stack[])
140
void wakeup_ipi(__u8 n, __native stack[])
148
{
141
{
149
    trap_virtual_eoi();
142
    trap_virtual_eoi();
150
}
143
}
151
 
144
 
152
void trap_virtual_enable_irqs(__u16 irqmask)
145
void trap_virtual_enable_irqs(__u16 irqmask)
153
{
146
{
154
    if (enable_irqs_function)
147
    if (enable_irqs_function)
155
        enable_irqs_function(irqmask);
148
        enable_irqs_function(irqmask);
156
    else
149
    else
157
        panic("no enable_irqs_function\n");
150
        panic("no enable_irqs_function\n");
158
}
151
}
159
 
152
 
160
void trap_virtual_disable_irqs(__u16 irqmask)
153
void trap_virtual_disable_irqs(__u16 irqmask)
161
{
154
{
162
    if (disable_irqs_function)
155
    if (disable_irqs_function)
163
        disable_irqs_function(irqmask);
156
        disable_irqs_function(irqmask);
164
    else
157
    else
165
        panic("no disable_irqs_function\n");
158
        panic("no disable_irqs_function\n");
166
}
159
}
167
 
160
 
168
void trap_virtual_eoi(void)
161
void trap_virtual_eoi(void)
169
{
162
{
170
    if (eoi_function)
163
    if (eoi_function)
171
        eoi_function();
164
        eoi_function();
172
    else
165
    else
173
        panic("no eoi_function\n");
166
        panic("no eoi_function\n");
174
 
167
 
175
}
168
}
176
 
169