Mercurial > nand-ecoscentric
annotate packages/kernel/current/tests/kcache1.c @ 10:d3fbcdfa1b2f ecos-sw-1999-05-29
Merge from eCos master repository on 1999-05-29-00:13:11-BST
| author | jlarmour |
|---|---|
| date | Fri, 28 May 1999 16:43:09 +0000 |
| parents | 443894e2e912 |
| children | 306eee292492 |
| rev | line source |
|---|---|
| 0 | 1 /*================================================================= |
| 2 // | |
| 3 // kcache1.c | |
| 4 // | |
| 5 // Cache timing test | |
| 6 // | |
| 7 //========================================================================== | |
| 8 //####COPYRIGHTBEGIN#### | |
| 9 // | |
| 10 // ------------------------------------------- | |
| 11 // The contents of this file are subject to the Cygnus eCos Public License | |
| 12 // Version 1.0 (the "License"); you may not use this file except in | |
| 13 // compliance with the License. You may obtain a copy of the License at | |
| 14 // http://sourceware.cygnus.com/ecos | |
| 15 // | |
| 16 // Software distributed under the License is distributed on an "AS IS" | |
| 17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the | |
| 18 // License for the specific language governing rights and limitations under | |
| 19 // the License. | |
| 20 // | |
| 21 // The Original Code is eCos - Embedded Cygnus Operating System, released | |
| 22 // September 30, 1998. | |
| 23 // | |
| 24 // The Initial Developer of the Original Code is Cygnus. Portions created | |
| 2 | 25 // by Cygnus are Copyright (C) 1998,1999 Cygnus Solutions. All Rights Reserved. |
| 0 | 26 // ------------------------------------------- |
| 27 // | |
| 28 //####COPYRIGHTEND#### | |
| 29 //========================================================================== | |
| 30 //#####DESCRIPTIONBEGIN#### | |
| 31 // | |
| 32 // Author(s): dsm | |
| 33 // Contributors: dsm, nickg | |
| 34 // Date: 1998-06-18 | |
| 35 //####DESCRIPTIONEND#### | |
| 36 */ | |
| 37 | |
| 2 | 38 #include <cyg/hal/hal_arch.h> // CYGNUM_HAL_STACK_SIZE_TYPICAL |
| 39 | |
| 0 | 40 #include <cyg/kernel/kapi.h> |
| 41 | |
| 42 #include <cyg/infra/testcase.h> | |
| 43 | |
| 44 #ifdef CYGVAR_KERNEL_COUNTERS_CLOCK | |
| 45 #ifdef CYGFUN_KERNEL_API_C | |
| 46 | |
| 47 #include <cyg/infra/diag.h> | |
| 48 #include <cyg/hal/hal_cache.h> | |
| 2 | 49 #include <cyg/hal/hal_intr.h> |
| 0 | 50 |
| 51 // ------------------------------------------------------------------------- | |
| 52 // If the HAL does not supply this, we supply our own version | |
| 53 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
54 #ifdef HAL_DCACHE_SYNC |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
55 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
56 # define HAL_DCACHE_PURGE_ALL() HAL_DCACHE_SYNC() |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
57 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
58 #else |
| 0 | 59 |
| 60 static cyg_uint8 dca[HAL_DCACHE_SIZE + HAL_DCACHE_LINE_SIZE*2]; | |
| 61 | |
| 62 #define HAL_DCACHE_PURGE_ALL() \ | |
| 63 CYG_MACRO_START \ | |
| 64 volatile cyg_uint8 *addr = &dca[HAL_DCACHE_LINE_SIZE]; \ | |
| 65 volatile cyg_uint8 tmp = 0; \ | |
| 66 int i; \ | |
| 67 for( i = 0; i < HAL_DCACHE_SIZE; i += HAL_DCACHE_LINE_SIZE ) \ | |
| 68 { \ | |
| 69 tmp = addr[i]; \ | |
| 70 } \ | |
| 71 CYG_MACRO_END | |
| 72 | |
| 73 #endif | |
| 74 | |
| 75 // ------------------------------------------------------------------------- | |
| 76 | |
| 77 #define NTHREADS 1 | |
| 2 | 78 #define STACKSIZE CYGNUM_HAL_STACK_SIZE_TYPICAL |
| 0 | 79 |
| 80 static cyg_handle_t thread[NTHREADS]; | |
| 81 | |
| 82 static cyg_thread thread_obj[NTHREADS]; | |
| 83 static char stack[NTHREADS][STACKSIZE]; | |
| 84 | |
| 85 #define MAXSIZE 1<<18 | |
| 86 | |
| 87 volatile char m[MAXSIZE]; | |
| 88 | |
| 2 | 89 #ifndef MAX_STRIDE |
| 90 #define MAX_STRIDE 64 | |
| 91 #endif | |
| 92 | |
| 0 | 93 // ------------------------------------------------------------------------- |
| 94 | |
| 95 static void time0(register cyg_uint32 stride) | |
| 96 { | |
| 97 register cyg_uint32 j,k; | |
| 98 cyg_tick_count_t count0, count1; | |
| 99 cyg_ucount32 t; | |
| 100 register char c; | |
| 101 | |
| 102 count0 = cyg_current_time(); | |
| 103 | |
| 2 | 104 k = 0; |
| 105 if ( cyg_test_is_simulator ) | |
| 106 k = 3960; | |
| 107 | |
| 108 for(; k<4000;k++) { | |
| 0 | 109 for(j=0; j<(HAL_DCACHE_SIZE/HAL_DCACHE_LINE_SIZE); j++) { |
| 110 c=m[stride*j]; | |
| 111 } | |
| 112 } | |
| 113 | |
| 114 count1 = cyg_current_time(); | |
| 115 t = count1 - count0; | |
| 116 diag_printf("stride=%d, time=%d\n", stride, t); | |
| 117 } | |
| 118 | |
| 119 // ------------------------------------------------------------------------- | |
| 120 | |
| 121 void time1(void) | |
| 122 { | |
| 123 cyg_uint32 i; | |
| 124 | |
| 2 | 125 for(i=1; i<=MAX_STRIDE; i+=i) { |
| 0 | 126 time0(i); |
| 127 } | |
| 128 } | |
| 129 | |
| 130 // ------------------------------------------------------------------------- | |
| 131 // This test could be improved by counting number of passes possible | |
| 132 // in a given number of ticks. | |
| 133 | |
| 134 static void entry0( cyg_addrword_t data ) | |
| 135 { | |
| 2 | 136 register CYG_INTERRUPT_STATE oldints; |
| 137 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
138 #ifdef HAL_CACHE_UNIFIED |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
139 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
140 HAL_DISABLE_INTERRUPTS(oldints); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
141 HAL_DCACHE_PURGE_ALL(); // rely on above definition |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
142 HAL_UCACHE_INVALIDATE_ALL(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
143 HAL_UCACHE_DISABLE(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
144 HAL_RESTORE_INTERRUPTS(oldints); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
145 CYG_TEST_INFO("Cache off"); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
146 time1(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
147 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
148 HAL_DISABLE_INTERRUPTS(oldints); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
149 HAL_DCACHE_PURGE_ALL(); // rely on above definition |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
150 HAL_UCACHE_INVALIDATE_ALL(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
151 HAL_UCACHE_ENABLE(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
152 HAL_RESTORE_INTERRUPTS(oldints); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
153 CYG_TEST_INFO("Cache on"); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
154 time1(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
155 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
156 #else // HAL_CACHE_UNIFIED |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
157 |
| 2 | 158 HAL_DISABLE_INTERRUPTS(oldints); |
| 0 | 159 HAL_DCACHE_PURGE_ALL(); |
| 160 HAL_ICACHE_INVALIDATE_ALL(); | |
| 161 HAL_DCACHE_INVALIDATE_ALL(); | |
| 162 HAL_ICACHE_DISABLE(); | |
| 163 HAL_DCACHE_DISABLE(); | |
| 2 | 164 HAL_RESTORE_INTERRUPTS(oldints); |
| 0 | 165 CYG_TEST_INFO("Dcache off Icache off"); |
| 166 time1(); | |
| 167 | |
| 2 | 168 HAL_DISABLE_INTERRUPTS(oldints); |
| 0 | 169 HAL_DCACHE_PURGE_ALL(); |
| 170 HAL_ICACHE_INVALIDATE_ALL(); | |
| 171 HAL_DCACHE_INVALIDATE_ALL(); | |
| 172 HAL_ICACHE_DISABLE(); | |
| 173 HAL_DCACHE_ENABLE(); | |
| 2 | 174 HAL_RESTORE_INTERRUPTS(oldints); |
| 0 | 175 CYG_TEST_INFO("Dcache on Icache off"); |
| 176 time1(); | |
| 177 | |
| 2 | 178 HAL_DISABLE_INTERRUPTS(oldints); |
| 0 | 179 HAL_DCACHE_PURGE_ALL(); |
| 180 HAL_ICACHE_INVALIDATE_ALL(); | |
| 181 HAL_DCACHE_INVALIDATE_ALL(); | |
| 182 HAL_ICACHE_ENABLE(); | |
| 183 HAL_DCACHE_DISABLE(); | |
| 2 | 184 HAL_RESTORE_INTERRUPTS(oldints); |
| 0 | 185 CYG_TEST_INFO("Dcache off Icache on"); |
| 186 time1(); | |
| 187 | |
| 2 | 188 HAL_DISABLE_INTERRUPTS(oldints); |
| 0 | 189 HAL_DCACHE_PURGE_ALL(); |
| 190 HAL_ICACHE_INVALIDATE_ALL(); | |
| 191 HAL_DCACHE_INVALIDATE_ALL(); | |
| 192 HAL_ICACHE_ENABLE(); | |
| 193 HAL_DCACHE_ENABLE(); | |
| 2 | 194 HAL_RESTORE_INTERRUPTS(oldints); |
| 0 | 195 CYG_TEST_INFO("Dcache on Icache on"); |
| 196 time1(); | |
| 197 | |
| 198 | |
| 2 | 199 HAL_DISABLE_INTERRUPTS(oldints); |
| 0 | 200 HAL_DCACHE_PURGE_ALL(); |
| 201 HAL_ICACHE_INVALIDATE_ALL(); | |
| 202 HAL_DCACHE_INVALIDATE_ALL(); | |
| 203 HAL_ICACHE_DISABLE(); | |
| 204 HAL_DCACHE_DISABLE(); | |
| 2 | 205 HAL_RESTORE_INTERRUPTS(oldints); |
| 0 | 206 CYG_TEST_INFO("Dcache off Icache off"); |
| 207 time1(); | |
| 208 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
209 #endif // HAL_CACHE_UNIFIED |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
210 |
| 0 | 211 CYG_TEST_PASS_FINISH("End of test"); |
| 212 } | |
| 213 | |
| 214 // ------------------------------------------------------------------------- | |
| 215 | |
| 216 void kcache2_main( void ) | |
| 217 { | |
| 218 CYG_TEST_INIT(); | |
| 219 | |
| 220 cyg_thread_create(4, entry0 , (cyg_addrword_t)0, "kcache1", | |
| 2 | 221 (void *)stack[0], STACKSIZE, &thread[0], &thread_obj[0]); |
| 0 | 222 cyg_thread_resume(thread[0]); |
| 223 | |
| 224 cyg_scheduler_start(); | |
| 225 } | |
| 226 | |
| 227 // ------------------------------------------------------------------------- | |
| 228 | |
| 229 externC void | |
| 230 cyg_start( void ) | |
| 231 { | |
| 232 kcache2_main(); | |
| 233 } | |
| 234 | |
| 235 // ------------------------------------------------------------------------- | |
| 236 | |
| 237 #else // def CYGFUN_KERNEL_API_C | |
| 238 #define N_A_MSG "Kernel C API layer disabled" | |
| 239 #endif // def CYGFUN_KERNEL_API_C | |
| 240 #else // def CYGVAR_KERNEL_COUNTERS_CLOCK | |
| 241 #define N_A_MSG "Kernel real-time clock disabled" | |
| 242 #endif // def CYGVAR_KERNEL_COUNTERS_CLOCK | |
| 243 | |
| 244 #ifdef N_A_MSG | |
| 245 externC void | |
| 246 cyg_start( void ) | |
| 247 { | |
| 248 CYG_TEST_INIT(); | |
| 2 | 249 CYG_TEST_NA( N_A_MSG ); |
| 0 | 250 } |
| 251 #endif // N_A_MSG | |
| 252 | |
| 253 // ------------------------------------------------------------------------- | |
| 254 /* EOF kcache1.c */ |