Mercurial > flash_v2
annotate packages/kernel/current/tests/memvar1.cxx @ 66:bf00f99aec69 ecos-sw-2000-02-02
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
| author | jlarmour |
|---|---|
| date | Wed, 02 Feb 2000 19:57:02 +0000 |
| parents | c38311975d4f |
| children |
| rev | line source |
|---|---|
| 0 | 1 //========================================================================== |
| 2 // | |
| 3 // memvar1.cxx | |
| 4 // | |
| 5 // Variable memory pool test 1 | |
| 6 // | |
| 7 //========================================================================== | |
| 8 //####COPYRIGHTBEGIN#### | |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
9 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
10 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
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:
2
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:
2
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:
2
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:
2
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:
2
diff
changeset
|
19 // the License. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
20 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
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:
2
diff
changeset
|
22 // released September 30, 1998. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
23 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
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:
2
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:
2
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:
2
diff
changeset
|
27 // All Rights Reserved. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
28 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
29 // |
| 0 | 30 //####COPYRIGHTEND#### |
| 31 //========================================================================== | |
| 32 //#####DESCRIPTIONBEGIN#### | |
| 33 // | |
| 34 // Author(s): dsm | |
| 35 // Contributors: dsm | |
| 36 // Date: 1998-06-08 | |
| 37 // Description: Tests basic variable memory pool functionality | |
| 38 //####DESCRIPTIONEND#### | |
| 39 | |
| 40 #include <pkgconf/kernel.h> | |
| 41 | |
| 42 #include <cyg/kernel/sched.hxx> // Cyg_Scheduler::start() | |
| 43 #include <cyg/kernel/thread.hxx> // Cyg_Thread | |
| 44 | |
| 45 #include <cyg/kernel/memvar.hxx> | |
| 46 | |
| 47 #include <cyg/infra/testcase.h> | |
| 48 | |
| 49 #include <cyg/kernel/sched.inl> | |
| 50 #include <cyg/kernel/thread.inl> | |
| 51 | |
| 52 #include <cyg/kernel/timer.hxx> // Cyg_Timer | |
| 53 #include <cyg/kernel/clock.inl> // Cyg_Clock | |
| 54 | |
| 55 | |
| 56 #define NTHREADS 2 | |
| 57 #include "testaux.hxx" | |
| 58 | |
| 59 static const cyg_int32 memsize = 10240; | |
| 60 | |
| 61 static cyg_uint8 mem[2][memsize]; | |
| 62 | |
| 63 static Cyg_Mempool_Variable mempool0(mem[0], memsize); | |
| 64 | |
| 65 static Cyg_Mempool_Variable mempool1(mem[1], memsize); | |
| 66 | |
| 67 | |
| 68 static void check_in_mp0(cyg_uint8 *p, cyg_int32 size) | |
| 69 { | |
| 70 CYG_TEST_CHECK(NULL != p, | |
| 71 "Allocation failed"); | |
| 72 CYG_TEST_CHECK(mem[0] <= p && p+size < mem[1], | |
| 73 "Block outside memory pool"); | |
| 74 } | |
| 75 | |
| 76 | |
| 77 static void entry0( CYG_ADDRWORD data ) | |
| 78 { | |
| 79 cyg_uint8 *base; | |
| 80 cyg_int32 size; | |
| 81 CYG_ADDRWORD maxf; | |
| 82 cyg_int32 f0,f1,f2,t0; | |
| 83 cyg_uint8 *p0, *p1; | |
| 84 cyg_int32 most_of_mem=memsize/4*3; | |
| 85 | |
| 86 mempool0.get_arena(base, size, maxf); | |
| 87 cyg_int32 maxfree=(cyg_int32)maxf; | |
| 88 | |
| 89 CYG_TEST_CHECK(mem[0] == base, "get_arena: base wrong"); | |
| 90 CYG_TEST_CHECK(memsize == size, "get_arena: size wrong"); | |
| 91 | |
| 92 CYG_TEST_CHECK(0 < maxfree && maxfree <= size, | |
| 93 "get_arena: maxfree wildly wrong"); | |
| 94 | |
| 95 CYG_TEST_CHECK(-1 == mempool0.get_blocksize(), "get_blocksize wrong" ); | |
| 96 | |
| 97 t0=mempool0.get_totalmem(); | |
| 98 CYG_TEST_CHECK(t0 > 0, "Negative total memory" ); | |
| 99 f0=mempool0.get_freemem(); | |
| 100 CYG_TEST_CHECK(f0 > 0, "Negative free memory" ); | |
| 101 CYG_TEST_CHECK(t0 <= memsize, "get_totalsize: Too much memory"); | |
| 102 CYG_TEST_CHECK(f0 <= t0 , "More memory free than possible" ); | |
| 103 | |
| 104 CYG_TEST_CHECK( !mempool0.waiting(), | |
| 105 "Thread waiting for memory; there shouldn't be"); | |
| 106 | |
| 107 CYG_TEST_CHECK( !mempool0.free(0,32), "Bogus free worked"); | |
| 108 | |
| 109 CYG_TEST_CHECK( NULL == mempool0.try_alloc(memsize+1), | |
| 110 "Managed to allocate too much memory"); | |
| 111 | |
| 112 p0 = mempool0.alloc(most_of_mem); | |
| 113 check_in_mp0(p0, most_of_mem); | |
| 114 | |
| 115 f1 = mempool0.get_freemem(); | |
| 116 CYG_TEST_CHECK(f1 > 0, "Negative free memory" ); | |
| 117 CYG_TEST_CHECK(f1 < f0, "Free memory didn't decrease after allocation" ); | |
| 118 | |
| 119 CYG_TEST_CHECK( NULL == mempool0.try_alloc(most_of_mem), | |
| 120 "Managed to allocate too much memory"); | |
| 121 | |
| 122 CYG_TEST_CHECK(mempool0.free(p0, most_of_mem), "Couldn't free"); | |
| 123 | |
| 124 f2 = mempool0.get_freemem(); | |
| 125 CYG_TEST_CHECK(f2 > f1, "Free memory didn't increase after free" ); | |
| 126 | |
| 127 // should be able to reallocate now memory is free | |
| 128 p0 = mempool0.try_alloc(most_of_mem); | |
| 129 check_in_mp0(p0, most_of_mem); | |
| 130 | |
| 131 p1 = mempool0.try_alloc(10); | |
| 132 check_in_mp0(p1, 10); | |
| 133 | |
| 134 CYG_TEST_CHECK(p1+10 <= p0 || p1 >= p0+memsize, | |
| 135 "Ranges of allocated memory overlap"); | |
| 136 | |
| 137 CYG_TEST_CHECK(mempool0.free(p0, 0), "Couldn't free"); | |
| 138 CYG_TEST_CHECK(mempool0.free(p1, 10), "Couldn't free"); | |
| 139 | |
| 140 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 141 // This shouldn't have to wait | |
| 142 p0 = mempool0.alloc(most_of_mem, | |
| 143 Cyg_Clock::real_time_clock->current_value() + 100000); | |
| 144 check_in_mp0(p0, most_of_mem); | |
| 145 p1 = mempool0.alloc(most_of_mem, | |
| 146 Cyg_Clock::real_time_clock->current_value() + 2); | |
| 147 CYG_TEST_CHECK(NULL == p1, "Timed alloc unexpectedly worked"); | |
| 148 p1 = mempool0.alloc(10, | |
| 149 Cyg_Clock::real_time_clock->current_value() + 2); | |
| 150 check_in_mp0(p1, 10); | |
| 151 | |
| 152 // Expect thread 1 to have run while processing previous timed | |
| 153 // allocation. It should therefore tbe waiting. | |
| 154 CYG_TEST_CHECK(mempool1.waiting(), "There should be a thread waiting"); | |
| 155 #endif | |
| 156 | |
| 157 CYG_TEST_PASS_FINISH("Variable memory pool 1 OK"); | |
| 158 } | |
| 159 | |
| 160 static void entry1( CYG_ADDRWORD data ) | |
| 161 { | |
| 162 mempool1.alloc(memsize+1); | |
| 163 CYG_TEST_FAIL("Oversized alloc returned"); | |
| 164 } | |
| 165 | |
| 166 | |
| 167 void memvar1_main( void ) | |
| 168 { | |
| 169 CYG_TEST_INIT(); | |
| 170 | |
| 171 new_thread(entry0, 0); | |
| 172 new_thread(entry1, 1); | |
| 173 | |
| 174 Cyg_Scheduler::start(); | |
| 175 | |
| 176 CYG_TEST_FAIL_FINISH("Not reached"); | |
| 177 } | |
| 178 | |
| 179 externC void | |
| 180 cyg_start( void ) | |
| 181 { | |
| 182 memvar1_main(); | |
| 183 } | |
| 184 // EOF memvar1.cxx |