diff options
Diffstat (limited to 'deps/jemalloc/test/integration/extent.c')
-rw-r--r-- | deps/jemalloc/test/integration/extent.c | 248 |
1 files changed, 0 insertions, 248 deletions
diff --git a/deps/jemalloc/test/integration/extent.c b/deps/jemalloc/test/integration/extent.c deleted file mode 100644 index b5db08766..000000000 --- a/deps/jemalloc/test/integration/extent.c +++ /dev/null @@ -1,248 +0,0 @@ -#include "test/jemalloc_test.h" - -#include "test/extent_hooks.h" - -static bool -check_background_thread_enabled(void) { - bool enabled; - size_t sz = sizeof(bool); - int ret = mallctl("background_thread", (void *)&enabled, &sz, NULL,0); - if (ret == ENOENT) { - return false; - } - assert_d_eq(ret, 0, "Unexpected mallctl error"); - return enabled; -} - -static void -test_extent_body(unsigned arena_ind) { - void *p; - size_t large0, large1, large2, sz; - size_t purge_mib[3]; - size_t purge_miblen; - int flags; - bool xallocx_success_a, xallocx_success_b, xallocx_success_c; - - flags = MALLOCX_ARENA(arena_ind) | MALLOCX_TCACHE_NONE; - - /* Get large size classes. */ - sz = sizeof(size_t); - assert_d_eq(mallctl("arenas.lextent.0.size", (void *)&large0, &sz, NULL, - 0), 0, "Unexpected arenas.lextent.0.size failure"); - assert_d_eq(mallctl("arenas.lextent.1.size", (void *)&large1, &sz, NULL, - 0), 0, "Unexpected arenas.lextent.1.size failure"); - assert_d_eq(mallctl("arenas.lextent.2.size", (void *)&large2, &sz, NULL, - 0), 0, "Unexpected arenas.lextent.2.size failure"); - - /* Test dalloc/decommit/purge cascade. */ - purge_miblen = sizeof(purge_mib)/sizeof(size_t); - assert_d_eq(mallctlnametomib("arena.0.purge", purge_mib, &purge_miblen), - 0, "Unexpected mallctlnametomib() failure"); - purge_mib[1] = (size_t)arena_ind; - called_alloc = false; - try_alloc = true; - try_dalloc = false; - try_decommit = false; - p = mallocx(large0 * 2, flags); - assert_ptr_not_null(p, "Unexpected mallocx() error"); - assert_true(called_alloc, "Expected alloc call"); - called_dalloc = false; - called_decommit = false; - did_purge_lazy = false; - did_purge_forced = false; - called_split = false; - xallocx_success_a = (xallocx(p, large0, 0, flags) == large0); - assert_d_eq(mallctlbymib(purge_mib, purge_miblen, NULL, NULL, NULL, 0), - 0, "Unexpected arena.%u.purge error", arena_ind); - if (xallocx_success_a) { - assert_true(called_dalloc, "Expected dalloc call"); - assert_true(called_decommit, "Expected decommit call"); - assert_true(did_purge_lazy || did_purge_forced, - "Expected purge"); - } - assert_true(called_split, "Expected split call"); - dallocx(p, flags); - try_dalloc = true; - - /* Test decommit/commit and observe split/merge. */ - try_dalloc = false; - try_decommit = true; - p = mallocx(large0 * 2, flags); - assert_ptr_not_null(p, "Unexpected mallocx() error"); - did_decommit = false; - did_commit = false; - called_split = false; - did_split = false; - did_merge = false; - xallocx_success_b = (xallocx(p, large0, 0, flags) == large0); - assert_d_eq(mallctlbymib(purge_mib, purge_miblen, NULL, NULL, NULL, 0), - 0, "Unexpected arena.%u.purge error", arena_ind); - if (xallocx_success_b) { - assert_true(did_split, "Expected split"); - } - xallocx_success_c = (xallocx(p, large0 * 2, 0, flags) == large0 * 2); - if (did_split) { - assert_b_eq(did_decommit, did_commit, - "Expected decommit/commit match"); - } - if (xallocx_success_b && xallocx_success_c) { - assert_true(did_merge, "Expected merge"); - } - dallocx(p, flags); - try_dalloc = true; - try_decommit = false; - - /* Make sure non-large allocation succeeds. */ - p = mallocx(42, flags); - assert_ptr_not_null(p, "Unexpected mallocx() error"); - dallocx(p, flags); -} - -static void -test_manual_hook_auto_arena(void) { - unsigned narenas; - size_t old_size, new_size, sz; - size_t hooks_mib[3]; - size_t hooks_miblen; - extent_hooks_t *new_hooks, *old_hooks; - - extent_hooks_prep(); - - sz = sizeof(unsigned); - /* Get number of auto arenas. */ - assert_d_eq(mallctl("opt.narenas", (void *)&narenas, &sz, NULL, 0), - 0, "Unexpected mallctl() failure"); - if (narenas == 1) { - return; - } - - /* Install custom extent hooks on arena 1 (might not be initialized). */ - hooks_miblen = sizeof(hooks_mib)/sizeof(size_t); - assert_d_eq(mallctlnametomib("arena.0.extent_hooks", hooks_mib, - &hooks_miblen), 0, "Unexpected mallctlnametomib() failure"); - hooks_mib[1] = 1; - old_size = sizeof(extent_hooks_t *); - new_hooks = &hooks; - new_size = sizeof(extent_hooks_t *); - assert_d_eq(mallctlbymib(hooks_mib, hooks_miblen, (void *)&old_hooks, - &old_size, (void *)&new_hooks, new_size), 0, - "Unexpected extent_hooks error"); - static bool auto_arena_created = false; - if (old_hooks != &hooks) { - assert_b_eq(auto_arena_created, false, - "Expected auto arena 1 created only once."); - auto_arena_created = true; - } -} - -static void -test_manual_hook_body(void) { - unsigned arena_ind; - size_t old_size, new_size, sz; - size_t hooks_mib[3]; - size_t hooks_miblen; - extent_hooks_t *new_hooks, *old_hooks; - - extent_hooks_prep(); - - sz = sizeof(unsigned); - assert_d_eq(mallctl("arenas.create", (void *)&arena_ind, &sz, NULL, 0), - 0, "Unexpected mallctl() failure"); - - /* Install custom extent hooks. */ - hooks_miblen = sizeof(hooks_mib)/sizeof(size_t); - assert_d_eq(mallctlnametomib("arena.0.extent_hooks", hooks_mib, - &hooks_miblen), 0, "Unexpected mallctlnametomib() failure"); - hooks_mib[1] = (size_t)arena_ind; - old_size = sizeof(extent_hooks_t *); - new_hooks = &hooks; - new_size = sizeof(extent_hooks_t *); - assert_d_eq(mallctlbymib(hooks_mib, hooks_miblen, (void *)&old_hooks, - &old_size, (void *)&new_hooks, new_size), 0, - "Unexpected extent_hooks error"); - assert_ptr_ne(old_hooks->alloc, extent_alloc_hook, - "Unexpected extent_hooks error"); - assert_ptr_ne(old_hooks->dalloc, extent_dalloc_hook, - "Unexpected extent_hooks error"); - assert_ptr_ne(old_hooks->commit, extent_commit_hook, - "Unexpected extent_hooks error"); - assert_ptr_ne(old_hooks->decommit, extent_decommit_hook, - "Unexpected extent_hooks error"); - assert_ptr_ne(old_hooks->purge_lazy, extent_purge_lazy_hook, - "Unexpected extent_hooks error"); - assert_ptr_ne(old_hooks->purge_forced, extent_purge_forced_hook, - "Unexpected extent_hooks error"); - assert_ptr_ne(old_hooks->split, extent_split_hook, - "Unexpected extent_hooks error"); - assert_ptr_ne(old_hooks->merge, extent_merge_hook, - "Unexpected extent_hooks error"); - - if (!check_background_thread_enabled()) { - test_extent_body(arena_ind); - } - - /* Restore extent hooks. */ - assert_d_eq(mallctlbymib(hooks_mib, hooks_miblen, NULL, NULL, - (void *)&old_hooks, new_size), 0, "Unexpected extent_hooks error"); - assert_d_eq(mallctlbymib(hooks_mib, hooks_miblen, (void *)&old_hooks, - &old_size, NULL, 0), 0, "Unexpected extent_hooks error"); - assert_ptr_eq(old_hooks, default_hooks, "Unexpected extent_hooks error"); - assert_ptr_eq(old_hooks->alloc, default_hooks->alloc, - "Unexpected extent_hooks error"); - assert_ptr_eq(old_hooks->dalloc, default_hooks->dalloc, - "Unexpected extent_hooks error"); - assert_ptr_eq(old_hooks->commit, default_hooks->commit, - "Unexpected extent_hooks error"); - assert_ptr_eq(old_hooks->decommit, default_hooks->decommit, - "Unexpected extent_hooks error"); - assert_ptr_eq(old_hooks->purge_lazy, default_hooks->purge_lazy, - "Unexpected extent_hooks error"); - assert_ptr_eq(old_hooks->purge_forced, default_hooks->purge_forced, - "Unexpected extent_hooks error"); - assert_ptr_eq(old_hooks->split, default_hooks->split, - "Unexpected extent_hooks error"); - assert_ptr_eq(old_hooks->merge, default_hooks->merge, - "Unexpected extent_hooks error"); -} - -TEST_BEGIN(test_extent_manual_hook) { - test_manual_hook_auto_arena(); - test_manual_hook_body(); - - /* Test failure paths. */ - try_split = false; - test_manual_hook_body(); - try_merge = false; - test_manual_hook_body(); - try_purge_lazy = false; - try_purge_forced = false; - test_manual_hook_body(); - - try_split = try_merge = try_purge_lazy = try_purge_forced = true; -} -TEST_END - -TEST_BEGIN(test_extent_auto_hook) { - unsigned arena_ind; - size_t new_size, sz; - extent_hooks_t *new_hooks; - - extent_hooks_prep(); - - sz = sizeof(unsigned); - new_hooks = &hooks; - new_size = sizeof(extent_hooks_t *); - assert_d_eq(mallctl("arenas.create", (void *)&arena_ind, &sz, - (void *)&new_hooks, new_size), 0, "Unexpected mallctl() failure"); - - test_skip_if(check_background_thread_enabled()); - test_extent_body(arena_ind); -} -TEST_END - -int -main(void) { - return test( - test_extent_manual_hook, - test_extent_auto_hook); -} |