Mercurial > flash_v2
annotate packages/kernel/current/tests/kexcept1.c @ 78:59d97b6ba612 ecos-sw-2000-03-28
Merge from eCos master repository on 2000-03-28-19:50:47-BST
| author | jlarmour |
|---|---|
| date | Tue, 28 Mar 2000 20:13:29 +0000 |
| parents | c5536bad4c24 |
| children | 518f42066aba |
| rev | line source |
|---|---|
| 0 | 1 /*================================================================= |
| 2 // | |
| 3 // kexcept1.cxx | |
| 4 // | |
| 5 // Kernel C API Exception test 1 | |
| 6 // | |
| 7 //================================================================= | |
| 8 //####COPYRIGHTBEGIN#### | |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
9 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
10 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
11 // The contents of this file are subject to the Red Hat eCos Public License |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
12 // Version 1.1 (the "License"); you may not use this file except in |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
13 // compliance with the License. You may obtain a copy of the License at |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
14 // http://www.redhat.com/ |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
15 // |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
16 // Software distributed under the License is distributed on an "AS IS" |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
18 // License for the specific language governing rights and limitations under |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
19 // the License. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
20 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
21 // The Original Code is eCos - Embedded Configurable Operating System, |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
22 // released September 30, 1998. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
23 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
24 // The Initial Developer of the Original Code is Red Hat. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
25 // Portions created by Red Hat are |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
26 // Copyright (C) 1998, 1999, 2000 Red Hat, Inc. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
27 // All Rights Reserved. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
28 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
10
diff
changeset
|
29 // |
| 0 | 30 //####COPYRIGHTEND#### |
| 31 //================================================================= | |
| 32 //#####DESCRIPTIONBEGIN#### | |
| 33 // | |
| 34 // Author(s): dsm | |
| 2 | 35 // Contributors: dsm, jlarmour |
| 36 // Date: 1999-02-16 | |
| 0 | 37 // Description: Test basic exception functionality |
| 38 //####DESCRIPTIONEND#### | |
| 39 */ | |
| 40 | |
| 2 | 41 #include <cyg/hal/hal_arch.h> // CYGNUM_HAL_STACK_SIZE_TYPICAL |
| 42 | |
| 0 | 43 #include <cyg/kernel/kapi.h> |
| 44 | |
| 45 #include <cyg/infra/testcase.h> | |
| 46 | |
| 47 #ifdef CYGPKG_KERNEL_EXCEPTIONS | |
| 48 | |
| 49 #ifdef CYGFUN_KERNEL_API_C | |
| 50 | |
| 51 #include <cyg/hal/hal_intr.h> // exception ranges | |
| 52 | |
| 53 #include "testaux.h" | |
| 54 | |
| 55 #define NTHREADS 1 | |
| 2 | 56 #define STACKSIZE CYGNUM_HAL_STACK_SIZE_TYPICAL |
| 0 | 57 |
| 58 static cyg_handle_t thread[NTHREADS]; | |
| 59 | |
| 60 static cyg_thread thread_obj[NTHREADS]; | |
| 61 static char stack[NTHREADS][STACKSIZE]; | |
| 62 | |
| 63 | |
| 64 static cyg_exception_handler_t handler0; | |
| 65 static int d0; | |
| 66 | |
| 67 static void handler0(cyg_addrword_t data, cyg_code_t number, cyg_addrword_t info) | |
| 68 { | |
| 69 CYG_TEST_INFO("handler 0 called"); | |
| 70 | |
| 71 CYG_TEST_CHECK((cyg_addrword_t)123 == data, "handler given wrong data"); | |
| 72 | |
| 73 // ignore machine specific stuff | |
| 74 CYG_UNUSED_PARAM(cyg_code_t, number); | |
| 75 CYG_UNUSED_PARAM(cyg_addrword_t, info); | |
| 76 | |
| 77 CYG_TEST_PASS_FINISH("Except 1 OK"); | |
| 78 } | |
| 79 | |
| 80 static void handler1(cyg_addrword_t data, cyg_code_t number, cyg_addrword_t info) | |
| 81 { | |
| 82 CYG_TEST_INFO("handler 1 called"); | |
| 83 | |
| 84 CYG_TEST_CHECK((cyg_addrword_t)&d0 == data, "handler given wrong data"); | |
| 85 | |
| 86 #ifdef CYGSEM_KERNEL_EXCEPTIONS_DECODE | |
| 2 | 87 CYG_TEST_CHECK(number == CYGNUM_HAL_EXCEPTION_MAX, "handler given wrong number"); |
| 0 | 88 #else |
| 89 CYG_UNUSED_PARAM(cyg_code_t, number); | |
| 90 #endif | |
| 91 | |
| 92 CYG_TEST_CHECK((cyg_addrword_t)99 == info, "handler given wrong info"); | |
| 93 } | |
| 94 | |
| 95 | |
|
78
59d97b6ba612
Merge from eCos master repository on 2000-03-28-19:50:47-BST
jlarmour
parents:
70
diff
changeset
|
96 #ifdef CYGNUM_HAL_EXCEPTION_DATA_ACCESS |
| 0 | 97 // The following function attempts to cause an exception in various |
| 98 // hacky ways. It is machine dependent what exception is generated. | |
| 99 // It does reads rather than writes hoping not to corrupt anything | |
| 100 // important. | |
| 101 void cause_exception(void) | |
| 102 { | |
| 103 int x; | |
| 104 unsigned int p=0; | |
| 105 | |
| 106 do { | |
| 107 x=*(volatile int *)(p-1)/p; | |
| 108 p+=0x100000; | |
| 109 } while(p != 0); | |
| 110 } | |
|
78
59d97b6ba612
Merge from eCos master repository on 2000-03-28-19:50:47-BST
jlarmour
parents:
70
diff
changeset
|
111 #endif |
| 0 | 112 |
| 113 static void entry0( CYG_ADDRWORD data ) | |
| 114 { | |
|
78
59d97b6ba612
Merge from eCos master repository on 2000-03-28-19:50:47-BST
jlarmour
parents:
70
diff
changeset
|
115 #ifdef CYGNUM_HAL_EXCEPTION_DATA_ACCESS |
| 0 | 116 cyg_code_t n; |
|
78
59d97b6ba612
Merge from eCos master repository on 2000-03-28-19:50:47-BST
jlarmour
parents:
70
diff
changeset
|
117 #endif |
| 0 | 118 cyg_exception_handler_t *old_handler, *old_handler1; |
| 119 cyg_addrword_t old_data, old_data1; | |
| 120 | |
| 121 CYG_UNUSED_PARAM(CYG_ADDRESS, data); | |
| 122 | |
| 123 cyg_exception_set_handler( | |
| 2 | 124 CYGNUM_HAL_EXCEPTION_MAX, |
| 0 | 125 &handler1, |
| 126 (cyg_addrword_t)&d0, | |
| 127 &old_handler, | |
| 128 &old_data); | |
| 129 | |
| 130 cyg_exception_set_handler( | |
| 2 | 131 CYGNUM_HAL_EXCEPTION_MAX, |
| 0 | 132 &handler1, |
| 133 (cyg_addrword_t)&d0, | |
| 134 &old_handler1, | |
| 135 &old_data1); | |
| 136 | |
| 137 CYG_TEST_CHECK(old_handler1 == &handler1, | |
| 138 "register exception: old_handler not the one previously registered"); | |
| 139 CYG_TEST_CHECK(old_data1 == (cyg_addrword_t)&d0, | |
| 140 "register exception: old_data not those previously registered"); | |
| 141 | |
| 142 cyg_exception_call_handler( | |
| 143 cyg_thread_self(), | |
| 2 | 144 CYGNUM_HAL_EXCEPTION_MAX, |
| 0 | 145 (cyg_addrword_t)99); |
| 146 | |
| 147 CYG_TEST_INFO("handler 1 returned"); | |
| 148 | |
| 2 | 149 cyg_exception_clear_handler(CYGNUM_HAL_EXCEPTION_MAX); |
| 150 cyg_exception_clear_handler(CYGNUM_HAL_EXCEPTION_MAX); | |
| 0 | 151 |
|
78
59d97b6ba612
Merge from eCos master repository on 2000-03-28-19:50:47-BST
jlarmour
parents:
70
diff
changeset
|
152 #ifdef CYGNUM_HAL_EXCEPTION_DATA_ACCESS |
|
59d97b6ba612
Merge from eCos master repository on 2000-03-28-19:50:47-BST
jlarmour
parents:
70
diff
changeset
|
153 |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
154 #if 0 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
155 #elif defined(CYGPKG_HAL_POWERPC_SIM) |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
156 // The exception generated by the SIM is not recognized by GDB. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
157 // PR 19945 workaround. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
158 CYG_TEST_NA("Not applicable to PowerPC SIM"); |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
159 #elif defined(CYGPKG_HAL_I386_LINUX) |
| 2 | 160 // We can't catch segmentation violation exceptions on Linux. |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
161 CYG_TEST_NA("Not applicable to synthetic target"); |
| 2 | 162 #endif |
| 163 | |
| 164 for(n = CYGNUM_HAL_EXCEPTION_MIN; n <= CYGNUM_HAL_EXCEPTION_MAX; n++) { | |
| 0 | 165 cyg_exception_set_handler( |
| 166 n, | |
| 167 handler0, | |
| 168 (cyg_addrword_t)123, | |
| 169 &old_handler1, | |
| 170 &old_data1); | |
| 171 } | |
| 172 | |
| 2 | 173 CYG_TEST_PASS("Attempting to provoke exception"); |
| 0 | 174 |
| 175 cause_exception(); | |
| 176 | |
| 177 CYG_TEST_FAIL_FINISH("Couldn't cause exception"); | |
|
78
59d97b6ba612
Merge from eCos master repository on 2000-03-28-19:50:47-BST
jlarmour
parents:
70
diff
changeset
|
178 #else // CYGNUM_HAL_EXCEPTION_DATA_ACCESS |
|
59d97b6ba612
Merge from eCos master repository on 2000-03-28-19:50:47-BST
jlarmour
parents:
70
diff
changeset
|
179 CYG_TEST_NA("Platform does not support data exceptions"); |
|
59d97b6ba612
Merge from eCos master repository on 2000-03-28-19:50:47-BST
jlarmour
parents:
70
diff
changeset
|
180 #endif |
| 0 | 181 } |
| 182 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
4
diff
changeset
|
183 #ifdef CYG_HAL_MIPS_TX39_JMR3904 |
| 0 | 184 |
| 185 extern void __default_exception_vsr(void); | |
| 186 | |
| 187 #endif | |
| 188 | |
| 189 void except0_main( void ) | |
| 190 { | |
| 2 | 191 // Use CYG_TEST_GDBCMD _before_ CYG_TEST_INIT() |
| 192 CYG_TEST_GDBCMD("handle SIGBUS nostop"); | |
| 193 CYG_TEST_GDBCMD("handle SIGSEGV nostop"); | |
| 194 | |
| 0 | 195 CYG_TEST_INIT(); |
| 196 | |
| 2 | 197 #ifdef HAL_VSR_SET_TO_ECOS_HANDLER |
| 198 // Reclaim the VSR off CygMon possibly | |
| 199 #ifdef CYGNUM_HAL_EXCEPTION_DATA_ACCESS | |
| 200 HAL_VSR_SET_TO_ECOS_HANDLER( CYGNUM_HAL_EXCEPTION_DATA_ACCESS, NULL ); | |
| 201 #endif | |
|
70
c5536bad4c24
Merge from eCos master repository on 2000-02-11-15:46:40-GMT
jlarmour
parents:
66
diff
changeset
|
202 #ifdef CYGNUM_HAL_EXCEPTION_DATA_TLBMISS_ACCESS |
|
c5536bad4c24
Merge from eCos master repository on 2000-02-11-15:46:40-GMT
jlarmour
parents:
66
diff
changeset
|
203 HAL_VSR_SET_TO_ECOS_HANDLER( CYGNUM_HAL_EXCEPTION_DATA_TLBMISS_ACCESS, NULL ); |
|
c5536bad4c24
Merge from eCos master repository on 2000-02-11-15:46:40-GMT
jlarmour
parents:
66
diff
changeset
|
204 #endif |
| 2 | 205 #ifdef CYGNUM_HAL_EXCEPTION_DATA_UNALIGNED_ACCESS |
| 206 HAL_VSR_SET_TO_ECOS_HANDLER( CYGNUM_HAL_EXCEPTION_DATA_UNALIGNED_ACCESS, NULL ); | |
| 207 #endif | |
| 208 #ifdef CYGNUM_HAL_EXCEPTION_ILLEGAL_INSTRUCTION | |
| 209 HAL_VSR_SET_TO_ECOS_HANDLER( CYGNUM_HAL_EXCEPTION_ILLEGAL_INSTRUCTION, NULL ); | |
| 210 #endif | |
| 211 #endif | |
| 0 | 212 |
| 213 cyg_thread_create(4, entry0 , (cyg_addrword_t)0, "kexcept1", | |
| 2 | 214 (void *)stack[0], STACKSIZE, &thread[0], &thread_obj[0]); |
| 0 | 215 cyg_thread_resume(thread[0]); |
| 216 | |
| 217 cyg_scheduler_start(); | |
| 218 | |
| 219 CYG_TEST_FAIL_FINISH("Not reached"); | |
| 220 } | |
| 221 | |
| 222 externC void | |
| 223 cyg_start( void ) | |
| 224 { | |
| 225 except0_main(); | |
| 226 } | |
| 227 | |
| 228 #else // def CYGFUN_KERNEL_API_C | |
| 229 #define N_A_MSG "Kernel C API layer disabled" | |
| 230 #endif // def CYGFUN_KERNEL_API_C | |
| 231 #else // def CYGPKG_KERNEL_EXCEPTIONS | |
| 232 #define N_A_MSG "Exceptions disabled" | |
| 233 #endif // def CYGPKG_KERNEL_EXCEPTIONS | |
| 234 | |
| 235 #ifdef N_A_MSG | |
| 236 externC void | |
| 237 cyg_start( void ) | |
| 238 { | |
| 239 CYG_TEST_INIT(); | |
| 2 | 240 CYG_TEST_NA( N_A_MSG); |
| 0 | 241 } |
| 242 #endif // N_A_MSG | |
| 243 | |
| 244 /* EOF kexcept1.c */ |
