Subversion Repositories HelenOS-historic

Rev

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

Rev 226 Rev 268
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>
-
 
40
 
-
 
41
#define PRINT_INFO_ERRCODE(x) { \
-
 
42
    char *symbol = get_symtab_entry(stack[1]); \
-
 
43
    if (!symbol) \
-
 
44
        symbol = ""; \
-
 
45
    printf("----------------EXCEPTION OCCURED----------------\n"); \
-
 
46
    printf("%%rip: %Q (%s)\n",x[1],symbol); \
-
 
47
    printf("ERROR_WORD=%Q\n", x[0]); \
-
 
48
    printf("%%rcs=%Q,flags=%Q\n", x[2], x[3]); \
-
 
49
    printf("%%rax=%Q, %%rbx=%Q, %%rcx=%Q\n",x[-1],x[-2],x[-3]); \
-
 
50
    printf("%%rdx=%Q, %%rsi=%Q, %%rdi=%Q\n",x[-4],x[-5],x[-6]); \
-
 
51
    printf("%%r8 =%Q, %%r9 =%Q, %%r10=%Q\n",x[-7],x[-8],x[-9]); \
-
 
52
    printf("%%r11=%Q, %%r12=%Q, %%r13=%Q\n",x[-10],x[-11],x[-12]); \
-
 
53
    printf("%%r14=%Q, %%r15=%Q, %%rsp=%Q\n",x[-13],x[-14],x); \
-
 
54
    printf("stack: %Q, %Q, %Q\n", x[5], x[6], x[7]); \
-
 
55
    printf("       %Q, %Q, %Q\n", x[8], x[9], x[10]); \
-
 
56
        }
39
 
57
 
40
/*
58
/*
41
 * Interrupt and exception dispatching.
59
 * Interrupt and exception dispatching.
42
 */
60
 */
43
 
61
 
44
static iroutine ivt[IVT_ITEMS];
62
static iroutine ivt[IVT_ITEMS];
45
 
63
 
46
void (* disable_irqs_function)(__u16 irqmask) = NULL;
64
void (* disable_irqs_function)(__u16 irqmask) = NULL;
47
void (* enable_irqs_function)(__u16 irqmask) = NULL;
65
void (* enable_irqs_function)(__u16 irqmask) = NULL;
48
void (* eoi_function)(void) = NULL;
66
void (* eoi_function)(void) = NULL;
49
 
67
 
50
iroutine trap_register(__u8 n, iroutine f)
68
iroutine trap_register(__u8 n, iroutine f)
51
{
69
{
52
    ASSERT(n < IVT_ITEMS);
70
    ASSERT(n < IVT_ITEMS);
53
   
71
   
54
    iroutine old;
72
    iroutine old;
55
   
73
   
56
    old = ivt[n];
74
    old = ivt[n];
57
    ivt[n] = f;
75
    ivt[n] = f;
58
   
76
   
59
    return old;
77
    return old;
60
}
78
}
61
 
79
 
62
/*
80
/*
63
 * Called directly from the assembler code.
81
 * Called directly from the assembler code.
64
 * CPU is cpu_priority_high().
82
 * CPU is cpu_priority_high().
65
 */
83
 */
66
void trap_dispatcher(__u8 n, __native stack[])
84
void trap_dispatcher(__u8 n, __native stack[])
67
{
85
{
68
    ASSERT(n < IVT_ITEMS);
86
    ASSERT(n < IVT_ITEMS);
69
   
87
   
70
    ivt[n](n, stack);
88
    ivt[n](n, stack);
71
}
89
}
72
 
90
 
73
void null_interrupt(__u8 n, __native stack[])
91
void null_interrupt(__u8 n, __native stack[])
74
{
92
{
-
 
93
    printf("----------------EXCEPTION OCCURED----------------\n");
75
    printf("int %d: null_interrupt\n", n);
94
    printf("int %d: null_interrupt\n", n);
76
    printf("stack: %L, %L, %L, %L\n", stack[0], stack[1], stack[2], stack[3]);
95
    printf("stack: %L, %L, %L, %L\n", stack[0], stack[1], stack[2], stack[3]);
77
    panic("unserviced interrupt\n");
96
    panic("unserviced interrupt\n");
78
}
97
}
79
 
98
 
80
void gp_fault(__u8 n, __native stack[])
99
void gp_fault(__u8 n, __native stack[])
81
{
100
{
82
    printf("ERROR_WORD=%X, %%eip=%X, %%cs=%X, flags=%X\n", stack[0], stack[1], stack[2], stack[3]);
-
 
83
    printf("%%eax=%L, %%ebx=%L, %%ecx=%L, %%edx=%L,\n%%edi=%L, %%esi=%L, %%ebp=%L, %%esp=%L\n", stack[-2], stack[-5], stack[-3], stack[-4], stack[-9], stack[-8], stack[-1], stack);
-
 
84
    printf("stack: %X, %X, %X, %X\n", stack[4], stack[5], stack[6], stack[7]);
101
    PRINT_INFO_ERRCODE(stack);
85
    panic("general protection fault\n");
102
    panic("general protection fault\n");
86
}
103
}
87
 
104
 
88
void ss_fault(__u8 n, __native stack[])
105
void ss_fault(__u8 n, __native stack[])
89
{
106
{
90
    printf("ERROR_WORD=%X, %%eip=%X, %%cs=%X, flags=%X\n", stack[0], stack[1], stack[2], stack[3]);
-
 
91
    printf("%%eax=%L, %%ebx=%L, %%ecx=%L, %%edx=%L,\n%%edi=%L, %%esi=%L, %%ebp=%L, %%esp=%L\n", stack[-2], stack[-5], stack[-3], stack[-4], stack[-9], stack[-8], stack[-1], stack);
-
 
92
    printf("stack: %X, %X, %X, %X\n", stack[4], stack[5], stack[6], stack[7]);
107
    PRINT_INFO_ERRCODE(stack);
93
    panic("stack fault\n");
108
    panic("stack fault\n");
94
}
109
}
95
 
110
 
96
 
111
 
97
void nm_fault(__u8 n, __native stack[])
112
void nm_fault(__u8 n, __native stack[])
98
{
113
{
99
    reset_TS_flag();
114
    reset_TS_flag();
100
    if ((CPU->fpu_owner)!=NULL) {  
115
    if ((CPU->fpu_owner)!=NULL) {  
101
        fpu_lazy_context_save(&((CPU->fpu_owner)->saved_fpu_context));
116
        fpu_lazy_context_save(&((CPU->fpu_owner)->saved_fpu_context));
102
        (CPU->fpu_owner)->fpu_context_engaged=0; /* don't prevent migration */
117
        (CPU->fpu_owner)->fpu_context_engaged=0; /* don't prevent migration */
103
    }
118
    }
104
    if(THREAD->fpu_context_exists) fpu_lazy_context_restore(&(THREAD->saved_fpu_context));
119
    if(THREAD->fpu_context_exists) fpu_lazy_context_restore(&(THREAD->saved_fpu_context));
105
    else {fpu_init();THREAD->fpu_context_exists=1;}
120
    else {fpu_init();THREAD->fpu_context_exists=1;}
106
    CPU->fpu_owner=THREAD;
121
    CPU->fpu_owner=THREAD;
107
}
122
}
108
 
123
 
109
 
124
 
110
 
125
 
111
void page_fault(__u8 n, __native stack[])
126
void page_fault(__u8 n, __native stack[])
112
{
127
{
-
 
128
    PRINT_INFO_ERRCODE(stack);
113
    printf("page fault address: %Q\n", read_cr2());
129
    printf("Page fault address: %Q\n", read_cr2());
114
    printf("ERROR_WORD=%Q, %%rip=%Q, %%rcs=%Q, flags=%Q\n", stack[0], stack[1], stack[2], stack[3]);
-
 
115
    printf("%%rax=%Q, %%rbx=%Q, %%rcx=%Q, %%rdx=%Q,\n%%rsi=%Q, %%rdi=%Q\n",
-
 
116
           stack[-1], stack[-2], stack[-3], stack[-4], stack[-5], stack[-6]);
-
 
117
 
-
 
118
    printf("stack: %X, %X, %X, %X\n", stack[5], stack[6], stack[7], stack[8]);
-
 
119
    panic("page fault\n");
130
    panic("page fault\n");
120
}
131
}
121
 
132
 
122
void syscall(__u8 n, __native stack[])
133
void syscall(__u8 n, __native stack[])
123
{
134
{
124
    printf("cpu%d: syscall\n", CPU->id);
135
    printf("cpu%d: syscall\n", CPU->id);
125
    thread_usleep(1000);
136
    thread_usleep(1000);
126
}
137
}
127
 
138
 
128
void tlb_shootdown_ipi(__u8 n, __native stack[])
139
void tlb_shootdown_ipi(__u8 n, __native stack[])
129
{
140
{
130
    trap_virtual_eoi();
141
    trap_virtual_eoi();
131
    tlb_shootdown_ipi_recv();
142
    tlb_shootdown_ipi_recv();
132
}
143
}
133
 
144
 
134
void wakeup_ipi(__u8 n, __native stack[])
145
void wakeup_ipi(__u8 n, __native stack[])
135
{
146
{
136
    trap_virtual_eoi();
147
    trap_virtual_eoi();
137
}
148
}
138
 
149
 
139
void trap_virtual_enable_irqs(__u16 irqmask)
150
void trap_virtual_enable_irqs(__u16 irqmask)
140
{
151
{
141
    if (enable_irqs_function)
152
    if (enable_irqs_function)
142
        enable_irqs_function(irqmask);
153
        enable_irqs_function(irqmask);
143
    else
154
    else
144
        panic("no enable_irqs_function\n");
155
        panic("no enable_irqs_function\n");
145
}
156
}
146
 
157
 
147
void trap_virtual_disable_irqs(__u16 irqmask)
158
void trap_virtual_disable_irqs(__u16 irqmask)
148
{
159
{
149
    if (disable_irqs_function)
160
    if (disable_irqs_function)
150
        disable_irqs_function(irqmask);
161
        disable_irqs_function(irqmask);
151
    else
162
    else
152
        panic("no disable_irqs_function\n");
163
        panic("no disable_irqs_function\n");
153
}
164
}
154
 
165
 
155
void trap_virtual_eoi(void)
166
void trap_virtual_eoi(void)
156
{
167
{
157
    if (eoi_function)
168
    if (eoi_function)
158
        eoi_function();
169
        eoi_function();
159
    else
170
    else
160
        panic("no eoi_function\n");
171
        panic("no eoi_function\n");
161
 
172
 
162
}
173
}
163
 
174