Subversion Repositories HelenOS-historic

Rev

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

Rev 769 Rev 799
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 <mm/as.h>
38
#include <mm/as.h>
39
#include <arch.h>
39
#include <arch.h>
40
#include <symtab.h>
40
#include <symtab.h>
41
#include <arch/asm.h>
41
#include <arch/asm.h>
42
#include <proc/scheduler.h>
42
#include <proc/scheduler.h>
43
#include <proc/thread.h>
43
#include <proc/thread.h>
44
 
44
 
45
/*
45
/*
46
static void messy_stack_trace(__native *stack)
46
static void messy_stack_trace(__native *stack)
47
{
47
{
48
    __native *upper_limit = (__native *)(((__native)get_stack_base()) + STACK_SIZE);
48
    __native *upper_limit = (__native *)(((__native)get_stack_base()) + STACK_SIZE);
49
    char *symbol;
49
    char *symbol;
50
 
50
 
51
    printf("Stack contents: ");
51
    printf("Stack contents: ");
52
    while (stack < upper_limit) {
52
    while (stack < upper_limit) {
53
        symbol = get_symtab_entry((__address)*stack);
53
        symbol = get_symtab_entry((__address)*stack);
54
        if (symbol)
54
        if (symbol)
55
            printf("%s, ", symbol);
55
            printf("%s, ", symbol);
56
        stack++;
56
        stack++;
57
    }
57
    }
58
    printf("\n");
58
    printf("\n");
59
}
59
}
60
*/
60
*/
-
 
61
 
61
static void print_info_errcode(int n, void *st)
62
static void print_info_errcode(int n, struct interrupt_context *ctx)
62
{
63
{
63
    char *symbol;
64
    char *symbol;
64
    __native *x = (__native *) st;
65
    __u64 *x = &ctx->stack[0];
65
 
66
 
66
    if (!(symbol=get_symtab_entry(x[1])))
67
    if (!(symbol=get_symtab_entry(x[1])))
67
        symbol = "";
68
        symbol = "";
68
 
69
 
69
    printf("-----EXCEPTION(%d) OCCURED----- ( %s )\n",n,__FUNCTION__);
70
    printf("-----EXCEPTION(%d) OCCURED----- ( %s )\n",n,__FUNCTION__);
70
    printf("%%rip: %Q (%s)\n",x[1],symbol);
71
    printf("%%rip: %Q (%s)\n",ctx->stack[1],symbol);
71
    printf("ERROR_WORD=%Q\n", x[0]);
72
    printf("ERROR_WORD=%Q\n", ctx->stack[0]);
72
    printf("%%rcs=%Q,flags=%Q, %%cr0=%Q\n", x[2], x[3],read_cr0());
73
    printf("%%rcs=%Q,flags=%Q, %%cr0=%Q\n", ctx->stack[2],
-
 
74
           ctx->stack[3],read_cr0());
73
    printf("%%rax=%Q, %%rbx=%Q, %%rcx=%Q\n",x[-2],x[-3],x[-4]);
75
    printf("%%rax=%Q, %%rbx=%Q, %%rcx=%Q\n",ctx->rax,ctx->rbx,ctx->rcx);
74
    printf("%%rdx=%Q, %%rsi=%Q, %%rdi=%Q\n",x[-5],x[-6],x[-7]);
76
    printf("%%rdx=%Q, %%rsi=%Q, %%rdi=%Q\n",ctx->rdx,ctx->rsi,ctx->rdi);
75
    printf("%%r8 =%Q, %%r9 =%Q, %%r10=%Q\n",x[-8],x[-9],x[-10]);
77
    printf("%%r8 =%Q, %%r9 =%Q, %%r10=%Q\n",ctx->r8,ctx->r9,ctx->r10);
76
    printf("%%r11=%Q, %%r12=%Q, %%r13=%Q\n",x[-11],x[-12],x[-13]);
78
    printf("%%r11=%Q, %%r12=%Q, %%r13=%Q\n",ctx->r11,ctx->r12,ctx->r13);
77
    printf("%%r14=%Q, %%r15=%Q, %%rsp=%Q\n",x[-14],x[-15],x);
79
    printf("%%r14=%Q, %%r15=%Q, %%rsp=%Q\n",ctx->r14,ctx->r15,&ctx->stack[0]);
78
    printf("%%rbp=%Q\n",x[-1]);
80
    printf("%%rbp=%Q\n",ctx->rbp);
79
    printf("stack: %Q, %Q, %Q\n", x[5], x[6], x[7]);
81
    printf("stack: %Q, %Q, %Q\n", x[5], x[6], x[7]);
80
    printf("       %Q, %Q, %Q\n", x[8], x[9], x[10]);
82
    printf("       %Q, %Q, %Q\n", x[8], x[9], x[10]);
81
    printf("       %Q, %Q, %Q\n", x[11], x[12], x[13]);
83
    printf("       %Q, %Q, %Q\n", x[11], x[12], x[13]);
82
    printf("       %Q, %Q, %Q\n", x[14], x[15], x[16]);
84
    printf("       %Q, %Q, %Q\n", x[14], x[15], x[16]);
83
    printf("       %Q, %Q, %Q\n", x[17], x[18], x[19]);
-
 
84
    printf("       %Q, %Q, %Q\n", x[20], x[21], x[22]);
-
 
85
    printf("       %Q, %Q, %Q\n", x[23], x[24], x[25]);
-
 
86
//  messy_stack_trace(&x[5]);
85
//  messy_stack_trace(&x[5]);
87
}
86
}
88
 
87
 
89
/*
88
/*
90
 * Interrupt and exception dispatching.
89
 * Interrupt and exception dispatching.
91
 */
90
 */
92
 
91
 
93
void (* disable_irqs_function)(__u16 irqmask) = NULL;
92
void (* disable_irqs_function)(__u16 irqmask) = NULL;
94
void (* enable_irqs_function)(__u16 irqmask) = NULL;
93
void (* enable_irqs_function)(__u16 irqmask) = NULL;
95
void (* eoi_function)(void) = NULL;
94
void (* eoi_function)(void) = NULL;
96
 
95
 
97
void null_interrupt(int n, void *st)
96
void null_interrupt(int n, struct interrupt_context *ctx)
98
{
97
{
99
    __native *stack = (__native *) st;
-
 
100
 
-
 
101
    printf("-----EXCEPTION(%d) OCCURED----- ( %s )\n",n,__FUNCTION__); \
98
    printf("-----EXCEPTION(%d) OCCURED----- ( %s )\n",n,__FUNCTION__); \
102
    printf("stack: %L, %L, %L, %L\n", stack[0], stack[1], stack[2], stack[3]);
99
    printf("stack: %X, %X, %X, %X\n", ctx->stack[0], ctx->stack[1],
-
 
100
           ctx->stack[2], ctx->stack[3]);
103
    panic("unserviced interrupt\n");
101
    panic("unserviced interrupt\n");
104
}
102
}
105
 
103
 
106
void gp_fault(int n, void *stack)
104
void gp_fault(int n, void *stack)
107
{
105
{
108
    print_info_errcode(n,stack);
106
    print_info_errcode(n,stack);
109
    panic("general protection fault\n");
107
    panic("general protection fault\n");
110
}
108
}
111
 
109
 
112
void ss_fault(int n, void *stack)
110
void ss_fault(int n, void *stack)
113
{
111
{
114
    print_info_errcode(n,stack);
112
    print_info_errcode(n,stack);
115
    panic("stack fault\n");
113
    panic("stack fault\n");
116
}
114
}
117
 
115
 
118
 
116
 
119
void nm_fault(int n, void *stack)
117
void nm_fault(int n, void *stack)
120
{
118
{
121
#ifdef CONFIG_FPU_LAZY     
119
#ifdef CONFIG_FPU_LAZY     
122
    scheduler_fpu_lazy_request();
120
    scheduler_fpu_lazy_request();
123
#else
121
#else
124
    panic("fpu fault");
122
    panic("fpu fault");
125
#endif
123
#endif
126
}
124
}
127
 
125
 
128
void page_fault(int n, void *stack)
126
void page_fault(int n, struct interrupt_context *ctx)
129
{
127
{
130
    __address page;
128
    __address page;
131
   
129
   
132
    page = read_cr2();
130
    page = read_cr2();
133
    if (!as_page_fault(page)) {
131
    if (!as_page_fault(page)) {
134
        print_info_errcode(n,stack);
132
        print_info_errcode(n,ctx);
135
        printf("Page fault address: %Q\n", page);
133
        printf("Page fault address: %Q\n", page);
136
        panic("page fault\n");
134
        panic("page fault\n");
137
    }
135
    }
138
}
136
}
139
 
-
 
140
void syscall(int n, void *stack)
-
 
141
{
-
 
142
    printf("cpu%d: syscall\n", CPU->id);
-
 
143
    thread_usleep(1000);
-
 
144
}
-
 
145
 
137
 
146
void tlb_shootdown_ipi(int n, void *stack)
138
void tlb_shootdown_ipi(int n, void *stack)
147
{
139
{
148
    trap_virtual_eoi();
140
    trap_virtual_eoi();
149
    tlb_shootdown_ipi_recv();
141
    tlb_shootdown_ipi_recv();
150
}
142
}
151
 
143
 
152
void wakeup_ipi(int n, void *stack)
144
void wakeup_ipi(int n, void *stack)
153
{
145
{
154
    trap_virtual_eoi();
146
    trap_virtual_eoi();
155
}
147
}
156
 
148
 
157
void trap_virtual_enable_irqs(__u16 irqmask)
149
void trap_virtual_enable_irqs(__u16 irqmask)
158
{
150
{
159
    if (enable_irqs_function)
151
    if (enable_irqs_function)
160
        enable_irqs_function(irqmask);
152
        enable_irqs_function(irqmask);
161
    else
153
    else
162
        panic("no enable_irqs_function\n");
154
        panic("no enable_irqs_function\n");
163
}
155
}
164
 
156
 
165
void trap_virtual_disable_irqs(__u16 irqmask)
157
void trap_virtual_disable_irqs(__u16 irqmask)
166
{
158
{
167
    if (disable_irqs_function)
159
    if (disable_irqs_function)
168
        disable_irqs_function(irqmask);
160
        disable_irqs_function(irqmask);
169
    else
161
    else
170
        panic("no disable_irqs_function\n");
162
        panic("no disable_irqs_function\n");
171
}
163
}
172
 
164
 
173
void trap_virtual_eoi(void)
165
void trap_virtual_eoi(void)
174
{
166
{
175
    if (eoi_function)
167
    if (eoi_function)
176
        eoi_function();
168
        eoi_function();
177
    else
169
    else
178
        panic("no eoi_function\n");
170
        panic("no eoi_function\n");
179
 
171
 
180
}
172
}
181
 
173