test/mpool_tests.c

Thu, 31 May 2012 09:18:26 +0200

author
Mike Becker <universe@uap-core.de>
date
Thu, 31 May 2012 09:18:26 +0200
changeset 32
c7af4ec56e19
parent 30
23bb65cbf7a4
child 33
9c219a62070d
permissions
-rw-r--r--

consequently used intptr_t in mpool tests

olaf@13 1 /*
olaf@13 2 *
olaf@13 3 */
olaf@13 4
olaf@30 5 #include <inttypes.h>
olaf@30 6
olaf@13 7 #include "mpool_tests.h"
olaf@13 8
universe@28 9 UCX_TEST_BEGIN(test_ucx_mempool_new) {
universe@28 10 UcxMempool *pool = ucx_mempool_new(16);
universe@28 11
universe@28 12 UCX_TEST_ASSERT(pool->size == 16, "wrong size")
universe@28 13 UCX_TEST_ASSERT(pool->ndata == 0, "uninitialized counter")
universe@28 14 UCX_TEST_ASSERT(pool->data != NULL, "no memory addressed")
universe@28 15
universe@28 16 ucx_mempool_free(pool);
universe@28 17
universe@28 18 UCX_TEST_END
olaf@13 19 }
olaf@13 20
universe@28 21 UCX_TEST_BEGIN(test_ucx_mempool_malloc) {
universe@28 22
universe@28 23 UcxMempool *pool = ucx_mempool_new(1);
universe@28 24
universe@32 25 intptr_t *test = (intptr_t*) ucx_mempool_malloc(pool, sizeof(intptr_t));
universe@28 26
universe@28 27 UCX_TEST_ASSERT(pool->ndata == 1, "counter not incremented")
universe@28 28 UCX_TEST_ASSERT(pool->size == 1, "chcap called")
universe@28 29
universe@32 30 intptr_t *pooladdr =
universe@32 31 (intptr_t*)((char*)pool->data[0] + sizeof(ucx_destructor));
universe@28 32 *pooladdr = 5;
universe@28 33
universe@28 34 UCX_TEST_ASSERT(*test == 5, "wrong pointer")
universe@28 35
universe@28 36 ucx_mempool_free(pool);
universe@28 37
universe@28 38 UCX_TEST_END
olaf@13 39 }
olaf@13 40
universe@28 41 UCX_TEST_BEGIN(test_ucx_mempool_malloc_with_chcap) {
universe@28 42
universe@28 43 UcxMempool *pool = ucx_mempool_new(1);
universe@28 44
universe@28 45 ucx_mempool_malloc(pool, sizeof(int));
universe@32 46 intptr_t *test = (intptr_t*) ucx_mempool_malloc(pool, sizeof(intptr_t));
universe@28 47
universe@28 48 UCX_TEST_ASSERT(pool->ndata == 2, "counter not incremented")
universe@28 49 UCX_TEST_ASSERT(pool->size == 17, "chcap not called")
universe@28 50
universe@32 51 intptr_t *pooladdr =
universe@32 52 (intptr_t*)((char*)pool->data[1] + sizeof(ucx_destructor));
universe@28 53 *pooladdr = 5;
universe@28 54
universe@28 55 UCX_TEST_ASSERT(*test == 5, "wrong pointer")
universe@28 56
universe@28 57 ucx_mempool_free(pool);
universe@28 58
universe@28 59 UCX_TEST_END
universe@28 60 }
universe@19 61
universe@28 62 UCX_TEST_BEGIN(test_ucx_mempool_calloc) {
universe@28 63
universe@28 64 UcxMempool *pool = ucx_mempool_new(1);
universe@28 65
universe@32 66 intptr_t *test = (intptr_t*) ucx_mempool_calloc(pool, 2, sizeof(intptr_t));
universe@28 67
universe@28 68 UCX_TEST_ASSERT(test != NULL, "no memory for test data")
universe@28 69 UCX_TEST_ASSERT(test[0] == 0 && test[1] == 0, "failed")
universe@28 70
universe@28 71 ucx_mempool_free(pool);
universe@28 72
universe@28 73 UCX_TEST_END
universe@28 74 }
olaf@13 75
universe@28 76 void test_setdestr(void* elem) {
olaf@30 77 intptr_t *cb = (intptr_t*) ((intptr_t*) elem)[1];
universe@28 78 *cb = 42;
universe@28 79 }
olaf@13 80
universe@28 81 UCX_TEST_BEGIN(test_ucx_mempool_set_destr) {
universe@28 82
universe@28 83 UcxMempool *pool = ucx_mempool_new(2);
universe@28 84
universe@32 85 ucx_mempool_malloc(pool, sizeof(intptr_t));
olaf@30 86 intptr_t *test = (intptr_t*) ucx_mempool_calloc(pool, 2, sizeof(intptr_t));
universe@28 87
universe@32 88 intptr_t *cb = (intptr_t*) malloc(sizeof(intptr_t));
universe@28 89 UCX_TEST_ASSERT(cb != NULL && test != NULL, "no memory for test data")
universe@28 90
olaf@30 91 test[0] = 5; test[1] = (intptr_t) cb;
universe@28 92 *cb = 13;
universe@28 93
universe@28 94 ucx_mempool_set_destr(test, test_setdestr);
universe@28 95 UCX_TEST_ASSERT(
universe@28 96 *(ucx_destructor*)(pool->data[1]) == test_setdestr, "failed")
universe@28 97 UCX_TEST_ASSERT(
olaf@30 98 test[0] == 5 && test[1] == (intptr_t) cb, "setdestr destroyed data")
universe@28 99
universe@28 100 ucx_mempool_free(pool);
universe@28 101
universe@28 102 UCX_TEST_ASSERT(*cb == 42, "destructor not called")
olaf@13 103
universe@28 104 free(cb);
universe@28 105
universe@28 106 UCX_TEST_END
universe@28 107 }
olaf@13 108
olaf@13 109
universe@28 110 UCX_TEST_BEGIN(test_ucx_mempool_reg_destr) {
olaf@14 111
universe@28 112 UcxMempool *pool = ucx_mempool_new(1);
universe@28 113
olaf@30 114 intptr_t *test = (intptr_t*) calloc(2, sizeof(intptr_t));
universe@28 115
olaf@30 116 intptr_t *cb = (intptr_t*) malloc(sizeof(intptr_t));
universe@28 117 UCX_TEST_ASSERT(cb != NULL && test != NULL, "no memory for test data")
universe@28 118
olaf@30 119 test[0] = 5; test[1] = (intptr_t) cb;
universe@28 120 *cb = 13;
universe@28 121
universe@28 122 ucx_mempool_reg_destr(pool, test, test_setdestr);
universe@28 123
universe@28 124 ucx_destructor *pooladdr = (ucx_destructor*)
olaf@30 125 ((char*)pool->data[0] + sizeof(ucx_destructor));
universe@28 126
universe@28 127 UCX_TEST_ASSERT(*pooladdr == test_setdestr, "failed")
universe@28 128
universe@28 129 ucx_mempool_free(pool);
olaf@30 130 free(test);
universe@28 131
universe@28 132 UCX_TEST_ASSERT(*cb == 42, "destructor not called")
olaf@13 133
universe@28 134 free(cb);
olaf@13 135
universe@28 136 UCX_TEST_END
universe@28 137 }
olaf@13 138
universe@28 139 UCX_TEST_BEGIN(test_ucx_mempool_realloc) {
universe@28 140
universe@28 141 UcxMempool *pool = ucx_mempool_new(2);
universe@28 142
universe@32 143 ucx_mempool_malloc(pool, sizeof(intptr_t));
olaf@30 144 intptr_t *test = (intptr_t*) ucx_mempool_calloc(pool, 2, sizeof(intptr_t));
universe@28 145
olaf@30 146 intptr_t *cb = (intptr_t*) malloc(sizeof(intptr_t));
universe@28 147 UCX_TEST_ASSERT(cb != NULL && test != NULL, "no memory for test data")
universe@28 148
olaf@30 149 test[0] = 5; test[1] = (intptr_t) cb;
universe@28 150 *cb = 13;
universe@28 151
universe@28 152 ucx_mempool_set_destr(test, test_setdestr);
universe@28 153
universe@28 154 int *rtest, n = 2;
universe@28 155 do {
universe@28 156 n *= 2;
universe@28 157 UCX_TEST_ASSERT(n < 65536, "test corrupt - no movement for realloc")
olaf@30 158 rtest = ucx_mempool_realloc(pool, test, n*sizeof(intptr_t));
universe@28 159 } while (rtest == test);
universe@28 160 test = rtest;
universe@28 161
universe@28 162 UCX_TEST_ASSERT(*(ucx_destructor*)(pool->data[1]) == test_setdestr,
universe@28 163 "realloc killed destructor")
universe@28 164 UCX_TEST_ASSERT(
olaf@30 165 test[0] == 5 && test[1] == (intptr_t) cb, "realloc destroyed data")
universe@28 166
universe@28 167 ucx_mempool_free(pool);
universe@28 168
universe@28 169 UCX_TEST_ASSERT(*cb == 42, "destructor not called")
universe@28 170
universe@28 171 free(cb);
universe@28 172
universe@28 173 UCX_TEST_END
olaf@13 174 }

mercurial