X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/3120f4a0a622813c8a68043fe2b25ae0fb00af50..9943e496eb5e20347eac1a7a2533931327355389:/src/mc/mc_snapshot.cpp diff --git a/src/mc/mc_snapshot.cpp b/src/mc/mc_snapshot.cpp index b752c9ce45..7823e430a6 100644 --- a/src/mc/mc_snapshot.cpp +++ b/src/mc/mc_snapshot.cpp @@ -1,18 +1,24 @@ -/* Copyright (c) 2014. The SimGrid Team. +/* Copyright (c) 2014-2018. The SimGrid Team. * All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it * under the terms of the license (GNU LGPL) which comes with this package. */ -#include +#include -#include "internal_config.h" -#include "smpi/private.h" +#include +#include -#include "mc_snapshot.h" -#include "mc_private.h" -#include "mc_mmu.h" -#include "PageStore.hpp" +#include "xbt/asserts.h" +#include "xbt/sysdep.h" + +#include "src/internal_config.h" +#include "src/smpi/include/private.hpp" + +#include "src/mc/PageStore.hpp" +#include "src/mc/mc_mmu.hpp" +#include "src/mc/mc_private.hpp" +#include "src/mc/mc_snapshot.hpp" extern "C" { @@ -21,31 +27,29 @@ extern "C" { * @param addr Pointer * @param snapshot Snapshot * @param Snapshot region in the snapshot this pointer belongs to - * (or NULL if it does not belong to any snapshot region) + * (or nullptr if it does not belong to any snapshot region) * */ -mc_mem_region_t mc_get_snapshot_region(const void* addr, mc_snapshot_t snapshot, int process_index) +mc_mem_region_t mc_get_snapshot_region( + const void* addr, const simgrid::mc::Snapshot* snapshot, int process_index) { - size_t n = snapshot->snapshot_regions_count; + size_t n = snapshot->snapshot_regions.size(); for (size_t i = 0; i != n; ++i) { - mc_mem_region_t region = snapshot->snapshot_regions[i]; - if (!(region && mc_region_contain(region, addr))) + mc_mem_region_t region = snapshot->snapshot_regions[i].get(); + if (not(region && region->contain(simgrid::mc::remote(addr)))) continue; - if (region->storage_type == MC_REGION_STORAGE_TYPE_PRIVATIZED) { -#ifdef HAVE_SMPI + if (region->storage_type() == simgrid::mc::StorageType::Privatized) { +#if HAVE_SMPI // Use the current process index of the snapshot: - if (process_index == MC_PROCESS_INDEX_DISABLED) { + if (process_index == simgrid::mc::ProcessIndexDisabled) process_index = snapshot->privatization_index; - } - if (process_index < 0) { + if (process_index < 0) xbt_die("Missing process index"); - } - if (process_index >= (int) region->privatized.regions_count) { + if (process_index >= (int) region->privatized_data().size()) xbt_die("Invalid process index"); - } - mc_mem_region_t priv_region = region->privatized.regions[process_index]; - xbt_assert(mc_region_contain(priv_region, addr)); - return priv_region; + simgrid::mc::RegionSnapshot& priv_region = region->privatized_data()[process_index]; + xbt_assert(priv_region.contain(simgrid::mc::remote(addr))); + return &priv_region; #else xbt_die("Privatized region in a non SMPI build (this should not happen)"); #endif @@ -54,7 +58,7 @@ mc_mem_region_t mc_get_snapshot_region(const void* addr, mc_snapshot_t snapshot, return region; } - return NULL; + return nullptr; } /** @brief Read memory from a snapshot region broken across fragmented pages @@ -70,19 +74,23 @@ const void* MC_region_read_fragmented(mc_mem_region_t region, void* target, cons // Last byte of the memory area: void* end = (char*) addr + size - 1; + // TODO, we assume the chunks are aligned to natural chunk boundaries. + // We should remove this assumption. + // Page of the last byte of the memory area: - size_t page_end = mc_page_number(NULL, end); + size_t page_end = simgrid::mc::mmu::split((std::uintptr_t) end).first; void* dest = target; - if (dest==NULL) { + if (dest==nullptr) xbt_die("Missing destination buffer for fragmented memory access"); - } // Read each page: - while (mc_page_number(NULL, addr) != page_end) { - void* snapshot_addr = mc_translate_address_region((uintptr_t) addr, region); - void* next_page = mc_page_from_number(NULL, mc_page_number(NULL, addr) + 1); + while (simgrid::mc::mmu::split((std::uintptr_t) addr).first != page_end) { + void* snapshot_addr = mc_translate_address_region_chunked((uintptr_t) addr, region); + void* next_page = (void*) simgrid::mc::mmu::join( + simgrid::mc::mmu::split((std::uintptr_t) addr).first + 1, + 0); size_t readable = (char*) next_page - (char*) addr; memcpy(dest, snapshot_addr, readable); addr = (char*) addr + readable; @@ -91,31 +99,12 @@ const void* MC_region_read_fragmented(mc_mem_region_t region, void* target, cons } // Read the end: - void* snapshot_addr = mc_translate_address_region((uintptr_t)addr, region); + void* snapshot_addr = mc_translate_address_region_chunked((uintptr_t)addr, region); memcpy(dest, snapshot_addr, size); return target; } -/** @brief Read memory from a snapshot - * - * @param addr Process (non-snapshot) address of the data - * @param snapshot Snapshot (or NULL is no snapshot) - * @param target Buffer to store the value - * @param size Size of the data to read in bytes - * @return Pointer where the data is located (target buffer or original location) - */ -const void* MC_snapshot_read( - mc_snapshot_t snapshot, adress_space_read_flags_t flags, - void* target, const void* addr, size_t size, int process_index) -{ - mc_mem_region_t region = mc_get_snapshot_region(addr, snapshot, process_index); - if (region) - return MC_region_read(region, target, addr, size); - else - return MC_process_read(snapshot->process, flags, target, addr, size, process_index); -} - /** Compare memory between snapshots (with known regions) * * @param addr1 Address in the first snapshot @@ -132,54 +121,72 @@ int MC_snapshot_region_memcmp( // Using alloca() for large allocations may trigger stack overflow: // use malloc if the buffer is too big. bool stack_alloc = size < 64; - const bool region1_need_buffer = region1==NULL || region1->storage_type==MC_REGION_STORAGE_TYPE_FLAT; - const bool region2_need_buffer = region2==NULL || region2->storage_type==MC_REGION_STORAGE_TYPE_FLAT; - void* buffer1a = region1_need_buffer ? NULL : stack_alloc ? alloca(size) : malloc(size); - void* buffer2a = region2_need_buffer ? NULL : stack_alloc ? alloca(size) : malloc(size); + const bool region1_need_buffer = region1==nullptr || region1->storage_type()==simgrid::mc::StorageType::Flat; + const bool region2_need_buffer = region2==nullptr || region2->storage_type()==simgrid::mc::StorageType::Flat; + void* buffer1a = region1_need_buffer ? nullptr : stack_alloc ? alloca(size) : ::operator new(size); + void* buffer2a = region2_need_buffer ? nullptr : stack_alloc ? alloca(size) : ::operator new(size); const void* buffer1 = MC_region_read(region1, buffer1a, addr1, size); const void* buffer2 = MC_region_read(region2, buffer2a, addr2, size); int res; - if (buffer1 == buffer2) { + if (buffer1 == buffer2) res = 0; - } else { + else res = memcmp(buffer1, buffer2, size); - } - if (!stack_alloc) { - free(buffer1a); - free(buffer2a); + if (not stack_alloc) { + ::operator delete(buffer1a); + ::operator delete(buffer2a); } return res; } -/** Compare memory between snapshots - * - * @param addr1 Address in the first snapshot - * @param snapshot1 First snapshot - * @param addr2 Address in the second snapshot - * @param snapshot2 Second snapshot - * @return same as memcmp - * */ -int MC_snapshot_memcmp( - const void* addr1, mc_snapshot_t snapshot1, - const void* addr2, mc_snapshot_t snapshot2, int process_index, size_t size) +} // extern "C" + +namespace simgrid { +namespace mc { + +Snapshot::Snapshot(RemoteClient* process, int _num_state) + : AddressSpace(process) + , num_state(_num_state) + , heap_bytes_used(0) + , enabled_processes() + , privatization_index(0) + , hash(0) { - mc_mem_region_t region1 = mc_get_snapshot_region(addr1, snapshot1, process_index); - mc_mem_region_t region2 = mc_get_snapshot_region(addr2, snapshot2, process_index); - return MC_snapshot_region_memcmp(addr1, region1, addr2, region2, size); + +} + +const void* Snapshot::read_bytes(void* buffer, std::size_t size, + RemotePtr address, int process_index, + ReadOptions options) const +{ + mc_mem_region_t region = mc_get_snapshot_region((void*)address.address(), this, process_index); + if (region) { + const void* res = MC_region_read(region, buffer, (void*)address.address(), size); + if (buffer == res || options & ReadOptions::lazy()) + return res; + else { + memcpy(buffer, res, size); + return buffer; + } + } + else + return this->process()->read_bytes( + buffer, size, address, process_index, options); +} + +} } #ifdef SIMGRID_TEST -#include -#include +#include +#include #include -#include "mc/mc_private.h" -#include "mc/mc_snapshot.h" -#include "mc/mc_mmu.h" - -extern "C" { +#include "src/mc/mc_mmu.hpp" +#include "src/mc/mc_private.hpp" +#include "src/mc/mc_snapshot.hpp" XBT_TEST_SUITE("mc_snapshot", "Snapshots"); @@ -193,103 +200,89 @@ static inline void init_memory(void* mem, size_t size) static void test_snapshot(bool sparse_checkpoint); -XBT_TEST_UNIT("page_snapshots", test_per_snpashots, "Test per-page snapshots") -{ - test_snapshot(1); -} - - XBT_TEST_UNIT("flat_snapshot", test_flat_snapshots, "Test flat snapshots") { test_snapshot(0); } +XBT_TEST_UNIT("page_snapshots", test_per_snpashots, "Test per-page snapshots") +{ + test_snapshot(1); +} static void test_snapshot(bool sparse_checkpoint) { - xbt_test_add("Initialisation"); + xbt_test_add("Initialization"); _sg_mc_sparse_checkpoint = sparse_checkpoint; xbt_assert(xbt_pagesize == getpagesize()); xbt_assert(1 << xbt_pagebits == xbt_pagesize); - mc_model_checker = new ::simgrid::mc::ModelChecker(getpid(), -1); + + std::unique_ptr process(new simgrid::mc::RemoteClient(getpid(), -1)); + process->init(); + mc_model_checker = new ::simgrid::mc::ModelChecker(std::move(process)); for(int n=1; n!=256; ++n) { // Store region page(s): size_t byte_size = n * xbt_pagesize; - void* source = mmap(NULL, byte_size, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0); + void* source = mmap(nullptr, byte_size, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0); xbt_assert(source!=MAP_FAILED, "Could not allocate source memory"); // Init memory and take snapshots: init_memory(source, byte_size); - mc_mem_region_t region0 = mc_region_new_sparse( - MC_REGION_TYPE_UNKNOWN, source, source, byte_size); + simgrid::mc::RegionSnapshot region0 = simgrid::mc::sparse_region( + simgrid::mc::RegionType::Unknown, source, source, byte_size); for(int i=0; i