Rev 1735 | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 1735 | Rev 1780 | ||
---|---|---|---|
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 | /** @addtogroup amd64interrupt |
29 | /** @addtogroup amd64interrupt |
30 | * @{ |
30 | * @{ |
31 | */ |
31 | */ |
32 | /** @file |
32 | /** @file |
33 | */ |
33 | */ |
34 | 34 | ||
35 | #include <arch/interrupt.h> |
35 | #include <arch/interrupt.h> |
36 | #include <print.h> |
36 | #include <print.h> |
37 | #include <debug.h> |
37 | #include <debug.h> |
38 | #include <panic.h> |
38 | #include <panic.h> |
39 | #include <arch/drivers/i8259.h> |
39 | #include <arch/drivers/i8259.h> |
40 | #include <func.h> |
40 | #include <func.h> |
41 | #include <cpu.h> |
41 | #include <cpu.h> |
42 | #include <arch/asm.h> |
42 | #include <arch/asm.h> |
43 | #include <mm/tlb.h> |
43 | #include <mm/tlb.h> |
44 | #include <mm/as.h> |
44 | #include <mm/as.h> |
45 | #include <arch.h> |
45 | #include <arch.h> |
46 | #include <symtab.h> |
46 | #include <symtab.h> |
47 | #include <arch/asm.h> |
47 | #include <arch/asm.h> |
48 | #include <proc/scheduler.h> |
48 | #include <proc/scheduler.h> |
49 | #include <proc/thread.h> |
49 | #include <proc/thread.h> |
50 | #include <proc/task.h> |
50 | #include <proc/task.h> |
51 | #include <synch/spinlock.h> |
51 | #include <synch/spinlock.h> |
52 | #include <arch/ddi/ddi.h> |
52 | #include <arch/ddi/ddi.h> |
53 | #include <interrupt.h> |
53 | #include <interrupt.h> |
54 | #include <ipc/irq.h> |
54 | #include <ipc/irq.h> |
55 | 55 | ||
56 | void print_info_errcode(int n, istate_t *istate) |
56 | void print_info_errcode(int n, istate_t *istate) |
57 | { |
57 | { |
58 | char *symbol; |
58 | char *symbol; |
59 | /* __u64 *x = &istate->stack[0]; */ |
59 | /* uint64_t *x = &istate->stack[0]; */ |
60 | 60 | ||
61 | if (!(symbol=get_symtab_entry(istate->rip))) |
61 | if (!(symbol=get_symtab_entry(istate->rip))) |
62 | symbol = ""; |
62 | symbol = ""; |
63 | 63 | ||
64 | printf("-----EXCEPTION(%d) OCCURED----- ( %s )\n",n, __FUNCTION__); |
64 | printf("-----EXCEPTION(%d) OCCURED----- ( %s )\n",n, __FUNCTION__); |
65 | printf("%%rip: %#llx (%s)\n",istate->rip, symbol); |
65 | printf("%%rip: %#llx (%s)\n",istate->rip, symbol); |
66 | printf("ERROR_WORD=%#llx\n", istate->error_word); |
66 | printf("ERROR_WORD=%#llx\n", istate->error_word); |
67 | printf("%%rcs=%#llx, flags=%#llx, %%cr0=%#llx\n", istate->cs, istate->rflags, read_cr0()); |
67 | printf("%%rcs=%#llx, flags=%#llx, %%cr0=%#llx\n", istate->cs, istate->rflags, read_cr0()); |
68 | printf("%%rax=%#llx, %%rcx=%#llx, %%rdx=%#llx\n", istate->rax, istate->rcx, istate->rdx); |
68 | printf("%%rax=%#llx, %%rcx=%#llx, %%rdx=%#llx\n", istate->rax, istate->rcx, istate->rdx); |
69 | printf("%%rsi=%#llx, %%rdi=%#llx, %%r8 =%#llx\n", istate->rsi, istate->rdi, istate->r8); |
69 | printf("%%rsi=%#llx, %%rdi=%#llx, %%r8 =%#llx\n", istate->rsi, istate->rdi, istate->r8); |
70 | printf("%%r9 =%#llx, %%r10 =%#llx, %%r11=%#llx\n", istate->r9, istate->r10, istate->r11); |
70 | printf("%%r9 =%#llx, %%r10 =%#llx, %%r11=%#llx\n", istate->r9, istate->r10, istate->r11); |
71 | #ifdef CONFIG_DEBUG_ALLREGS |
71 | #ifdef CONFIG_DEBUG_ALLREGS |
72 | printf("%%r12=%#llx, %%r13=%#llx, %%r14=%#llx\n", istate->r12, istate->r13, istate->r14); |
72 | printf("%%r12=%#llx, %%r13=%#llx, %%r14=%#llx\n", istate->r12, istate->r13, istate->r14); |
73 | printf("%%r15=%#llx, %%rbx=%#llx, %%rbp=%#llx\n", istate->r15, istate->rbx, &istate->rbp); |
73 | printf("%%r15=%#llx, %%rbx=%#llx, %%rbp=%#llx\n", istate->r15, istate->rbx, &istate->rbp); |
74 | #endif |
74 | #endif |
75 | printf("%%rsp=%#llx\n", &istate->stack[0]); |
75 | printf("%%rsp=%#llx\n", &istate->stack[0]); |
76 | } |
76 | } |
77 | 77 | ||
78 | /* |
78 | /* |
79 | * Interrupt and exception dispatching. |
79 | * Interrupt and exception dispatching. |
80 | */ |
80 | */ |
81 | 81 | ||
82 | void (* disable_irqs_function)(__u16 irqmask) = NULL; |
82 | void (* disable_irqs_function)(uint16_t irqmask) = NULL; |
83 | void (* enable_irqs_function)(__u16 irqmask) = NULL; |
83 | void (* enable_irqs_function)(uint16_t irqmask) = NULL; |
84 | void (* eoi_function)(void) = NULL; |
84 | void (* eoi_function)(void) = NULL; |
85 | 85 | ||
86 | void null_interrupt(int n, istate_t *istate) |
86 | void null_interrupt(int n, istate_t *istate) |
87 | { |
87 | { |
88 | fault_if_from_uspace(istate, "unserviced interrupt: %d", n); |
88 | fault_if_from_uspace(istate, "unserviced interrupt: %d", n); |
89 | print_info_errcode(n, istate); |
89 | print_info_errcode(n, istate); |
90 | panic("unserviced interrupt\n"); |
90 | panic("unserviced interrupt\n"); |
91 | } |
91 | } |
92 | 92 | ||
93 | /** General Protection Fault. */ |
93 | /** General Protection Fault. */ |
94 | void gp_fault(int n, istate_t *istate) |
94 | void gp_fault(int n, istate_t *istate) |
95 | { |
95 | { |
96 | if (TASK) { |
96 | if (TASK) { |
97 | count_t ver; |
97 | count_t ver; |
98 | 98 | ||
99 | spinlock_lock(&TASK->lock); |
99 | spinlock_lock(&TASK->lock); |
100 | ver = TASK->arch.iomapver; |
100 | ver = TASK->arch.iomapver; |
101 | spinlock_unlock(&TASK->lock); |
101 | spinlock_unlock(&TASK->lock); |
102 | 102 | ||
103 | if (CPU->arch.iomapver_copy != ver) { |
103 | if (CPU->arch.iomapver_copy != ver) { |
104 | /* |
104 | /* |
105 | * This fault can be caused by an early access |
105 | * This fault can be caused by an early access |
106 | * to I/O port because of an out-dated |
106 | * to I/O port because of an out-dated |
107 | * I/O Permission bitmap installed on CPU. |
107 | * I/O Permission bitmap installed on CPU. |
108 | * Install the fresh copy and restart |
108 | * Install the fresh copy and restart |
109 | * the instruction. |
109 | * the instruction. |
110 | */ |
110 | */ |
111 | io_perm_bitmap_install(); |
111 | io_perm_bitmap_install(); |
112 | return; |
112 | return; |
113 | } |
113 | } |
114 | fault_if_from_uspace(istate, "general protection fault"); |
114 | fault_if_from_uspace(istate, "general protection fault"); |
115 | } |
115 | } |
116 | 116 | ||
117 | print_info_errcode(n, istate); |
117 | print_info_errcode(n, istate); |
118 | panic("general protection fault\n"); |
118 | panic("general protection fault\n"); |
119 | } |
119 | } |
120 | 120 | ||
121 | void ss_fault(int n, istate_t *istate) |
121 | void ss_fault(int n, istate_t *istate) |
122 | { |
122 | { |
123 | fault_if_from_uspace(istate, "stack fault"); |
123 | fault_if_from_uspace(istate, "stack fault"); |
124 | print_info_errcode(n, istate); |
124 | print_info_errcode(n, istate); |
125 | panic("stack fault\n"); |
125 | panic("stack fault\n"); |
126 | } |
126 | } |
127 | 127 | ||
128 | void nm_fault(int n, istate_t *istate) |
128 | void nm_fault(int n, istate_t *istate) |
129 | { |
129 | { |
130 | #ifdef CONFIG_FPU_LAZY |
130 | #ifdef CONFIG_FPU_LAZY |
131 | scheduler_fpu_lazy_request(); |
131 | scheduler_fpu_lazy_request(); |
132 | #else |
132 | #else |
133 | fault_if_from_uspace(istate, "fpu fault"); |
133 | fault_if_from_uspace(istate, "fpu fault"); |
134 | panic("fpu fault"); |
134 | panic("fpu fault"); |
135 | #endif |
135 | #endif |
136 | } |
136 | } |
137 | 137 | ||
138 | void tlb_shootdown_ipi(int n, istate_t *istate) |
138 | void tlb_shootdown_ipi(int n, istate_t *istate) |
139 | { |
139 | { |
140 | trap_virtual_eoi(); |
140 | trap_virtual_eoi(); |
141 | tlb_shootdown_ipi_recv(); |
141 | tlb_shootdown_ipi_recv(); |
142 | } |
142 | } |
143 | 143 | ||
144 | void trap_virtual_enable_irqs(__u16 irqmask) |
144 | void trap_virtual_enable_irqs(uint16_t irqmask) |
145 | { |
145 | { |
146 | if (enable_irqs_function) |
146 | if (enable_irqs_function) |
147 | enable_irqs_function(irqmask); |
147 | enable_irqs_function(irqmask); |
148 | else |
148 | else |
149 | panic("no enable_irqs_function\n"); |
149 | panic("no enable_irqs_function\n"); |
150 | } |
150 | } |
151 | 151 | ||
152 | void trap_virtual_disable_irqs(__u16 irqmask) |
152 | void trap_virtual_disable_irqs(uint16_t irqmask) |
153 | { |
153 | { |
154 | if (disable_irqs_function) |
154 | if (disable_irqs_function) |
155 | disable_irqs_function(irqmask); |
155 | disable_irqs_function(irqmask); |
156 | else |
156 | else |
157 | panic("no disable_irqs_function\n"); |
157 | panic("no disable_irqs_function\n"); |
158 | } |
158 | } |
159 | 159 | ||
160 | void trap_virtual_eoi(void) |
160 | void trap_virtual_eoi(void) |
161 | { |
161 | { |
162 | if (eoi_function) |
162 | if (eoi_function) |
163 | eoi_function(); |
163 | eoi_function(); |
164 | else |
164 | else |
165 | panic("no eoi_function\n"); |
165 | panic("no eoi_function\n"); |
166 | 166 | ||
167 | } |
167 | } |
168 | 168 | ||
169 | static void ipc_int(int n, istate_t *istate) |
169 | static void ipc_int(int n, istate_t *istate) |
170 | { |
170 | { |
171 | ipc_irq_send_notif(n-IVT_IRQBASE); |
171 | ipc_irq_send_notif(n-IVT_IRQBASE); |
172 | trap_virtual_eoi(); |
172 | trap_virtual_eoi(); |
173 | } |
173 | } |
174 | 174 | ||
175 | 175 | ||
176 | /* Reregister irq to be IPC-ready */ |
176 | /* Reregister irq to be IPC-ready */ |
177 | void irq_ipc_bind_arch(__native irq) |
177 | void irq_ipc_bind_arch(unative_t irq) |
178 | { |
178 | { |
179 | if (irq == IRQ_CLK) |
179 | if (irq == IRQ_CLK) |
180 | return; |
180 | return; |
181 | exc_register(IVT_IRQBASE+irq, "ipc_int", ipc_int); |
181 | exc_register(IVT_IRQBASE+irq, "ipc_int", ipc_int); |
182 | trap_virtual_enable_irqs(1 << irq); |
182 | trap_virtual_enable_irqs(1 << irq); |
183 | } |
183 | } |
184 | 184 | ||
185 | /** @} |
185 | /** @} |
186 | */ |
186 | */ |
187 | 187 | ||
188 | 188 |