Subversion Repositories HelenOS

Rev

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

Rev 1946 Rev 2071
1
/*
1
/*
2
 * Copyright (C) 2005 Jakub Jermar
2
 * Copyright (c) 2005 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 sparc64interrupt
29
/** @addtogroup sparc64interrupt
30
 * @{
30
 * @{
31
 */
31
 */
32
/** @file
32
/** @file
33
 *
33
 *
34
 */
34
 */
35
 
35
 
36
#include <arch/trap/exception.h>
36
#include <arch/trap/exception.h>
37
#include <arch/mm/tlb.h>
37
#include <arch/mm/tlb.h>
38
#include <arch/interrupt.h>
38
#include <arch/interrupt.h>
39
#include <interrupt.h>
39
#include <interrupt.h>
40
#include <arch/asm.h>
40
#include <arch/asm.h>
41
#include <arch/register.h>
41
#include <arch/register.h>
42
#include <debug.h>
42
#include <debug.h>
43
#include <typedefs.h>
43
#include <typedefs.h>
44
#include <symtab.h>
44
#include <symtab.h>
45
#include <print.h>
45
#include <print.h>
46
 
46
 
47
void dump_istate(istate_t *istate)
47
void dump_istate(istate_t *istate)
48
{
48
{
49
    printf("TSTATE=%#llx\n", istate->tstate);
49
    printf("TSTATE=%#llx\n", istate->tstate);
50
    printf("TPC=%#llx (%s)\n", istate->tpc, get_symtab_entry(istate->tpc));
50
    printf("TPC=%#llx (%s)\n", istate->tpc, get_symtab_entry(istate->tpc));
51
    printf("TNPC=%#llx (%s)\n", istate->tnpc, get_symtab_entry(istate->tnpc));
51
    printf("TNPC=%#llx (%s)\n", istate->tnpc, get_symtab_entry(istate->tnpc));
52
}
52
}
53
 
53
 
54
/** Handle instruction_access_exception. (0x8) */
54
/** Handle instruction_access_exception. (0x8) */
55
void instruction_access_exception(int n, istate_t *istate)
55
void instruction_access_exception(int n, istate_t *istate)
56
{
56
{
57
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
57
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
58
    dump_istate(istate);
58
    dump_istate(istate);
59
    panic("%s\n", __FUNCTION__);
59
    panic("%s\n", __FUNCTION__);
60
}
60
}
61
 
61
 
62
/** Handle instruction_access_error. (0xa) */
62
/** Handle instruction_access_error. (0xa) */
63
void instruction_access_error(int n, istate_t *istate)
63
void instruction_access_error(int n, istate_t *istate)
64
{
64
{
65
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
65
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
66
    dump_istate(istate);
66
    dump_istate(istate);
67
    panic("%s\n", __FUNCTION__);
67
    panic("%s\n", __FUNCTION__);
68
}
68
}
69
 
69
 
70
/** Handle illegal_instruction. (0x10) */
70
/** Handle illegal_instruction. (0x10) */
71
void illegal_instruction(int n, istate_t *istate)
71
void illegal_instruction(int n, istate_t *istate)
72
{
72
{
73
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
73
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
74
    dump_istate(istate);
74
    dump_istate(istate);
75
    panic("%s\n", __FUNCTION__);
75
    panic("%s\n", __FUNCTION__);
76
}
76
}
77
 
77
 
78
/** Handle privileged_opcode. (0x11) */
78
/** Handle privileged_opcode. (0x11) */
79
void privileged_opcode(int n, istate_t *istate)
79
void privileged_opcode(int n, istate_t *istate)
80
{
80
{
81
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
81
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
82
    dump_istate(istate);
82
    dump_istate(istate);
83
    panic("%s\n", __FUNCTION__);
83
    panic("%s\n", __FUNCTION__);
84
}
84
}
85
 
85
 
86
/** Handle unimplemented_LDD. (0x12) */
86
/** Handle unimplemented_LDD. (0x12) */
87
void unimplemented_LDD(int n, istate_t *istate)
87
void unimplemented_LDD(int n, istate_t *istate)
88
{
88
{
89
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
89
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
90
    dump_istate(istate);
90
    dump_istate(istate);
91
    panic("%s\n", __FUNCTION__);
91
    panic("%s\n", __FUNCTION__);
92
}
92
}
93
 
93
 
94
/** Handle unimplemented_STD. (0x13) */
94
/** Handle unimplemented_STD. (0x13) */
95
void unimplemented_STD(int n, istate_t *istate)
95
void unimplemented_STD(int n, istate_t *istate)
96
{
96
{
97
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
97
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
98
    dump_istate(istate);
98
    dump_istate(istate);
99
    panic("%s\n", __FUNCTION__);
99
    panic("%s\n", __FUNCTION__);
100
}
100
}
101
 
101
 
102
/** Handle fp_disabled. (0x20) */
102
/** Handle fp_disabled. (0x20) */
103
void fp_disabled(int n, istate_t *istate)
103
void fp_disabled(int n, istate_t *istate)
104
{
104
{
105
    fprs_reg_t fprs;
105
    fprs_reg_t fprs;
106
   
106
   
107
    fprs.value = fprs_read();
107
    fprs.value = fprs_read();
108
    if (!fprs.fef) {
108
    if (!fprs.fef) {
109
        fprs.fef = true;
109
        fprs.fef = true;
110
        fprs_write(fprs.value);
110
        fprs_write(fprs.value);
111
        return;
111
        return;
112
    }
112
    }
113
 
113
 
114
#ifdef CONFIG_FPU_LAZY
114
#ifdef CONFIG_FPU_LAZY
115
    scheduler_fpu_lazy_request();
115
    scheduler_fpu_lazy_request();
116
#else
116
#else
117
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
117
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
118
    dump_istate(istate);
118
    dump_istate(istate);
119
    panic("%s\n", __FUNCTION__);
119
    panic("%s\n", __FUNCTION__);
120
#endif
120
#endif
121
}
121
}
122
 
122
 
123
/** Handle fp_exception_ieee_754. (0x21) */
123
/** Handle fp_exception_ieee_754. (0x21) */
124
void fp_exception_ieee_754(int n, istate_t *istate)
124
void fp_exception_ieee_754(int n, istate_t *istate)
125
{
125
{
126
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
126
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
127
    dump_istate(istate);
127
    dump_istate(istate);
128
    panic("%s\n", __FUNCTION__);
128
    panic("%s\n", __FUNCTION__);
129
}
129
}
130
 
130
 
131
/** Handle fp_exception_other. (0x22) */
131
/** Handle fp_exception_other. (0x22) */
132
void fp_exception_other(int n, istate_t *istate)
132
void fp_exception_other(int n, istate_t *istate)
133
{
133
{
134
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
134
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
135
    dump_istate(istate);
135
    dump_istate(istate);
136
    panic("%s\n", __FUNCTION__);
136
    panic("%s\n", __FUNCTION__);
137
}
137
}
138
 
138
 
139
/** Handle tag_overflow. (0x23) */
139
/** Handle tag_overflow. (0x23) */
140
void tag_overflow(int n, istate_t *istate)
140
void tag_overflow(int n, istate_t *istate)
141
{
141
{
142
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
142
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
143
    dump_istate(istate);
143
    dump_istate(istate);
144
    panic("%s\n", __FUNCTION__);
144
    panic("%s\n", __FUNCTION__);
145
}
145
}
146
 
146
 
147
/** Handle division_by_zero. (0x28) */
147
/** Handle division_by_zero. (0x28) */
148
void division_by_zero(int n, istate_t *istate)
148
void division_by_zero(int n, istate_t *istate)
149
{
149
{
150
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
150
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
151
    dump_istate(istate);
151
    dump_istate(istate);
152
    panic("%s\n", __FUNCTION__);
152
    panic("%s\n", __FUNCTION__);
153
}
153
}
154
 
154
 
155
/** Handle data_access_exception. (0x30) */
155
/** Handle data_access_exception. (0x30) */
156
void data_access_exception(int n, istate_t *istate)
156
void data_access_exception(int n, istate_t *istate)
157
{
157
{
158
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
158
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
159
    dump_istate(istate);
159
    dump_istate(istate);
160
    dump_sfsr_and_sfar();
160
    dump_sfsr_and_sfar();
161
    panic("%s\n", __FUNCTION__);
161
    panic("%s\n", __FUNCTION__);
162
}
162
}
163
 
163
 
164
/** Handle data_access_error. (0x32) */
164
/** Handle data_access_error. (0x32) */
165
void data_access_error(int n, istate_t *istate)
165
void data_access_error(int n, istate_t *istate)
166
{
166
{
167
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
167
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
168
    dump_istate(istate);
168
    dump_istate(istate);
169
    panic("%s\n", __FUNCTION__);
169
    panic("%s\n", __FUNCTION__);
170
}
170
}
171
 
171
 
172
/** Handle mem_address_not_aligned. (0x34) */
172
/** Handle mem_address_not_aligned. (0x34) */
173
void mem_address_not_aligned(int n, istate_t *istate)
173
void mem_address_not_aligned(int n, istate_t *istate)
174
{
174
{
175
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
175
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
176
    dump_istate(istate);
176
    dump_istate(istate);
177
    panic("%s\n", __FUNCTION__);
177
    panic("%s\n", __FUNCTION__);
178
}
178
}
179
 
179
 
180
/** Handle LDDF_mem_address_not_aligned. (0x35) */
180
/** Handle LDDF_mem_address_not_aligned. (0x35) */
181
void LDDF_mem_address_not_aligned(int n, istate_t *istate)
181
void LDDF_mem_address_not_aligned(int n, istate_t *istate)
182
{
182
{
183
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
183
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
184
    dump_istate(istate);
184
    dump_istate(istate);
185
    panic("%s\n", __FUNCTION__);
185
    panic("%s\n", __FUNCTION__);
186
}
186
}
187
 
187
 
188
/** Handle STDF_mem_address_not_aligned. (0x36) */
188
/** Handle STDF_mem_address_not_aligned. (0x36) */
189
void STDF_mem_address_not_aligned(int n, istate_t *istate)
189
void STDF_mem_address_not_aligned(int n, istate_t *istate)
190
{
190
{
191
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
191
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
192
    dump_istate(istate);
192
    dump_istate(istate);
193
    panic("%s\n", __FUNCTION__);
193
    panic("%s\n", __FUNCTION__);
194
}
194
}
195
 
195
 
196
/** Handle privileged_action. (0x37) */
196
/** Handle privileged_action. (0x37) */
197
void privileged_action(int n, istate_t *istate)
197
void privileged_action(int n, istate_t *istate)
198
{
198
{
199
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
199
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
200
    dump_istate(istate);
200
    dump_istate(istate);
201
    panic("%s\n", __FUNCTION__);
201
    panic("%s\n", __FUNCTION__);
202
}
202
}
203
 
203
 
204
/** Handle LDQF_mem_address_not_aligned. (0x38) */
204
/** Handle LDQF_mem_address_not_aligned. (0x38) */
205
void LDQF_mem_address_not_aligned(int n, istate_t *istate)
205
void LDQF_mem_address_not_aligned(int n, istate_t *istate)
206
{
206
{
207
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
207
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
208
    dump_istate(istate);
208
    dump_istate(istate);
209
    panic("%s\n", __FUNCTION__);
209
    panic("%s\n", __FUNCTION__);
210
}
210
}
211
 
211
 
212
/** Handle STQF_mem_address_not_aligned. (0x39) */
212
/** Handle STQF_mem_address_not_aligned. (0x39) */
213
void STQF_mem_address_not_aligned(int n, istate_t *istate)
213
void STQF_mem_address_not_aligned(int n, istate_t *istate)
214
{
214
{
215
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
215
    fault_if_from_uspace(istate, "%s\n", __FUNCTION__);
216
    dump_istate(istate);
216
    dump_istate(istate);
217
    panic("%s\n", __FUNCTION__);
217
    panic("%s\n", __FUNCTION__);
218
}
218
}
219
 
219
 
220
/** @}
220
/** @}
221
 */
221
 */
222
 
222