Mercurial > flash_v2
annotate packages/hal/common/current/tests/cache.c @ 1777:c16341b1bac6 default tip
* Added execute permissions to files missed in conversion from CVS
| author | alexs |
|---|---|
| date | Mon, 12 Oct 2009 02:26:09 +0100 |
| parents | d2c90368aeef |
| children |
| rev | line source |
|---|---|
| 0 | 1 /*================================================================= |
| 2 // | |
| 3 // cache.c | |
| 4 // | |
| 5 // HAL Cache timing test | |
| 6 // | |
| 7 //========================================================================== | |
|
208
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
8 //####ECOSGPLCOPYRIGHTBEGIN#### |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
9 // ------------------------------------------- |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
10 // This file is part of eCos, the Embedded Configurable Operating System. |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc. |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
12 // |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
13 // eCos is free software; you can redistribute it and/or modify it under |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
14 // the terms of the GNU General Public License as published by the Free |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
15 // Software Foundation; either version 2 or (at your option) any later version. |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
16 // |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
19 // FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
20 // for more details. |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
21 // |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
22 // You should have received a copy of the GNU General Public License along |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
23 // with eCos; if not, write to the Free Software Foundation, Inc., |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
25 // |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
26 // As a special exception, if other files instantiate templates or use macros |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
27 // or inline functions from this file, or you compile this file and link it |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
28 // with other works to produce a work based on this file, this file does not |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
29 // by itself cause the resulting work to be covered by the GNU General Public |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
30 // License. However the source code for this file must still be made available |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
31 // in accordance with section (3) of the GNU General Public License. |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
32 // |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
33 // This exception does not invalidate any other reasons why a work based on |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
34 // this file might be covered by the GNU General Public License. |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
35 // |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc. |
|
210
d2c90368aeef
Merge from eCos master repository on 2002-05-23-21:39:14-BST
jlarmour
parents:
208
diff
changeset
|
37 // at http://sources.redhat.com/ecos/ecos-license/ |
|
208
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
38 // ------------------------------------------- |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
39 //####ECOSGPLCOPYRIGHTEND#### |
| 0 | 40 //========================================================================== |
| 41 //#####DESCRIPTIONBEGIN#### | |
| 42 // | |
| 43 // Author(s): dsm | |
| 44 // Contributors: dsm, nickg | |
| 45 // Date: 1998-06-18 | |
| 46 //####DESCRIPTIONEND#### | |
| 47 */ | |
| 48 | |
| 49 #include <pkgconf/hal.h> | |
| 50 | |
| 51 #include <cyg/infra/testcase.h> | |
| 52 | |
| 53 #include <cyg/hal/hal_cache.h> | |
| 2 | 54 #include <cyg/hal/hal_intr.h> |
|
20
5f5102441818
Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents:
10
diff
changeset
|
55 #include <cyg/infra/diag.h> |
| 2 | 56 |
|
208
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
57 #if defined(HAL_DCACHE_SIZE) && HAL_DCACHE_SIZE != 0 |
|
50
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
58 |
| 2 | 59 // ------------------------------------------------------------------------- |
| 60 // If the HAL does not supply this, we supply our own version | |
| 61 | |
|
208
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
62 #ifndef HAL_DCACHE_PURGE_ALL |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
63 |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
64 #ifdef HAL_DCACHE_SYNC |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
65 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
66 # 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
|
67 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
68 #else |
| 2 | 69 |
| 70 static cyg_uint8 dca[HAL_DCACHE_SIZE + HAL_DCACHE_LINE_SIZE*2]; | |
| 71 | |
| 72 #define HAL_DCACHE_PURGE_ALL() \ | |
| 73 CYG_MACRO_START \ | |
| 74 volatile cyg_uint8 *addr = &dca[HAL_DCACHE_LINE_SIZE]; \ | |
| 75 volatile cyg_uint8 tmp = 0; \ | |
| 76 int i; \ | |
| 77 for( i = 0; i < HAL_DCACHE_SIZE; i += HAL_DCACHE_LINE_SIZE ) \ | |
| 78 { \ | |
| 79 tmp = addr[i]; \ | |
| 80 } \ | |
| 81 CYG_MACRO_END | |
| 82 | |
|
208
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
83 #endif // HAL_DCACHE_SYNC |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
84 |
|
e0c0827131d1
Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents:
161
diff
changeset
|
85 #endif // HAL_DCACHE_PURGE_ALL |
| 0 | 86 |
| 87 // ------------------------------------------------------------------------- | |
| 88 | |
| 2 | 89 #ifndef MAX_STRIDE |
| 90 #define MAX_STRIDE 64 | |
| 91 #endif | |
| 92 | |
|
50
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
93 volatile char m[(HAL_DCACHE_SIZE/HAL_DCACHE_LINE_SIZE)*MAX_STRIDE]; |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
94 |
| 0 | 95 // ------------------------------------------------------------------------- |
| 96 | |
| 97 static void time0(register cyg_uint32 stride) | |
| 98 { | |
| 99 register cyg_uint32 j,k; | |
| 100 register char c; | |
| 101 | |
|
20
5f5102441818
Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents:
10
diff
changeset
|
102 diag_printf("stride=%d\n", stride); |
|
5f5102441818
Merge from eCos master repository on 1999-07-02-23:17:07-BST
jlarmour
parents:
10
diff
changeset
|
103 |
| 2 | 104 k = 0; |
| 105 if ( cyg_test_is_simulator ) | |
| 106 k = 3960; | |
| 0 | 107 |
| 2 | 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 | |
| 115 // ------------------------------------------------------------------------- | |
| 116 | |
| 117 void time1(void) | |
| 118 { | |
| 119 cyg_uint32 i; | |
| 120 | |
| 2 | 121 for(i=1; i<=MAX_STRIDE; i+=i) { |
| 0 | 122 time0(i); |
| 123 } | |
| 124 } | |
| 125 | |
| 126 // ------------------------------------------------------------------------- | |
| 127 // This test could be improved by counting number of passes possible | |
| 128 // in a given number of ticks. | |
| 129 | |
| 130 static void entry0( void ) | |
| 131 { | |
| 2 | 132 register CYG_INTERRUPT_STATE oldints; |
| 133 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
134 #ifdef HAL_CACHE_UNIFIED |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
135 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
136 HAL_DISABLE_INTERRUPTS(oldints); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
137 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
|
138 HAL_UCACHE_INVALIDATE_ALL(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
139 HAL_UCACHE_DISABLE(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
140 HAL_RESTORE_INTERRUPTS(oldints); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
141 CYG_TEST_INFO("Cache off"); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
142 time1(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
143 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
144 HAL_DISABLE_INTERRUPTS(oldints); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
145 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
|
146 HAL_UCACHE_INVALIDATE_ALL(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
147 HAL_UCACHE_ENABLE(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
148 HAL_RESTORE_INTERRUPTS(oldints); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
149 CYG_TEST_INFO("Cache on"); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
150 time1(); |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
151 |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
152 #else // HAL_CACHE_UNIFIED |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
153 |
| 2 | 154 HAL_DISABLE_INTERRUPTS(oldints); |
| 155 HAL_DCACHE_PURGE_ALL(); | |
| 0 | 156 HAL_ICACHE_INVALIDATE_ALL(); |
| 157 HAL_DCACHE_INVALIDATE_ALL(); | |
| 158 HAL_ICACHE_DISABLE(); | |
| 159 HAL_DCACHE_DISABLE(); | |
| 2 | 160 HAL_RESTORE_INTERRUPTS(oldints); |
| 0 | 161 CYG_TEST_INFO("Dcache off Icache off"); |
| 162 time1(); | |
| 163 | |
| 2 | 164 HAL_DISABLE_INTERRUPTS(oldints); |
| 165 HAL_DCACHE_PURGE_ALL(); | |
| 0 | 166 HAL_ICACHE_INVALIDATE_ALL(); |
| 167 HAL_DCACHE_INVALIDATE_ALL(); | |
| 168 HAL_ICACHE_DISABLE(); | |
| 169 HAL_DCACHE_ENABLE(); | |
| 2 | 170 HAL_RESTORE_INTERRUPTS(oldints); |
| 0 | 171 CYG_TEST_INFO("Dcache on Icache off"); |
| 172 time1(); | |
| 173 | |
| 2 | 174 HAL_DISABLE_INTERRUPTS(oldints); |
| 175 HAL_DCACHE_PURGE_ALL(); | |
| 0 | 176 HAL_ICACHE_INVALIDATE_ALL(); |
| 177 HAL_DCACHE_INVALIDATE_ALL(); | |
| 178 HAL_ICACHE_ENABLE(); | |
| 179 HAL_DCACHE_DISABLE(); | |
| 2 | 180 HAL_RESTORE_INTERRUPTS(oldints); |
| 0 | 181 CYG_TEST_INFO("Dcache off Icache on"); |
| 182 time1(); | |
| 183 | |
| 2 | 184 HAL_DISABLE_INTERRUPTS(oldints); |
| 185 HAL_DCACHE_PURGE_ALL(); | |
| 0 | 186 HAL_ICACHE_INVALIDATE_ALL(); |
| 187 HAL_DCACHE_INVALIDATE_ALL(); | |
| 188 HAL_ICACHE_ENABLE(); | |
| 189 HAL_DCACHE_ENABLE(); | |
| 2 | 190 HAL_RESTORE_INTERRUPTS(oldints); |
| 191 CYG_TEST_INFO("Dcache on Icache on"); | |
| 0 | 192 time1(); |
| 193 | |
| 2 | 194 HAL_DISABLE_INTERRUPTS(oldints); |
| 195 HAL_DCACHE_PURGE_ALL(); | |
| 0 | 196 HAL_ICACHE_INVALIDATE_ALL(); |
| 197 HAL_DCACHE_INVALIDATE_ALL(); | |
| 198 HAL_ICACHE_DISABLE(); | |
| 199 HAL_DCACHE_DISABLE(); | |
| 2 | 200 HAL_RESTORE_INTERRUPTS(oldints); |
| 0 | 201 CYG_TEST_INFO("Dcache off Icache off"); |
| 202 time1(); | |
| 203 | |
|
10
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
204 #endif // HAL_CACHE_UNIFIED |
|
d3fbcdfa1b2f
Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents:
2
diff
changeset
|
205 |
| 0 | 206 CYG_TEST_PASS_FINISH("End of test"); |
| 207 } | |
| 208 | |
| 209 // ------------------------------------------------------------------------- | |
| 210 | |
| 211 void cache_main( void ) | |
| 212 { | |
| 213 CYG_TEST_INIT(); | |
| 214 | |
| 215 entry0(); | |
| 216 | |
| 217 } | |
| 218 | |
| 219 // ------------------------------------------------------------------------- | |
| 220 | |
| 221 externC void | |
| 222 cyg_start( void ) | |
| 223 { | |
| 224 cache_main(); | |
| 225 } | |
| 226 | |
|
161
ac086aa3217e
Merge from eCos master repository on 2001-06-08-21:11:51-BST
jlarmour
parents:
66
diff
changeset
|
227 #else // HAL_DCACHE_SIZE |
|
50
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
228 #define N_A_MSG "No cache" |
|
161
ac086aa3217e
Merge from eCos master repository on 2001-06-08-21:11:51-BST
jlarmour
parents:
66
diff
changeset
|
229 #endif // HAL_DCACHE_SIZE |
|
50
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
230 |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
231 #ifdef N_A_MSG |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
232 externC void |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
233 cyg_start( void ) |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
234 { |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
235 CYG_TEST_INIT(); |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
236 CYG_TEST_NA( N_A_MSG ); |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
237 } |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
238 #endif // N_A_MSG |
|
a0774359f013
Merge from eCos master repository on 1999-11-02-17:02:15-GMT
jlarmour
parents:
20
diff
changeset
|
239 |
| 0 | 240 // ------------------------------------------------------------------------- |
| 241 /* EOF cache.c */ |
