Subversion Repositories HelenOS-historic

Rev

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

Rev 84 Rev 90
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
 
39
 
40
/*
40
/*
41
 * Interrupt and exception dispatching.
41
 * Interrupt and exception dispatching.
42
 */
42
 */
43
 
43
 
44
static iroutine ivt[IVT_ITEMS];
44
static iroutine ivt[IVT_ITEMS];
45
 
45
 
46
void (* disable_irqs_function)(__u16 irqmask) = NULL;
46
void (* disable_irqs_function)(__u16 irqmask) = NULL;
47
void (* enable_irqs_function)(__u16 irqmask) = NULL;
47
void (* enable_irqs_function)(__u16 irqmask) = NULL;
48
void (* eoi_function)(void) = NULL;
48
void (* eoi_function)(void) = NULL;
49
 
49
 
50
iroutine trap_register(__u8 n, iroutine f)
50
iroutine trap_register(__u8 n, iroutine f)
51
{
51
{
52
    ASSERT(n < IVT_ITEMS);
52
    ASSERT(n < IVT_ITEMS);
53
   
53
   
54
    iroutine old;
54
    iroutine old;
55
   
55
   
56
    old = ivt[n];
56
    old = ivt[n];
57
    ivt[n] = f;
57
    ivt[n] = f;
58
   
58
   
59
    return old;
59
    return old;
60
}
60
}
61
 
61
 
62
/*
62
/*
63
 * Called directly from the assembler code.
63
 * Called directly from the assembler code.
64
 * CPU is cpu_priority_high().
64
 * CPU is cpu_priority_high().
65
 */
65
 */
66
void trap_dispatcher(__u8 n, __u32 stack[])
66
void trap_dispatcher(__u8 n, __u32 stack[])
67
{
67
{
68
    ASSERT(n < IVT_ITEMS);
68
    ASSERT(n < IVT_ITEMS);
69
   
69
   
70
    ivt[n](n, stack);
70
    ivt[n](n, stack);
71
}
71
}
72
 
72
 
73
void null_interrupt(__u8 n, __u32 stack[])
73
void null_interrupt(__u8 n, __u32 stack[])
74
{
74
{
75
    printf("int %d: null_interrupt\n", n);
75
    printf("int %d: null_interrupt\n", n);
76
    printf("stack: %L, %L, %L, %L\n", stack[0], stack[1], stack[2], stack[3]);
76
    printf("stack: %L, %L, %L, %L\n", stack[0], stack[1], stack[2], stack[3]);
77
    panic("unserviced interrupt\n");
77
    panic("unserviced interrupt\n");
78
}
78
}
79
 
79
 
80
void gp_fault(__u8 n, __u32 stack[])
80
void gp_fault(__u8 n, __u32 stack[])
81
{
81
{
82
    printf("stack[0]=%X, %%eip=%X, %%cs=%X, flags=%X\n", stack[0], stack[1], stack[2], stack[3]);
82
    printf("stack[0]=%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);
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]);
84
    printf("stack: %X, %X, %X, %X\n", stack[4], stack[5], stack[6], stack[7]);
85
    panic("general protection fault\n");
85
    panic("general protection fault\n");
86
}
86
}
87
 
87
 
88
void ss_fault(__u8 n, __u32 stack[])
88
void ss_fault(__u8 n, __u32 stack[])
89
{
89
{
90
    printf("stack[0]=%X, %%eip=%X, %%cs=%X, flags=%X\n", stack[0], stack[1], stack[2], stack[3]);
90
    printf("stack[0]=%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);
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]);
92
    printf("stack: %X, %X, %X, %X\n", stack[4], stack[5], stack[6], stack[7]);
93
    panic("Stack fault\n");
93
    panic("Stack fault\n");
94
}
94
}
95
 
95
 
96
 
96
 
97
void nm_fault(__u8 n, __u32 stack[])
97
void nm_fault(__u8 n, __u32 stack[])
98
{
98
{
99
 
99
 
100
//  printf("-1\n");        
100
//  printf("-1\n");        
101
    reset_TS_flag();
101
    reset_TS_flag();
102
        if ((CPU->fpu_owner)!=NULL)
102
        if ((CPU->fpu_owner)!=NULL)
103
    {  
103
    {  
-
 
104
//      printf("tid:%d \n", THREAD->tid);
104
//          printf("owner %X\n",(int)(&((CPU->fpu_owner)->saved_fpu_context)));        
105
//      printf("owner:%d\n", (CPU->fpu_owner)->tid);
105
            fpu_lazy_context_save(&((CPU->fpu_owner)->saved_fpu_context));
106
            fpu_lazy_context_save(&((CPU->fpu_owner)->saved_fpu_context));
106
 
107
 
107
//          printf("owner 2\n");
108
//          printf("owner 2\n");
108
        (CPU->fpu_owner)->fpu_context_engaged=0; /* Enables migration */
109
        (CPU->fpu_owner)->fpu_context_engaged=0; /* Enables migration */
109
//          printf("owner 3\n");        
110
//          printf("owner 3\n");        
110
 
111
 
111
    }
112
    }
112
//  printf("0\n");
113
//  printf("0\n");
113
    if(THREAD->fpu_context_exists) fpu_lazy_context_restore(&(THREAD->saved_fpu_context));
114
    if(THREAD->fpu_context_exists) fpu_lazy_context_restore(&(THREAD->saved_fpu_context));
114
        else {fpu_init();THREAD->fpu_context_exists=1;}
115
        else {fpu_init();THREAD->fpu_context_exists=1;}
115
//  printf("1\n");
116
//  printf("1\n");
116
    CPU->fpu_owner=THREAD;
117
    CPU->fpu_owner=THREAD;
117
//  printf("2\n");
118
//  printf("2\n");
118
   
119
   
119
//  printf("3\n");  
120
//  printf("3\n");  
120
//  panic("#NM fault\n");
121
//  panic("#NM fault\n");
121
}
122
}
122
 
123
 
123
 
124
 
124
 
125
 
125
void page_fault(__u8 n, __u32 stack[])
126
void page_fault(__u8 n, __u32 stack[])
126
{
127
{
127
    printf("page fault address: %X\n", cpu_read_cr2());
128
    printf("page fault address: %X\n", cpu_read_cr2());
128
    printf("stack[0]=%X, %%eip=%X, %%cs=%X, flags=%X\n", stack[0], stack[1], stack[2], stack[3]);
129
    printf("stack[0]=%X, %%eip=%X, %%cs=%X, flags=%X\n", stack[0], stack[1], stack[2], stack[3]);
129
    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);
130
    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);
130
    printf("stack: %X, %X, %X, %X\n", stack[4], stack[5], stack[6], stack[7]);
131
    printf("stack: %X, %X, %X, %X\n", stack[4], stack[5], stack[6], stack[7]);
131
    printf("page fault\n");
132
    printf("page fault\n");
132
    cpu_halt();
133
    cpu_halt();
133
}
134
}
134
 
135
 
135
void syscall(__u8 n, __u32 stack[])
136
void syscall(__u8 n, __u32 stack[])
136
{
137
{
137
    printf("cpu%d: syscall\n", CPU->id);
138
    printf("cpu%d: syscall\n", CPU->id);
138
    thread_usleep(1000);
139
    thread_usleep(1000);
139
}
140
}
140
 
141
 
141
void tlb_shootdown_ipi(__u8 n, __u32 stack[])
142
void tlb_shootdown_ipi(__u8 n, __u32 stack[])
142
{
143
{
143
    trap_virtual_eoi();
144
    trap_virtual_eoi();
144
    tlb_shootdown_ipi_recv();
145
    tlb_shootdown_ipi_recv();
145
}
146
}
146
 
147
 
147
void wakeup_ipi(__u8 n, __u32 stack[])
148
void wakeup_ipi(__u8 n, __u32 stack[])
148
{
149
{
149
    trap_virtual_eoi();
150
    trap_virtual_eoi();
150
}
151
}
151
 
152
 
152
void trap_virtual_enable_irqs(__u16 irqmask)
153
void trap_virtual_enable_irqs(__u16 irqmask)
153
{
154
{
154
    if (enable_irqs_function)
155
    if (enable_irqs_function)
155
        enable_irqs_function(irqmask);
156
        enable_irqs_function(irqmask);
156
    else
157
    else
157
        panic("no enable_irqs_function\n");
158
        panic("no enable_irqs_function\n");
158
}
159
}
159
 
160
 
160
void trap_virtual_disable_irqs(__u16 irqmask)
161
void trap_virtual_disable_irqs(__u16 irqmask)
161
{
162
{
162
    if (disable_irqs_function)
163
    if (disable_irqs_function)
163
        disable_irqs_function(irqmask);
164
        disable_irqs_function(irqmask);
164
    else
165
    else
165
        panic("no disable_irqs_function\n");
166
        panic("no disable_irqs_function\n");
166
}
167
}
167
 
168
 
168
void trap_virtual_eoi(void)
169
void trap_virtual_eoi(void)
169
{
170
{
170
    if (eoi_function)
171
    if (eoi_function)
171
        eoi_function();
172
        eoi_function();
172
    else
173
    else
173
        panic("no eoi_function\n");
174
        panic("no eoi_function\n");
174
 
175
 
175
}
176
}
176
 
177