Subversion Repositories HelenOS-historic

Rev

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

Rev 958 Rev 962
1
/*
1
/*
2
 * Copyright (C) 2005 Jakub Jermar
2
 * Copyright (C) 2005 Jakub Jermar
3
 * Copyright (C) 2005 Jakub Vana
3
 * Copyright (C) 2005 Jakub Vana
4
 * All rights reserved.
4
 * All rights reserved.
5
 *
5
 *
6
 * Redistribution and use in source and binary forms, with or without
6
 * Redistribution and use in source and binary forms, with or without
7
 * modification, are permitted provided that the following conditions
7
 * modification, are permitted provided that the following conditions
8
 * are met:
8
 * are met:
9
 *
9
 *
10
 * - Redistributions of source code must retain the above copyright
10
 * - Redistributions of source code must retain the above copyright
11
 *   notice, this list of conditions and the following disclaimer.
11
 *   notice, this list of conditions and the following disclaimer.
12
 * - Redistributions in binary form must reproduce the above copyright
12
 * - Redistributions in binary form must reproduce the above copyright
13
 *   notice, this list of conditions and the following disclaimer in the
13
 *   notice, this list of conditions and the following disclaimer in the
14
 *   documentation and/or other materials provided with the distribution.
14
 *   documentation and/or other materials provided with the distribution.
15
 * - The name of the author may not be used to endorse or promote products
15
 * - The name of the author may not be used to endorse or promote products
16
 *   derived from this software without specific prior written permission.
16
 *   derived from this software without specific prior written permission.
17
 *
17
 *
18
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28
 *
28
 *
29
 */
29
 */
30
 
30
 
31
#include <arch/interrupt.h>
31
#include <arch/interrupt.h>
32
#include <panic.h>
32
#include <panic.h>
33
#include <print.h>
33
#include <print.h>
34
#include <console/console.h>
34
#include <console/console.h>
35
#include <arch/types.h>
35
#include <arch/types.h>
36
#include <arch/asm.h>
36
#include <arch/asm.h>
37
#include <arch/barrier.h>
37
#include <arch/barrier.h>
38
#include <arch/register.h>
38
#include <arch/register.h>
39
#include <arch/drivers/it.h>
39
#include <arch/drivers/it.h>
40
#include <arch.h>
40
#include <arch.h>
41
#include <symtab.h>
41
#include <symtab.h>
42
#include <debug.h>
42
#include <debug.h>
43
#include <syscall/syscall.h>
43
#include <syscall/syscall.h>
44
#include <print.h>
44
#include <print.h>
45
 
45
 
46
#define VECTORS_64_BUNDLE   20
46
#define VECTORS_64_BUNDLE   20
47
#define VECTORS_16_BUNDLE   48
47
#define VECTORS_16_BUNDLE   48
48
#define VECTORS_16_BUNDLE_START 0x5000
48
#define VECTORS_16_BUNDLE_START 0x5000
49
#define VECTOR_MAX      0x7f00
49
#define VECTOR_MAX      0x7f00
50
 
50
 
51
#define BUNDLE_SIZE     16
51
#define BUNDLE_SIZE     16
52
 
52
 
53
char *vector_names_64_bundle[VECTORS_64_BUNDLE] = {
53
char *vector_names_64_bundle[VECTORS_64_BUNDLE] = {
54
    "VHPT Translation vector",
54
    "VHPT Translation vector",
55
    "Instruction TLB vector",
55
    "Instruction TLB vector",
56
    "Data TLB vector",
56
    "Data TLB vector",
57
    "Alternate Instruction TLB vector",
57
    "Alternate Instruction TLB vector",
58
    "Alternate Data TLB vector",
58
    "Alternate Data TLB vector",
59
    "Data Nested TLB vector",
59
    "Data Nested TLB vector",
60
    "Instruction Key Miss vector",
60
    "Instruction Key Miss vector",
61
    "Data Key Miss vector",
61
    "Data Key Miss vector",
62
    "Dirty-Bit vector",
62
    "Dirty-Bit vector",
63
    "Instruction Access-Bit vector",
63
    "Instruction Access-Bit vector",
64
    "Data Access-Bit vector"
64
    "Data Access-Bit vector"
65
    "Break Instruction vector",
65
    "Break Instruction vector",
66
    "External Interrupt vector"
66
    "External Interrupt vector"
67
    "Reserved",
67
    "Reserved",
68
    "Reserved",
68
    "Reserved",
69
    "Reserved",
69
    "Reserved",
70
    "Reserved",
70
    "Reserved",
71
    "Reserved",
71
    "Reserved",
72
    "Reserved",
72
    "Reserved",
73
    "Reserved"
73
    "Reserved"
74
};
74
};
75
 
75
 
76
char *vector_names_16_bundle[VECTORS_16_BUNDLE] = {
76
char *vector_names_16_bundle[VECTORS_16_BUNDLE] = {
77
    "Page Not Present vector",
77
    "Page Not Present vector",
78
    "Key Permission vector",
78
    "Key Permission vector",
79
    "Instruction Access rights vector",
79
    "Instruction Access rights vector",
80
    "Data Access Rights vector",
80
    "Data Access Rights vector",
81
    "General Exception vector",
81
    "General Exception vector",
82
    "Disabled FP-Register vector",
82
    "Disabled FP-Register vector",
83
    "NaT Consumption vector",
83
    "NaT Consumption vector",
84
    "Speculation vector",
84
    "Speculation vector",
85
    "Reserved",
85
    "Reserved",
86
    "Debug vector",
86
    "Debug vector",
87
    "Unaligned Reference vector",
87
    "Unaligned Reference vector",
88
    "Unsupported Data Reference vector",
88
    "Unsupported Data Reference vector",
89
    "Floating-point Fault vector",
89
    "Floating-point Fault vector",
90
    "Floating-point Trap vector",
90
    "Floating-point Trap vector",
91
    "Lower-Privilege Transfer Trap vector",
91
    "Lower-Privilege Transfer Trap vector",
92
    "Taken Branch Trap vector",
92
    "Taken Branch Trap vector",
93
    "Single STep Trap vector",
93
    "Single STep Trap vector",
94
    "Reserved",
94
    "Reserved",
95
    "Reserved",
95
    "Reserved",
96
    "Reserved",
96
    "Reserved",
97
    "Reserved",
97
    "Reserved",
98
    "Reserved",
98
    "Reserved",
99
    "Reserved",
99
    "Reserved",
100
    "Reserved",
100
    "Reserved",
101
    "Reserved",
101
    "Reserved",
102
    "IA-32 Exception vector",
102
    "IA-32 Exception vector",
103
    "IA-32 Intercept vector",
103
    "IA-32 Intercept vector",
104
    "IA-32 Interrupt vector",
104
    "IA-32 Interrupt vector",
105
    "Reserved",
105
    "Reserved",
106
    "Reserved",
106
    "Reserved",
107
    "Reserved"
107
    "Reserved"
108
};
108
};
109
 
109
 
110
static char *vector_to_string(__u16 vector);
110
static char *vector_to_string(__u16 vector);
111
static void dump_interrupted_context(istate_t *istate);
111
static void dump_interrupted_context(istate_t *istate);
112
 
112
 
113
char *vector_to_string(__u16 vector)
113
char *vector_to_string(__u16 vector)
114
{
114
{
115
    ASSERT(vector <= VECTOR_MAX);
115
    ASSERT(vector <= VECTOR_MAX);
116
   
116
   
117
    if (vector >= VECTORS_16_BUNDLE_START)
117
    if (vector >= VECTORS_16_BUNDLE_START)
118
        return vector_names_16_bundle[(vector-VECTORS_16_BUNDLE_START)/(16*BUNDLE_SIZE)];
118
        return vector_names_16_bundle[(vector-VECTORS_16_BUNDLE_START)/(16*BUNDLE_SIZE)];
119
    else
119
    else
120
        return vector_names_64_bundle[vector/(64*BUNDLE_SIZE)];
120
        return vector_names_64_bundle[vector/(64*BUNDLE_SIZE)];
121
}
121
}
122
 
122
 
123
void dump_interrupted_context(istate_t *istate)
123
void dump_interrupted_context(istate_t *istate)
124
{
124
{
125
    char *ifa, *iipa, *iip;
125
    char *ifa, *iipa, *iip;
126
 
126
 
127
    ifa = get_symtab_entry(istate->cr_ifa);
127
    ifa = get_symtab_entry(istate->cr_ifa);
128
    iipa = get_symtab_entry(istate->cr_iipa);
128
    iipa = get_symtab_entry(istate->cr_iipa);
129
    iip = get_symtab_entry(istate->cr_iip);
129
    iip = get_symtab_entry(istate->cr_iip);
130
 
130
 
131
    putchar('\n');
131
    putchar('\n');
132
    printf("Interrupted context dump:\n");
132
    printf("Interrupted context dump:\n");
133
    printf("ar.bsp=%P\tar.bspstore=%P\n", istate->ar_bsp, istate->ar_bspstore);
133
    printf("ar.bsp=%P\tar.bspstore=%P\n", istate->ar_bsp, istate->ar_bspstore);
134
    printf("ar.rnat=%Q\tar.rsc=%Q\n", istate->ar_rnat, istate->ar_rsc);
134
    printf("ar.rnat=%Q\tar.rsc=%Q\n", istate->ar_rnat, istate->ar_rsc);
135
    printf("ar.ifs=%Q\tar.pfs=%Q\n", istate->ar_ifs, istate->ar_pfs);
135
    printf("ar.ifs=%Q\tar.pfs=%Q\n", istate->ar_ifs, istate->ar_pfs);
136
    printf("cr.isr=%Q\tcr.ipsr=%Q\t\n", istate->cr_isr.value, istate->cr_ipsr);
136
    printf("cr.isr=%Q\tcr.ipsr=%Q\t\n", istate->cr_isr.value, istate->cr_ipsr);
137
   
137
   
138
    printf("cr.iip=%Q, #%d\t(%s)\n", istate->cr_iip, istate->cr_isr.ei ,iip ? iip : "?");
138
    printf("cr.iip=%Q, #%d\t(%s)\n", istate->cr_iip, istate->cr_isr.ei ,iip ? iip : "?");
139
    printf("cr.iipa=%Q\t(%s)\n", istate->cr_iipa, iipa ? iipa : "?");
139
    printf("cr.iipa=%Q\t(%s)\n", istate->cr_iipa, iipa ? iipa : "?");
140
    printf("cr.ifa=%Q\t(%s)\n", istate->cr_ifa, ifa ? ifa : "?");
140
    printf("cr.ifa=%Q\t(%s)\n", istate->cr_ifa, ifa ? ifa : "?");
141
}
141
}
142
 
142
 
143
void general_exception(__u64 vector, istate_t *istate)
143
void general_exception(__u64 vector, istate_t *istate)
144
{
144
{
145
    char *desc = "";
145
    char *desc = "";
146
 
146
 
147
    dump_interrupted_context(istate);
147
    dump_interrupted_context(istate);
148
 
148
 
149
    switch (istate->cr_isr.ge_code) {
149
    switch (istate->cr_isr.ge_code) {
150
        case GE_ILLEGALOP:
150
        case GE_ILLEGALOP:
151
        desc = "Illegal Operation fault";
151
        desc = "Illegal Operation fault";
152
        break;
152
        break;
153
        case GE_PRIVOP:
153
        case GE_PRIVOP:
154
        desc = "Privileged Operation fault";
154
        desc = "Privileged Operation fault";
155
        break;
155
        break;
156
        case GE_PRIVREG:
156
        case GE_PRIVREG:
157
        desc = "Privileged Register fault";
157
        desc = "Privileged Register fault";
158
        break;
158
        break;
159
        case GE_RESREGFLD:
159
        case GE_RESREGFLD:
160
        desc = "Reserved Register/Field fault";
160
        desc = "Reserved Register/Field fault";
161
        break;
161
        break;
162
        case GE_DISBLDISTRAN:
162
        case GE_DISBLDISTRAN:
163
        desc = "Disabled Instruction Set Transition fault";
163
        desc = "Disabled Instruction Set Transition fault";
164
        break;
164
        break;
165
        case GE_ILLEGALDEP:
165
        case GE_ILLEGALDEP:
166
        desc = "Illegal Dependency fault";
166
        desc = "Illegal Dependency fault";
167
        break;
167
        break;
168
        default:
168
        default:
169
            desc = "unknown";
169
            desc = "unknown";
170
        break;
170
        break;
171
    }
171
    }
172
 
172
 
173
    panic("General Exception (%s)\n", desc);
173
    panic("General Exception (%s)\n", desc);
174
}
174
}
175
 
175
 
176
/** Handle syscall. */
176
/** Handle syscall. */
177
int break_instruction(__u64 vector, istate_t *istate)
177
int break_instruction(__u64 vector, istate_t *istate)
178
{
178
{
179
    /*
179
    /*
180
     * Move to next instruction after BREAK.
180
     * Move to next instruction after BREAK.
181
     */
181
     */
182
    if (istate->cr_ipsr.ri == 2) {
182
    if (istate->cr_ipsr.ri == 2) {
183
        istate->cr_ipsr.ri = 0;
183
        istate->cr_ipsr.ri = 0;
184
        istate->cr_iip += 16;
184
        istate->cr_iip += 16;
185
    } else {
185
    } else {
186
        istate->cr_ipsr.ri++;
186
        istate->cr_ipsr.ri++;
187
    }
187
    }
188
 
188
 
189
    if (istate->in3 < SYSCALL_END)
189
    if (istate->in4 < SYSCALL_END)
190
        return syscall_table[istate->in3](istate->in0, istate->in1, istate->in2);
190
        return syscall_table[istate->in4](istate->in0, istate->in1, istate->in2, istate->in3);
191
    else
191
    else
192
        panic("Undefined syscall %d", istate->in3);
192
        panic("Undefined syscall %d", istate->in4);
193
       
193
       
194
    return -1;
194
    return -1;
195
}
195
}
196
 
196
 
197
void universal_handler(__u64 vector, istate_t *istate)
197
void universal_handler(__u64 vector, istate_t *istate)
198
{
198
{
199
    dump_interrupted_context(istate);
199
    dump_interrupted_context(istate);
200
    panic("Interruption: %W (%s)\n", (__u16) vector, vector_to_string(vector));
200
    panic("Interruption: %W (%s)\n", (__u16) vector, vector_to_string(vector));
201
}
201
}
202
 
202
 
203
void external_interrupt(__u64 vector, istate_t *istate)
203
void external_interrupt(__u64 vector, istate_t *istate)
204
{
204
{
205
    cr_ivr_t ivr;
205
    cr_ivr_t ivr;
206
   
206
   
207
    ivr.value = ivr_read();
207
    ivr.value = ivr_read();
208
    srlz_d();
208
    srlz_d();
209
 
209
 
210
    switch(ivr.vector) {
210
    switch(ivr.vector) {
211
        case INTERRUPT_TIMER:
211
        case INTERRUPT_TIMER:
212
        it_interrupt();
212
        it_interrupt();
213
            break;
213
            break;
214
        case INTERRUPT_SPURIOUS:
214
        case INTERRUPT_SPURIOUS:
215
            printf("cpu%d: spurious interrupt\n", CPU->id);
215
            printf("cpu%d: spurious interrupt\n", CPU->id);
216
        break;
216
        break;
217
        default:
217
        default:
218
        panic("\nUnhandled External Interrupt Vector %d\n", ivr.vector);
218
        panic("\nUnhandled External Interrupt Vector %d\n", ivr.vector);
219
        break;
219
        break;
220
    }
220
    }
221
}
221
}
222
 
222