Mercurial > flash_v2
annotate packages/kernel/current/tests/except1.cxx @ 70:c5536bad4c24 ecos-sw-2000-02-11
Merge from eCos master repository on 2000-02-11-15:46:40-GMT
| author | jlarmour |
|---|---|
| date | Fri, 11 Feb 2000 16:47:32 +0000 |
| parents | bf00f99aec69 |
| children | 59d97b6ba612 |
| rev | line source |
|---|---|
| 0 | 1 //================================================================= |
| 2 // | |
| 3 // except1.cxx | |
| 4 // | |
| 5 // 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 #include <pkgconf/kernel.h> | |
| 41 | |
| 42 #include <cyg/infra/testcase.h> | |
| 43 | |
| 44 #ifdef CYGPKG_KERNEL_EXCEPTIONS | |
| 45 | |
| 46 #include <cyg/kernel/sched.hxx> // Cyg_Scheduler::start() | |
| 47 #include <cyg/kernel/thread.hxx> // Cyg_Thread | |
| 48 #include <cyg/kernel/intr.hxx> // cyg_VSR | |
| 49 | |
| 50 #include <cyg/hal/hal_intr.h> // exception ranges | |
| 51 | |
| 52 #include <cyg/kernel/sched.inl> | |
| 53 #include <cyg/kernel/thread.inl> | |
| 54 | |
| 55 #define NTHREADS 1 | |
| 56 #include "testaux.hxx" | |
| 57 | |
| 58 static cyg_exception_handler handler0; | |
| 59 static int d0; | |
| 60 | |
| 61 static void handler0(CYG_ADDRWORD data, cyg_code number, CYG_ADDRWORD info) | |
| 62 { | |
| 63 CYG_TEST_INFO("handler 0 called"); | |
| 64 | |
| 65 CYG_TEST_CHECK((CYG_ADDRWORD)123 == data, "handler given wrong data"); | |
| 66 | |
| 67 // ignore machine specific stuff | |
| 68 CYG_UNUSED_PARAM(cyg_code, number); | |
| 69 CYG_UNUSED_PARAM(CYG_ADDRWORD, info); | |
| 70 | |
| 71 CYG_TEST_PASS_FINISH("Except 1 OK"); | |
| 72 } | |
| 73 | |
| 74 static void handler1(CYG_ADDRWORD data, cyg_code number, CYG_ADDRWORD info) | |
| 75 { | |
| 76 CYG_TEST_INFO("handler 1 called"); | |
| 77 | |
| 78 CYG_TEST_CHECK((CYG_ADDRWORD)&d0 == data, "handler given wrong data"); | |
| 79 | |
| 80 #ifdef CYGSEM_KERNEL_EXCEPTIONS_DECODE | |
| 2 | 81 CYG_TEST_CHECK(number == CYGNUM_HAL_EXCEPTION_MAX, "handler given wrong number"); |
| 0 | 82 #else |
| 83 CYG_UNUSED_PARAM(cyg_code, number); | |
| 84 #endif | |
| 85 | |
| 86 CYG_TEST_CHECK((CYG_ADDRWORD)99 == info, "handler given wrong info"); | |
| 87 } | |
| 88 | |
| 89 | |
| 90 // The following function attempts to cause an exception in various | |
| 91 // hacky ways. It is machine dependent what exception is generated. | |
| 92 // It does reads rather than writes hoping not to corrupt anything | |
| 93 // important. | |
| 94 void cause_exception(void) | |
| 95 { | |
| 96 int x; | |
| 97 unsigned int p=0; | |
| 98 | |
| 99 do { | |
| 100 x=*(volatile int *)(p-1)/p; | |
| 101 p+=0x100000; | |
| 102 } while(p != 0); | |
| 103 } | |
| 104 | |
| 105 static void entry0( CYG_ADDRWORD data ) | |
| 106 { | |
| 107 cyg_code n; | |
| 108 cyg_exception_handler *old_handler, *old_handler1; | |
| 109 CYG_ADDRWORD old_data, old_data1; | |
| 110 Cyg_Thread *p=Cyg_Thread::self(); | |
| 111 | |
| 112 CYG_UNUSED_PARAM(CYG_ADDRESS, data); | |
| 113 | |
| 114 p->register_exception( | |
| 2 | 115 CYGNUM_HAL_EXCEPTION_MAX, |
| 0 | 116 &handler1, |
| 117 (CYG_ADDRWORD)&d0, | |
| 118 &old_handler, | |
| 119 &old_data); | |
| 120 | |
| 121 p->register_exception( | |
| 2 | 122 CYGNUM_HAL_EXCEPTION_MAX, |
| 0 | 123 &handler1, |
| 124 (CYG_ADDRWORD)&d0, | |
| 125 &old_handler1, | |
| 126 &old_data1); | |
| 127 | |
| 128 CYG_TEST_CHECK(old_handler1 == &handler1, | |
| 129 "register exception: old_handler not the one previously registered"); | |
| 130 CYG_TEST_CHECK(old_data1 == (CYG_ADDRWORD)&d0, | |
| 131 "register exception: old_data not those previously registered"); | |
| 132 | |
| 2 | 133 p->deliver_exception(CYGNUM_HAL_EXCEPTION_MAX, (CYG_ADDRWORD)99); |
| 0 | 134 |
| 135 CYG_TEST_INFO("handler 1 returned"); | |
| 136 | |
| 2 | 137 p->deregister_exception(CYGNUM_HAL_EXCEPTION_MAX); |
| 138 p->deregister_exception(CYGNUM_HAL_EXCEPTION_MAX); | |
| 0 | 139 |
|
4
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
140 #if 0 |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
141 #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
|
142 // 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
|
143 // PR 19945 workaround. |
|
1d7f19c9e4d1
Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents:
2
diff
changeset
|
144 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
|
145 #elif defined(CYGPKG_HAL_I386_LINUX) |
| 2 | 146 // 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
|
147 CYG_TEST_NA("Not applicable to synthetic target"); |
| 2 | 148 #endif |
| 149 | |
| 150 for(n = CYGNUM_HAL_EXCEPTION_MIN; n <= CYGNUM_HAL_EXCEPTION_MAX; n++) { | |
| 0 | 151 p->register_exception( |
| 152 n, | |
| 153 handler0, | |
| 154 (CYG_ADDRWORD)123, | |
| 155 &old_handler1, | |
| 156 &old_data1); | |
| 157 } | |
| 158 | |
| 2 | 159 CYG_TEST_PASS("Attempting to provoke exception"); |
| 0 | 160 |
| 161 cause_exception(); | |
| 162 | |
| 163 CYG_TEST_FAIL_FINISH("Couldn't cause exception"); | |
| 164 } | |
| 165 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
4
diff
changeset
|
166 #ifdef CYG_HAL_MIPS_TX39_JMR3904 |
| 0 | 167 |
| 168 externC cyg_VSR __default_exception_vsr; | |
| 169 cyg_VSR *old_vsr; | |
| 170 | |
| 171 #endif | |
| 172 | |
| 173 void except0_main( void ) | |
| 174 { | |
| 2 | 175 // Use CYG_TEST_GDBCMD _before_ CYG_TEST_INIT() |
| 176 CYG_TEST_GDBCMD("handle SIGBUS nostop"); | |
| 177 CYG_TEST_GDBCMD("handle SIGSEGV nostop"); | |
| 178 | |
| 0 | 179 CYG_TEST_INIT(); |
| 180 | |
| 2 | 181 #ifdef HAL_VSR_SET_TO_ECOS_HANDLER |
| 182 // Reclaim the VSR off CygMon possibly | |
| 183 #ifdef CYGNUM_HAL_EXCEPTION_DATA_ACCESS | |
| 184 HAL_VSR_SET_TO_ECOS_HANDLER( CYGNUM_HAL_EXCEPTION_DATA_ACCESS, NULL ); | |
| 185 #endif | |
|
70
c5536bad4c24
Merge from eCos master repository on 2000-02-11-15:46:40-GMT
jlarmour
parents:
66
diff
changeset
|
186 #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
|
187 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
|
188 #endif |
| 2 | 189 #ifdef CYGNUM_HAL_EXCEPTION_DATA_UNALIGNED_ACCESS |
| 190 HAL_VSR_SET_TO_ECOS_HANDLER( CYGNUM_HAL_EXCEPTION_DATA_UNALIGNED_ACCESS, NULL ); | |
| 191 #endif | |
| 192 #ifdef CYGNUM_HAL_EXCEPTION_ILLEGAL_INSTRUCTION | |
| 193 HAL_VSR_SET_TO_ECOS_HANDLER( CYGNUM_HAL_EXCEPTION_ILLEGAL_INSTRUCTION, NULL ); | |
| 194 #endif | |
| 0 | 195 #endif |
| 196 | |
| 197 new_thread(entry0, 0); | |
| 198 | |
| 199 Cyg_Scheduler::start(); | |
| 200 | |
| 201 CYG_TEST_FAIL_FINISH("Not reached"); | |
| 202 } | |
| 203 externC void | |
| 204 cyg_start( void ) | |
| 205 { | |
| 206 except0_main(); | |
| 207 } | |
| 208 #else // def CYGPKG_KERNEL_EXCEPTIONS | |
| 209 externC void | |
| 210 cyg_start( void ) | |
| 211 { | |
| 212 CYG_TEST_INIT(); | |
| 2 | 213 CYG_TEST_NA("Exceptions disabled"); |
| 0 | 214 } |
| 215 #endif // def CYGPKG_KERNEL_EXCEPTIONS | |
| 216 | |
| 217 // EOF except1.cxx |
