X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/2503eb4da1a3a0f30c99e47e5e4ed34deba6074d..1ba8e265192b67c6903d48faeabe9e1d626bcd3d:/src/mc/mc_checkpoint.c?ds=sidebyside diff --git a/src/mc/mc_checkpoint.c b/src/mc/mc_checkpoint.c index 604572b2c9..e72bef316a 100644 --- a/src/mc/mc_checkpoint.c +++ b/src/mc/mc_checkpoint.c @@ -1,4 +1,4 @@ -/* Copyright (c) 2008-2013. The SimGrid Team. +/* Copyright (c) 2008-2014. The SimGrid Team. * All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it @@ -275,9 +275,9 @@ static xbt_dynar_t MC_get_local_variables_values(xbt_dynar_t stack_frames){ /* if(current_variable->address!=NULL) { new_var->address = current_variable->address; } else */ - if(current_variable->location != NULL){ - new_var->address = (void*) MC_dwarf_resolve_location( - &(stack_frame->unw_cursor), current_variable->location, (void*)stack_frame->frame_base); + if(current_variable->locations.size != 0){ + new_var->address = (void*) mc_dwarf_resolve_locations(¤t_variable->locations, + &(stack_frame->unw_cursor), (void*)stack_frame->frame_base, NULL); } xbt_dynar_push(variables, &new_var); @@ -302,9 +302,6 @@ static xbt_dynar_t MC_unwind_stack_frames(void *stack_context) { unw_cursor_t c; - dw_frame_t test = MC_find_function_by_ip(&MC_unwind_stack_frames); - xbt_assert(test); - int ret; for(ret = unw_init_local(&c, (unw_context_t *)stack_context); ret >= 0; ret = unw_step(&c)){ mc_stack_frame_t stack_frame = xbt_new(s_mc_stack_frame_t, 1); @@ -327,7 +324,7 @@ static xbt_dynar_t MC_unwind_stack_frames(void *stack_context) { if(frame) { stack_frame->frame_name = xbt_strdup(frame->name); - stack_frame->frame_base = (unw_word_t)mc_find_frame_base((void*)ip, frame, &c); + stack_frame->frame_base = (unw_word_t)mc_find_frame_base(frame, &c); } else { stack_frame->frame_base = 0; } @@ -453,6 +450,47 @@ void MC_restore_snapshot(mc_snapshot_t snapshot){ } +void* mc_translate_address(uintptr_t addr, mc_snapshot_t snapshot) { + + // If not in a process state/clone: + if(!snapshot) { + return (uintptr_t*) addr; + } + + // If it is in a snapshot: + for(size_t i=0; i!=NB_REGIONS; ++i) { + mc_mem_region_t region = snapshot->regions[i]; + uintptr_t start = (uintptr_t) region->start_addr; + uintptr_t end = start + region->size; + + // The address is in this region: + if(addr >= start && addr < end) { + uintptr_t offset = addr - start; + return (void*) ((uintptr_t)region->data + offset); + } + + } + + // It is not in a snapshot: + return (void*) addr; +} + +uintptr_t mc_untranslate_address(void* addr, mc_snapshot_t snapshot) { + if(!snapshot) { + return (uintptr_t) addr; + } + + for(size_t i=0; i!=NB_REGIONS; ++i) { + mc_mem_region_t region = snapshot->regions[i]; + if(addr>=region->data && addr<=region->data+region->size) { + size_t offset = (size_t) ((char*) addr - (char*) region->data); + return (uintptr_t) (region->start_addr + offset); + } + } + + return (uintptr_t) addr; +} + mc_snapshot_t SIMIX_pre_mc_snapshot(smx_simcall_t simcall){ return MC_take_snapshot(1); }