Subversion Repositories HelenOS-historic

Rev

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

Rev 1477 Rev 1595
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 <syscall/syscall.h>
30
#include <syscall/syscall.h>
31
#include <print.h>
31
#include <print.h>
32
#include <debug.h>
32
#include <debug.h>
33
#include <panic.h>
33
#include <panic.h>
34
#include <arch/drivers/i8259.h>
34
#include <arch/drivers/i8259.h>
35
#include <func.h>
35
#include <func.h>
36
#include <cpu.h>
36
#include <cpu.h>
37
#include <arch/asm.h>
37
#include <arch/asm.h>
38
#include <mm/tlb.h>
38
#include <mm/tlb.h>
39
#include <mm/as.h>
39
#include <mm/as.h>
40
#include <arch.h>
40
#include <arch.h>
41
#include <symtab.h>
41
#include <symtab.h>
42
#include <proc/thread.h>
42
#include <proc/thread.h>
43
#include <proc/task.h>
43
#include <proc/task.h>
44
#include <synch/spinlock.h>
44
#include <synch/spinlock.h>
45
#include <arch/ddi/ddi.h>
45
#include <arch/ddi/ddi.h>
46
#include <ipc/sysipc.h>
46
#include <ipc/sysipc.h>
47
#include <interrupt.h>
47
#include <interrupt.h>
48
 
48
 
49
/*
49
/*
50
 * Interrupt and exception dispatching.
50
 * Interrupt and exception dispatching.
51
 */
51
 */
52
 
52
 
53
void (* disable_irqs_function)(__u16 irqmask) = NULL;
53
void (* disable_irqs_function)(__u16 irqmask) = NULL;
54
void (* enable_irqs_function)(__u16 irqmask) = NULL;
54
void (* enable_irqs_function)(__u16 irqmask) = NULL;
55
void (* eoi_function)(void) = NULL;
55
void (* eoi_function)(void) = NULL;
56
 
56
 
57
void PRINT_INFO_ERRCODE(istate_t *istate)
57
void PRINT_INFO_ERRCODE(istate_t *istate)
58
{
58
{
59
    char *symbol = get_symtab_entry(istate->eip);
59
    char *symbol = get_symtab_entry(istate->eip);
60
 
60
 
61
    if (!symbol)
61
    if (!symbol)
62
        symbol = "";
62
        symbol = "";
63
 
63
 
64
    if (CPU)
64
    if (CPU)
65
        printf("----------------EXCEPTION OCCURED (cpu%d)----------------\n", CPU->id);
65
        printf("----------------EXCEPTION OCCURED (cpu%d)----------------\n", CPU->id);
66
    else
66
    else
67
        printf("----------------EXCEPTION OCCURED----------------\n");
67
        printf("----------------EXCEPTION OCCURED----------------\n");
68
       
68
       
69
    printf("%%eip: %#x (%s)\n",istate->eip,symbol);
69
    printf("%%eip: %#x (%s)\n",istate->eip,symbol);
70
    printf("ERROR_WORD=%#x\n", istate->error_word);
70
    printf("ERROR_WORD=%#x\n", istate->error_word);
71
    printf("%%cs=%#x,flags=%#x\n", istate->cs, istate->eflags);
71
    printf("%%cs=%#x,flags=%#x\n", istate->cs, istate->eflags);
72
    printf("%%eax=%#x, %%ecx=%#x, %%edx=%#x, %%esp=%#x\n",  istate->eax,istate->ecx,istate->edx,&istate->stack[0]);
72
    printf("%%eax=%#x, %%ecx=%#x, %%edx=%#x, %%esp=%#x\n",  istate->eax,istate->ecx,istate->edx,&istate->stack[0]);
73
#ifdef CONFIG_DEBUG_ALLREGS
73
#ifdef CONFIG_DEBUG_ALLREGS
74
    printf("%%esi=%#x, %%edi=%#x, %%ebp=%#x, %%ebx=%#x\n",  istate->esi,istate->edi,istate->ebp,istate->ebx);
74
    printf("%%esi=%#x, %%edi=%#x, %%ebp=%#x, %%ebx=%#x\n",  istate->esi,istate->edi,istate->ebp,istate->ebx);
75
#endif
75
#endif
76
    printf("stack: %#x, %#x, %#x, %#x\n", istate->stack[0], istate->stack[1], istate->stack[2], istate->stack[3]);
76
    printf("stack: %#x, %#x, %#x, %#x\n", istate->stack[0], istate->stack[1], istate->stack[2], istate->stack[3]);
77
    printf("       %#x, %#x, %#x, %#x\n", istate->stack[4], istate->stack[5], istate->stack[6], istate->stack[7]);
77
    printf("       %#x, %#x, %#x, %#x\n", istate->stack[4], istate->stack[5], istate->stack[6], istate->stack[7]);
78
}
78
}
79
 
79
 
80
void null_interrupt(int n, istate_t *istate)
80
void null_interrupt(int n, istate_t *istate)
81
{
81
{
-
 
82
    fault_if_from_uspace(istate, "unserviced interrupt: %d", n);
-
 
83
 
82
    PRINT_INFO_ERRCODE(istate);
84
    PRINT_INFO_ERRCODE(istate);
83
    panic("unserviced interrupt: %d\n", n);
85
    panic("unserviced interrupt: %d\n", n);
84
}
86
}
85
 
87
 
86
/** General Protection Fault. */
88
/** General Protection Fault. */
87
void gp_fault(int n, istate_t *istate)
89
void gp_fault(int n, istate_t *istate)
88
{
90
{
89
    if (TASK) {
91
    if (TASK) {
90
        count_t ver;
92
        count_t ver;
91
       
93
       
92
        spinlock_lock(&TASK->lock);
94
        spinlock_lock(&TASK->lock);
93
        ver = TASK->arch.iomapver;
95
        ver = TASK->arch.iomapver;
94
        spinlock_unlock(&TASK->lock);
96
        spinlock_unlock(&TASK->lock);
95
   
97
   
96
        if (CPU->arch.iomapver_copy != ver) {
98
        if (CPU->arch.iomapver_copy != ver) {
97
            /*
99
            /*
98
             * This fault can be caused by an early access
100
             * This fault can be caused by an early access
99
             * to I/O port because of an out-dated
101
             * to I/O port because of an out-dated
100
             * I/O Permission bitmap installed on CPU.
102
             * I/O Permission bitmap installed on CPU.
101
             * Install the fresh copy and restart
103
             * Install the fresh copy and restart
102
             * the instruction.
104
             * the instruction.
103
             */
105
             */
104
            io_perm_bitmap_install();
106
            io_perm_bitmap_install();
105
            return;
107
            return;
106
        }
108
        }
-
 
109
        fault_if_from_uspace(istate, "general protection fault");
107
    }
110
    }
108
 
111
 
109
    PRINT_INFO_ERRCODE(istate);
112
    PRINT_INFO_ERRCODE(istate);
110
    panic("general protection fault\n");
113
    panic("general protection fault\n");
111
}
114
}
112
 
115
 
113
void ss_fault(int n, istate_t *istate)
116
void ss_fault(int n, istate_t *istate)
114
{
117
{
-
 
118
    fault_if_from_uspace(istate, "stack fault");
-
 
119
 
115
    PRINT_INFO_ERRCODE(istate);
120
    PRINT_INFO_ERRCODE(istate);
116
    panic("stack fault\n");
121
    panic("stack fault\n");
117
}
122
}
118
 
123
 
119
void simd_fp_exception(int n, istate_t *istate)
124
void simd_fp_exception(int n, istate_t *istate)
120
{
125
{
121
 
-
 
122
    PRINT_INFO_ERRCODE(istate);
-
 
123
    __u32 mxcsr;
126
    __u32 mxcsr;
124
    asm
127
    asm
125
    (
128
    (
126
        "stmxcsr %0;\n"
129
        "stmxcsr %0;\n"
127
        :"=m"(mxcsr)
130
        :"=m"(mxcsr)
128
    );
131
    );
-
 
132
    fault_if_from_uspace(istate, "SIMD FP exception(19), MXCSR: %#zX",
-
 
133
                 (__native)mxcsr);
-
 
134
 
-
 
135
    PRINT_INFO_ERRCODE(istate);
129
    printf("MXCSR: %#zX\n",(__native)(mxcsr));
136
    printf("MXCSR: %#zX\n",(__native)(mxcsr));
130
    panic("SIMD FP exception(19)\n");
137
    panic("SIMD FP exception(19)\n");
131
}
138
}
132
 
139
 
133
void nm_fault(int n, istate_t *istate)
140
void nm_fault(int n, istate_t *istate)
134
{
141
{
135
#ifdef CONFIG_FPU_LAZY     
142
#ifdef CONFIG_FPU_LAZY     
136
    scheduler_fpu_lazy_request();
143
    scheduler_fpu_lazy_request();
137
#else
144
#else
-
 
145
    fault_if_from_uspace(istate, "fpu fault");
138
    panic("fpu fault");
146
    panic("fpu fault");
139
#endif
147
#endif
140
}
148
}
141
 
149
 
142
void syscall(int n, istate_t *istate)
150
void syscall(int n, istate_t *istate)
143
{
151
{
144
    panic("Obsolete syscall handler.");
152
    panic("Obsolete syscall handler.");
145
}
153
}
146
 
154
 
147
void tlb_shootdown_ipi(int n, istate_t *istate)
155
void tlb_shootdown_ipi(int n, istate_t *istate)
148
{
156
{
149
    trap_virtual_eoi();
157
    trap_virtual_eoi();
150
    tlb_shootdown_ipi_recv();
158
    tlb_shootdown_ipi_recv();
151
}
159
}
152
 
160
 
153
void trap_virtual_enable_irqs(__u16 irqmask)
161
void trap_virtual_enable_irqs(__u16 irqmask)
154
{
162
{
155
    if (enable_irqs_function)
163
    if (enable_irqs_function)
156
        enable_irqs_function(irqmask);
164
        enable_irqs_function(irqmask);
157
    else
165
    else
158
        panic("no enable_irqs_function\n");
166
        panic("no enable_irqs_function\n");
159
}
167
}
160
 
168
 
161
void trap_virtual_disable_irqs(__u16 irqmask)
169
void trap_virtual_disable_irqs(__u16 irqmask)
162
{
170
{
163
    if (disable_irqs_function)
171
    if (disable_irqs_function)
164
        disable_irqs_function(irqmask);
172
        disable_irqs_function(irqmask);
165
    else
173
    else
166
        panic("no disable_irqs_function\n");
174
        panic("no disable_irqs_function\n");
167
}
175
}
168
 
176
 
169
void trap_virtual_eoi(void)
177
void trap_virtual_eoi(void)
170
{
178
{
171
    if (eoi_function)
179
    if (eoi_function)
172
        eoi_function();
180
        eoi_function();
173
    else
181
    else
174
        panic("no eoi_function\n");
182
        panic("no eoi_function\n");
175
 
183
 
176
}
184
}
177
 
185
 
178
static void ipc_int(int n, istate_t *istate)
186
static void ipc_int(int n, istate_t *istate)
179
{
187
{
180
    trap_virtual_eoi();
188
    trap_virtual_eoi();
181
    ipc_irq_send_notif(n-IVT_IRQBASE);
189
    ipc_irq_send_notif(n-IVT_IRQBASE);
182
}
190
}
183
 
191
 
184
 
192
 
185
/* Reregister irq to be IPC-ready */
193
/* Reregister irq to be IPC-ready */
186
void irq_ipc_bind_arch(__native irq)
194
void irq_ipc_bind_arch(__native irq)
187
{
195
{
188
    if (irq == IRQ_CLK)
196
    if (irq == IRQ_CLK)
189
        return;
197
        return;
190
    exc_register(IVT_IRQBASE+irq, "ipc_int", ipc_int);
198
    exc_register(IVT_IRQBASE+irq, "ipc_int", ipc_int);
191
}
199
}
192
 
200