Mercurial > flash_v2
diff packages/kernel/current/tests/kmemfix1.c @ 0:3111d98ba7b3 ecos-v1_1-release
Initial commit of eCos version 1.1
| author | jlarmour |
|---|---|
| date | Tue, 11 May 1999 11:16:07 +0000 |
| parents | |
| children | 443894e2e912 |
line wrap: on
line diff
new file mode 100644 --- /dev/null +++ b/packages/kernel/current/tests/kmemfix1.c @@ -0,0 +1,187 @@ +/*========================================================================== +// +// kmemfix1.cxx +// +// Kernel C API Fixed memory pool test 1 +// +//========================================================================== +//####COPYRIGHTBEGIN#### +// +// ------------------------------------------- +// The contents of this file are subject to the Cygnus eCos Public License +// Version 1.0 (the "License"); you may not use this file except in +// compliance with the License. You may obtain a copy of the License at +// http://sourceware.cygnus.com/ecos +// +// Software distributed under the License is distributed on an "AS IS" +// basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the +// License for the specific language governing rights and limitations under +// the License. +// +// The Original Code is eCos - Embedded Cygnus Operating System, released +// September 30, 1998. +// +// The Initial Developer of the Original Code is Cygnus. Portions created +// by Cygnus are Copyright (C) 1998 Cygnus Solutions. All Rights Reserved. +// ------------------------------------------- +// +//####COPYRIGHTEND#### +//========================================================================== +//#####DESCRIPTIONBEGIN#### +// +// Author(s): dsm +// Contributors: dsm +// Date: 1998-06-09 +// Description: Tests basic fixed memory pool functionality +//####DESCRIPTIONEND#### +*/ + +#include <pkgconf/kernel.h> + +#include <cyg/kernel/kapi.h> + +#include <cyg/infra/testcase.h> + +#ifdef CYGFUN_KERNEL_API_C + +#include "testaux.h" + +#define NTHREADS 2 +#define STACKSIZE 4096 + +static cyg_handle_t thread[NTHREADS]; + +static cyg_thread thread_obj[NTHREADS]; +static char stack[NTHREADS][STACKSIZE]; + + +#define MEMSIZE 10240 + +static cyg_uint8 mem[2][MEMSIZE]; + +static cyg_mempool_fix mempool_obj[2]; +static cyg_handle_t mempool0, mempool1; + +static void check_in_mp0(cyg_uint8 *p, cyg_int32 size) +{ + CYG_TEST_CHECK(NULL != p, + "Allocation failed"); + CYG_TEST_CHECK(mem[0] <= p && p+size < mem[1], + "Block outside memory pool"); +} + +static void entry0( cyg_addrword_t data ) +{ + cyg_uint8 *p0, *p1, *p2; + cyg_mempool_info info0, info1, info2; + + cyg_mempool_fix_get_info(mempool0, &info0); + CYG_TEST_CHECK(mem[0] == info0.base, "get_arena: base wrong"); + CYG_TEST_CHECK(MEMSIZE == info0.size, "get_arena: size wrong"); + + CYG_TEST_CHECK(0 < info0.maxfree && info0.maxfree <= info0.size, + "get_arena: maxfree wildly wrong"); + + CYG_TEST_CHECK(100 == info0.blocksize, "get_blocksize wrong" ); + + CYG_TEST_CHECK(info0.totalmem > 0, "Negative total memory" ); + CYG_TEST_CHECK(info0.freemem > 0, "Negative free memory" ); + CYG_TEST_CHECK(info0.totalmem <= MEMSIZE, + "info.totalsize: Too much memory"); + CYG_TEST_CHECK(info0.freemem <= info0.totalmem , + "More memory free than possible" ); + + CYG_TEST_CHECK( !cyg_mempool_fix_waiting(mempool0) , + "Thread waiting for memory; there shouldn't be"); + + p0 = cyg_mempool_fix_alloc(mempool0); + check_in_mp0(p0, 100); + + cyg_mempool_fix_get_info(mempool0, &info1); + CYG_TEST_CHECK(info1.freemem > 0, "Negative free memory" ); + CYG_TEST_CHECK(info1.freemem < info0.freemem, + "Free memory didn't decrease after allocation" ); + + p1 = NULL; + while((p2 = cyg_mempool_fix_try_alloc(mempool0) )) + p1 = p2; + + cyg_mempool_fix_get_info(mempool0, &info1); + cyg_mempool_fix_free(mempool0, p0); + + cyg_mempool_fix_get_info(mempool0, &info2); + CYG_TEST_CHECK(info2.freemem > info1.freemem, + "Free memory didn't increase after free" ); + + // should be able to reallocate now a block is free + p0 = cyg_mempool_fix_try_alloc(mempool0); + check_in_mp0(p0, 100); + + CYG_TEST_CHECK(p1+100 <= p0 || p1 >= p0+100, + "Ranges of allocated memory overlap"); + + cyg_mempool_fix_free(mempool0, p0); + cyg_mempool_fix_free(mempool0, p1); + +#ifdef CYGFUN_KERNEL_THREADS_TIMER + // This shouldn't have to wait + p0 = cyg_mempool_fix_timed_alloc(mempool0, cyg_current_time()+100000); + check_in_mp0(p0, 100); + p1 = cyg_mempool_fix_timed_alloc(mempool0, cyg_current_time()+2); + check_in_mp0(p1, 10); + p1 = cyg_mempool_fix_timed_alloc(mempool0, cyg_current_time()+2); + CYG_TEST_CHECK(NULL == p1, "Timed alloc unexpectedly worked"); + + // Expect thread 1 to have run while processing previous timed + // allocation. It should therefore tbe waiting. + CYG_TEST_CHECK(cyg_mempool_fix_waiting(mempool1), + "There should be a thread waiting"); +#endif + + CYG_TEST_PASS_FINISH("Kernal C API Fixed memory pool 1 OK"); +} + +static void entry1( cyg_addrword_t data ) +{ + while(NULL != cyg_mempool_fix_alloc(mempool1)) + ; + CYG_TEST_FAIL("alloc returned NULL"); +} + + +void kmemfix1_main( void ) +{ + CYG_TEST_INIT(); + + cyg_thread_create(4, entry0 , (cyg_addrword_t)0, "kmemfix1-0", + (void *)stack[0], STACKSIZE, &thread[0], &thread_obj[0]); + cyg_thread_resume(thread[0]); + + cyg_thread_create(4, entry1 , (cyg_addrword_t)1, "kmemfix1-1", + (void *)stack[1], STACKSIZE, &thread[1], &thread_obj[1]); + cyg_thread_resume(thread[1]); + + cyg_mempool_fix_create(mem[0], MEMSIZE, 100, &mempool0, &mempool_obj[0]); + cyg_mempool_fix_create(mem[1], MEMSIZE, 316, &mempool1, &mempool_obj[1]); + + cyg_scheduler_start(); + + CYG_TEST_FAIL_FINISH("Not reached"); +} + +externC void +cyg_start( void ) +{ + kmemfix1_main(); +} + +#else /* def CYGFUN_KERNEL_API_C */ +externC void +cyg_start( void ) +{ + CYG_TEST_INIT(); + CYG_TEST_PASS_FINISH("Kernel C API layer disabled"); +} +#endif /* def CYGFUN_KERNEL_API_C */ + +/* EOF kmemfix1.c */
