X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/614a9d1249ea6287562890365fc68f261776df79..bc3b5a95b8c6c5ddb198890a6fec1a4c62f89fee:/src/mc/mc_compare.c diff --git a/src/mc/mc_compare.c b/src/mc/mc_compare.c index d0c54f16e0..6ab29d09c6 100644 --- a/src/mc/mc_compare.c +++ b/src/mc/mc_compare.c @@ -12,7 +12,6 @@ XBT_LOG_NEW_DEFAULT_SUBCATEGORY(mc_compare, mc, static int heap_region_compare(void *d1, void *d2, size_t size); -static int compare_stack(stack_region_t s1, stack_region_t s2, void *sp1, void *sp2, void *heap1, void *heap2, xbt_dynar_t equals); static int is_heap_equality(xbt_dynar_t equals, void *a1, void *a2); static size_t heap_ignore_size(void *address); @@ -20,7 +19,8 @@ static void stack_region_free(stack_region_t s); static void heap_equality_free(heap_equality_t e); static int is_stack_ignore_variable(char *frame, char *var_name); -static int compare_local_variables(char *s1, char *s2, xbt_dynar_t heap_equals); +static int compare_local_variables(char *s1, char *s2); +static int compare_global_variables(int region_type, void *d1, void *d2); static size_t heap_ignore_size(void *address){ unsigned int cursor = 0; @@ -50,6 +50,7 @@ static int compare_global_variables(int region_type, void *d1, void *d2){ global_variable_t current_var; int pointer_align; void *addr_pointed1 = NULL, *addr_pointed2 = NULL; + int res_compare = 0; if(region_type == 1){ /* libsimgrid */ xbt_dynar_foreach(mc_global_variables, cursor, current_var){ @@ -62,14 +63,27 @@ static int compare_global_variables(int region_type, void *d1, void *d2){ pointer_align = (i / sizeof(void*)) * sizeof(void*); addr_pointed1 = *((void **)((char *)d1 + offset + pointer_align)); addr_pointed2 = *((void **)((char *)d2 + offset + pointer_align)); - if((addr_pointed1 > start_plt_libsimgrid && addr_pointed1 < end_plt_libsimgrid) || (addr_pointed2 > start_plt_libsimgrid && addr_pointed2 < end_plt_libsimgrid)){ + if((addr_pointed1 > start_plt_libsimgrid && addr_pointed1 < end_plt_libsimgrid) + || (addr_pointed2 > start_plt_libsimgrid && addr_pointed2 < end_plt_libsimgrid)){ i = current_var->size; continue; }else{ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_verbose)){ - XBT_VERB("Different global variable in libsimgrid : %s at addresses %p - %p (size = %zu)", current_var->name, (char *)d1+offset, (char *)d2+offset, current_var->size); + if((addr_pointed1 > std_heap) && ((char *)addr_pointed1 < (char *)std_heap + STD_HEAP_SIZE) + && (addr_pointed2 > std_heap) && ((char *)addr_pointed2 < (char *)std_heap + STD_HEAP_SIZE)){ + res_compare = compare_area(addr_pointed1, addr_pointed2, NULL); + if(res_compare == 1){ + #ifdef MC_VERBOSE + XBT_VERB("Different global variable in libsimgrid : %s at addresses %p - %p (size = %zu)", current_var->name, (char *)d1+offset, (char *)d2+offset, current_var->size); + #endif + return 1; + } + }else{ + #ifdef MC_VERBOSE + XBT_VERB("Different global variable in libsimgrid : %s at addresses %p - %p (size = %zu)", current_var->name, (char *)d1+offset, (char *)d2+offset, current_var->size); + #endif + return 1; } - return 1; + } } i++; @@ -90,10 +104,20 @@ static int compare_global_variables(int region_type, void *d1, void *d2){ i = current_var->size; continue; }else{ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_verbose)){ - XBT_VERB("Different global variable in binary : %s", current_var->name); + if((addr_pointed1 > std_heap) && ((char *)addr_pointed1 < (char *)std_heap + STD_HEAP_SIZE) && (addr_pointed2 > std_heap) && ((char *)addr_pointed2 < (char *)std_heap + STD_HEAP_SIZE)){ + res_compare = compare_area(addr_pointed1, addr_pointed2, NULL); + if(res_compare == 1){ + #ifdef MC_VERBOSE + XBT_VERB("Different global variable in binary : %s at addresses %p - %p (size = %zu)", current_var->name, (char *)d1+offset, (char *)d2+offset, current_var->size); + #endif + return 1; + } + }else{ + #ifdef MC_VERBOSE + XBT_VERB("Different global variable in binary : %s at addresses %p - %p (size = %zu)", current_var->name, (char *)d1+offset, (char *)d2+offset, current_var->size); + #endif + return 1; } - return 1; } } i++; @@ -133,9 +157,7 @@ void stack_region_free_voidp(void *s){ } static void heap_equality_free(heap_equality_t e){ - if(e){ - xbt_free(e); - } + xbt_free(e); } void heap_equality_free_voidp(void *e){ @@ -144,375 +166,281 @@ void heap_equality_free_voidp(void *e){ int SIMIX_pre_mc_compare_snapshots(smx_simcall_t simcall, mc_snapshot_t s1, mc_snapshot_t s2){ - return snapshot_compare(s1, s2, NULL, NULL); -} - -int get_heap_region_index(mc_snapshot_t s){ - int i = 0; - while(i < s->num_reg){ - switch(s->regions[i]->type){ - case 0: - return i; - break; - default: - i++; - break; - } - } - return -1; + return snapshot_compare(s1, s2); } -int snapshot_compare(mc_snapshot_t s1, mc_snapshot_t s2, mc_comparison_times_t ct1, mc_comparison_times_t ct2){ +int snapshot_compare(mc_snapshot_t s1, mc_snapshot_t s2){ int raw_mem = (mmalloc_get_current_heap() == raw_heap); MC_SET_RAW_MEM; - - int errors = 0, i = 0; - - if(ct1 != NULL) - ct1->nb_comparisons++; - if(ct2 != NULL) - ct2->nb_comparisons++; + + int errors = 0; xbt_os_timer_t global_timer = xbt_os_timer_new(); xbt_os_timer_t timer = xbt_os_timer_new(); xbt_os_timer_start(global_timer); - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)) + #ifdef MC_DEBUG xbt_os_timer_start(timer); + #endif /* Compare number of processes */ if(s1->nb_processes != s2->nb_processes){ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ - xbt_os_timer_stop(timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->chunks_used_comparison_times, double, xbt_os_timer_elapsed(timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->chunks_used_comparison_times, double, xbt_os_timer_elapsed(timer)); - XBT_DEBUG("Different number of processes : %d - %d", s1->nb_processes, s2->nb_processes); - errors++; - }else{ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_verbose)) - XBT_VERB("Different number of processes : %d - %d", s1->nb_processes, s2->nb_processes); + #ifdef MC_DEBUG + xbt_os_timer_stop(timer); + mc_comp_times->nb_processes_comparison_time = xbt_os_timer_elapsed(timer); + XBT_DEBUG("Different number of processes : %d - %d", s1->nb_processes, s2->nb_processes); + errors++; + #else + #ifdef MC_VERBOSE + XBT_VERB("Different number of processes : %d - %d", s1->nb_processes, s2->nb_processes); + #endif - xbt_os_timer_free(timer); - xbt_os_timer_stop(global_timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - xbt_os_timer_free(global_timer); + xbt_os_timer_free(timer); + xbt_os_timer_stop(global_timer); + mc_snapshot_comparison_time = xbt_os_timer_elapsed(global_timer); + xbt_os_timer_free(global_timer); - if(!raw_mem) - MC_UNSET_RAW_MEM; + if(!raw_mem) + MC_UNSET_RAW_MEM; - return 1; - } + return 1; + #endif } - /* Compare number of blocks/fragments used in each heap */ - - if(s1->heap_chunks_used != s2->heap_chunks_used){ + #ifdef MC_DEBUG + xbt_os_timer_start(timer); + #endif - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ + /* Compare number of bytes used in each heap */ + if(s1->heap_bytes_used != s2->heap_bytes_used){ + #ifdef MC_DEBUG xbt_os_timer_stop(timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->chunks_used_comparison_times, double, xbt_os_timer_elapsed(timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->chunks_used_comparison_times, double, xbt_os_timer_elapsed(timer)); - XBT_DEBUG("Different number of chunks used in each heap : %zu - %zu", s1->heap_chunks_used, s2->heap_chunks_used); + mc_comp_times->bytes_used_comparison_time = xbt_os_timer_elapsed(timer); + XBT_DEBUG("Different number of bytes used in each heap : %zu - %zu", s1->heap_bytes_used, s2->heap_bytes_used); errors++; - }else{ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_verbose)) - XBT_VERB("Different number of chunks used in each heap : %zu - %zu", s1->heap_chunks_used, s2->heap_chunks_used); - + #else + #ifdef MC_VERBOSE + XBT_VERB("Different number of bytes used in each heap : %zu - %zu", s1->heap_bytes_used, s2->heap_bytes_used); + #endif + xbt_os_timer_free(timer); xbt_os_timer_stop(global_timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); + mc_snapshot_comparison_time = xbt_os_timer_elapsed(global_timer); xbt_os_timer_free(global_timer); if(!raw_mem) MC_UNSET_RAW_MEM; return 1; - } + #endif }else{ - - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)) + #ifdef MC_DEBUG xbt_os_timer_stop(timer); + #endif } - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)) + #ifdef MC_DEBUG xbt_os_timer_start(timer); + #endif /* Compare size of stacks */ - - unsigned int cursor = 0; + int i = 0; size_t size_used1, size_used2; int is_diff = 0; - while(cursor < xbt_dynar_length(stacks_areas)){ - size_used1 = ((mc_snapshot_stack_t)xbt_dynar_get_as(s1->stacks, cursor, mc_snapshot_stack_t))->size_used; - size_used2 = ((mc_snapshot_stack_t)xbt_dynar_get_as(s2->stacks, cursor, mc_snapshot_stack_t))->size_used; + while(i < xbt_dynar_length(s1->stacks)){ + size_used1 = s1->stack_sizes[i]; + size_used2 = s2->stack_sizes[i]; if(size_used1 != size_used2){ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ - if(is_diff == 0){ - xbt_os_timer_stop(timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->stacks_sizes_comparison_times, double, xbt_os_timer_elapsed(timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->stacks_sizes_comparison_times, double, xbt_os_timer_elapsed(timer)); - } - XBT_DEBUG("Different size used in stacks : %zu - %zu", size_used1, size_used2); - errors++; - is_diff = 1; - }else{ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_verbose)) - XBT_VERB("Different size used in stacks : %zu - %zu", size_used1, size_used2); + #ifdef MC_DEBUG + if(is_diff == 0){ + xbt_os_timer_stop(timer); + mc_comp_times->stacks_sizes_comparison_time = xbt_os_timer_elapsed(timer); + } + XBT_DEBUG("Different size used in stacks : %zu - %zu", size_used1, size_used2); + errors++; + is_diff = 1; + #else + #ifdef MC_VERBOSE + XBT_VERB("Different size used in stacks : %zu - %zu", size_used1, size_used2); + #endif - xbt_os_timer_free(timer); - xbt_os_timer_stop(global_timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - xbt_os_timer_free(global_timer); + xbt_os_timer_free(timer); + xbt_os_timer_stop(global_timer); + mc_snapshot_comparison_time = xbt_os_timer_elapsed(global_timer); + xbt_os_timer_free(global_timer); - if(!raw_mem) - MC_UNSET_RAW_MEM; + if(!raw_mem) + MC_UNSET_RAW_MEM; - return 1; - } + return 1; + #endif } - cursor++; + i++; } - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ + #ifdef MC_DEBUG if(is_diff == 0) xbt_os_timer_stop(timer); xbt_os_timer_start(timer); - } + #endif - int heap_index = 0, data_libsimgrid_index = 0, data_program_index = 0; - - /* Get index of regions */ - while(i < s1->num_reg){ - switch(s1->regions[i]->type){ - case 0: - heap_index = i; - i++; - break; - case 1: - data_libsimgrid_index = i; - i++; - while( i < s1->num_reg && s1->regions[i]->type == 1) - i++; - break; - case 2: - data_program_index = i; - i++; - while( i < s1->num_reg && s1->regions[i]->type == 2) - i++; - break; - } - } + /* Init heap information used in heap comparison algorithm */ + init_heap_information((xbt_mheap_t)s1->regions[0]->data, (xbt_mheap_t)s2->regions[0]->data, s1->to_ignore, s2->to_ignore); /* Compare binary global variables */ - - is_diff = compare_global_variables(s1->regions[data_program_index]->type, s1->regions[data_program_index]->data, s2->regions[data_program_index]->data); + is_diff = compare_global_variables(2, s1->regions[2]->data, s2->regions[2]->data); if(is_diff != 0){ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ + #ifdef MC_DEBUG xbt_os_timer_stop(timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->binary_global_variables_comparison_times, double, xbt_os_timer_elapsed(timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->binary_global_variables_comparison_times, double, xbt_os_timer_elapsed(timer)); + mc_comp_times->binary_global_variables_comparison_time = xbt_os_timer_elapsed(timer); XBT_DEBUG("Different global variables in binary"); errors++; - }else{ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_verbose)) + #else + #ifdef MC_VERBOSE XBT_VERB("Different global variables in binary"); + #endif xbt_os_timer_free(timer); xbt_os_timer_stop(global_timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); + mc_snapshot_comparison_time = xbt_os_timer_elapsed(global_timer); xbt_os_timer_free(global_timer); if(!raw_mem) MC_UNSET_RAW_MEM; return 1; - } + #endif } - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ + #ifdef MC_DEBUG if(is_diff == 0) xbt_os_timer_stop(timer); xbt_os_timer_start(timer); - } + #endif /* Compare libsimgrid global variables */ - - is_diff = compare_global_variables(s1->regions[data_libsimgrid_index]->type, s1->regions[data_libsimgrid_index]->data, s2->regions[data_libsimgrid_index]->data); + is_diff = compare_global_variables(1, s1->regions[1]->data, s2->regions[1]->data); if(is_diff != 0){ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ + #ifdef MC_DEBUG xbt_os_timer_stop(timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->libsimgrid_global_variables_comparison_times, double, xbt_os_timer_elapsed(timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->libsimgrid_global_variables_comparison_times, double, xbt_os_timer_elapsed(timer)); + mc_comp_times->libsimgrid_global_variables_comparison_time = xbt_os_timer_elapsed(timer); XBT_DEBUG("Different global variables in libsimgrid"); errors++; - }else{ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_verbose)) + #else + #ifdef MC_VERBOSE XBT_VERB("Different global variables in libsimgrid"); + #endif xbt_os_timer_free(timer); xbt_os_timer_stop(global_timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); + mc_snapshot_comparison_time = xbt_os_timer_elapsed(global_timer); xbt_os_timer_free(global_timer); if(!raw_mem) MC_UNSET_RAW_MEM; return 1; - } + #endif } - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ + #ifdef MC_DEBUG if(is_diff == 0) xbt_os_timer_stop(timer); xbt_os_timer_start(timer); - } + #endif - /* Compare heap */ + /* Stacks comparison */ + unsigned int cursor = 0; + int diff_local = 0; + is_diff = 0; + + while(cursor < xbt_dynar_length(s1->stacks)){ + diff_local = compare_local_variables(((mc_snapshot_stack_t)xbt_dynar_get_as(s1->stacks, cursor, mc_snapshot_stack_t))->local_variables->data, ((mc_snapshot_stack_t)xbt_dynar_get_as(s2->stacks, cursor, mc_snapshot_stack_t))->local_variables->data); + if(diff_local > 0){ + #ifdef MC_DEBUG + if(is_diff == 0){ + xbt_os_timer_stop(timer); + mc_comp_times->stacks_comparison_time = xbt_os_timer_elapsed(timer); + } + XBT_DEBUG("Different local variables between stacks %d", cursor + 1); + errors++; + is_diff = 1; + #else + + #ifdef MC_VERBOSE + XBT_VERB("Different local variables between stacks %d", cursor + 1); + #endif + + reset_heap_information(); + xbt_os_timer_free(timer); + xbt_os_timer_stop(global_timer); + mc_snapshot_comparison_time = xbt_os_timer_elapsed(global_timer); + xbt_os_timer_free(global_timer); + + if(!raw_mem) + MC_UNSET_RAW_MEM; + + return 1; + #endif + } + cursor++; + } + + #ifdef MC_DEBUG + xbt_os_timer_start(timer); + #endif - xbt_dynar_t stacks1 = xbt_dynar_new(sizeof(stack_region_t), stack_region_free_voidp); - xbt_dynar_t stacks2 = xbt_dynar_new(sizeof(stack_region_t), stack_region_free_voidp); - xbt_dynar_t equals = xbt_dynar_new(sizeof(heap_equality_t), heap_equality_free_voidp); - - void *heap1 = s1->regions[heap_index]->data, *heap2 = s2->regions[heap_index]->data; + /* Compare heap */ - if(mmalloc_compare_heap((xbt_mheap_t)s1->regions[heap_index]->data, (xbt_mheap_t)s2->regions[heap_index]->data, &stacks1, &stacks2, &equals)){ + if(mmalloc_compare_heap((xbt_mheap_t)s1->regions[0]->data, (xbt_mheap_t)s2->regions[0]->data)){ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ + #ifdef MC_DEBUG xbt_os_timer_stop(timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->heap_comparison_times, double, xbt_os_timer_elapsed(timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->heap_comparison_times, double, xbt_os_timer_elapsed(timer)); + mc_comp_times->heap_comparison_time = xbt_os_timer_elapsed(timer); XBT_DEBUG("Different heap (mmalloc_compare)"); errors++; - }else{ + #else xbt_os_timer_free(timer); - xbt_dynar_free(&stacks1); - xbt_dynar_free(&stacks2); - xbt_dynar_free(&equals); - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_verbose)) + #ifdef MC_VERBOSE XBT_VERB("Different heap (mmalloc_compare)"); + #endif + reset_heap_information(); xbt_os_timer_stop(global_timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); + mc_snapshot_comparison_time = xbt_os_timer_elapsed(global_timer); xbt_os_timer_free(global_timer); if(!raw_mem) MC_UNSET_RAW_MEM; return 1; - } + #endif }else{ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)) + #ifdef MC_DEBUG xbt_os_timer_stop(timer); + #endif } - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)) - xbt_os_timer_start(timer); - - /* Stacks comparison */ - - cursor = 0; - stack_region_t stack_region1, stack_region2; - int diff = 0, diff_local = 0; - void *sp1, *sp2; - is_diff = 0; - - while(cursor < xbt_dynar_length(stacks1)){ - stack_region1 = (stack_region_t)(xbt_dynar_get_as(stacks1, cursor, stack_region_t)); - stack_region2 = (stack_region_t)(xbt_dynar_get_as(stacks2, cursor, stack_region_t)); - sp1 = ((mc_snapshot_stack_t)xbt_dynar_get_as(s1->stacks, cursor, mc_snapshot_stack_t))->stack_pointer; - sp2 = ((mc_snapshot_stack_t)xbt_dynar_get_as(s2->stacks, cursor, mc_snapshot_stack_t))->stack_pointer; - diff = compare_stack(stack_region1, stack_region2, sp1, sp2, heap1, heap2, equals); - - if(diff > 0){ /* Differences may be due to padding */ - diff_local = compare_local_variables(((mc_snapshot_stack_t)xbt_dynar_get_as(s1->stacks, cursor, mc_snapshot_stack_t))->local_variables->data, ((mc_snapshot_stack_t)xbt_dynar_get_as(s2->stacks, cursor, mc_snapshot_stack_t))->local_variables->data, equals); - if(diff_local > 0){ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ - if(is_diff == 0){ - xbt_os_timer_stop(timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->stacks_comparison_times, double, xbt_os_timer_elapsed(timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->stacks_comparison_times, double, xbt_os_timer_elapsed(timer)); - } - XBT_DEBUG("Different local variables between stacks %d", cursor + 1); - errors++; - is_diff = 1; - }else{ - xbt_dynar_free(&stacks1); - xbt_dynar_free(&stacks2); - xbt_dynar_free(&equals); - - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_verbose)) - XBT_VERB("Different local variables between stacks %d", cursor + 1); - - xbt_os_timer_free(timer); - xbt_os_timer_stop(global_timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - xbt_os_timer_free(global_timer); - - if(!raw_mem) - MC_UNSET_RAW_MEM; - - return 1; - } - } - } - cursor++; - } - - xbt_dynar_free(&stacks1); - xbt_dynar_free(&stacks2); - xbt_dynar_free(&equals); + reset_heap_information(); xbt_os_timer_free(timer); - if(!XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_debug)){ + #ifdef MC_VERBOSE xbt_os_timer_stop(global_timer); - if(ct1 != NULL) - xbt_dynar_push_as(ct1->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - if(ct2 != NULL) - xbt_dynar_push_as(ct2->snapshot_comparison_times, double, xbt_os_timer_elapsed(global_timer)); - } + mc_snapshot_comparison_time = xbt_os_timer_elapsed(global_timer); + #endif + xbt_os_timer_free(global_timer); + #ifdef MC_DEBUG + print_comparison_times(); + #endif + if(!raw_mem) MC_UNSET_RAW_MEM; @@ -547,7 +475,7 @@ static int is_stack_ignore_variable(char *frame, char *var_name){ return 0; } -static int compare_local_variables(char *s1, char *s2, xbt_dynar_t heap_equals){ +static int compare_local_variables(char *s1, char *s2){ xbt_dynar_t tokens1 = xbt_str_split(s1, NULL); xbt_dynar_t tokens2 = xbt_str_split(s2, NULL); @@ -555,38 +483,68 @@ static int compare_local_variables(char *s1, char *s2, xbt_dynar_t heap_equals){ xbt_dynar_t s_tokens1, s_tokens2; unsigned int cursor = 0; void *addr1, *addr2; - char *ip1 = NULL, *ip2 = NULL; - + char *frame_name1 = NULL, *frame_name2 = NULL; + int res_compare = 0; + + #ifdef MC_VERBOSE + char *var_name; + #endif + while(cursor < xbt_dynar_length(tokens1)){ s_tokens1 = xbt_str_split(xbt_dynar_get_as(tokens1, cursor, char *), "="); s_tokens2 = xbt_str_split(xbt_dynar_get_as(tokens2, cursor, char *), "="); if(xbt_dynar_length(s_tokens1) > 1 && xbt_dynar_length(s_tokens2) > 1){ - if((strcmp(xbt_dynar_get_as(s_tokens1, 0, char *), "ip") == 0) && (strcmp(xbt_dynar_get_as(s_tokens2, 0, char *), "ip") == 0)){ - xbt_free(ip1); - xbt_free(ip2); - ip1 = strdup(xbt_dynar_get_as(s_tokens1, 1, char *)); - ip2 = strdup(xbt_dynar_get_as(s_tokens2, 1, char *)); + #ifdef MC_VERBOSE + var_name = xbt_dynar_get_as(s_tokens1, 0, char *); + #endif + if((strcmp(xbt_dynar_get_as(s_tokens1, 0, char *), "frame_name") == 0) && (strcmp(xbt_dynar_get_as(s_tokens2, 0, char *), "frame_name") == 0)){ + xbt_free(frame_name1); + xbt_free(frame_name2); + frame_name1 = strdup(xbt_dynar_get_as(s_tokens1, 1, char *)); + frame_name2 = strdup(xbt_dynar_get_as(s_tokens2, 1, char *)); } - if(strcmp(xbt_dynar_get_as(s_tokens1, 1, char *), xbt_dynar_get_as(s_tokens2, 1, char *)) != 0){ - /* Ignore this variable ? */ - if(is_stack_ignore_variable(ip1, xbt_dynar_get_as(s_tokens1, 0, char *)) && is_stack_ignore_variable(ip2, xbt_dynar_get_as(s_tokens2, 0, char *))){ - xbt_dynar_free(&s_tokens1); - xbt_dynar_free(&s_tokens2); - cursor++; - continue; + addr1 = (void *) strtoul(xbt_dynar_get_as(s_tokens1, 1, char *), NULL, 16); + addr2 = (void *) strtoul(xbt_dynar_get_as(s_tokens2, 1, char *), NULL, 16); + if(addr1 > std_heap && (char *)addr1 <= (char *)std_heap + STD_HEAP_SIZE && addr2 > std_heap && (char *)addr2 <= (char *)std_heap + STD_HEAP_SIZE){ + res_compare = compare_area(addr1, addr2, NULL); + if(res_compare == 1){ + if(is_stack_ignore_variable(frame_name1, xbt_dynar_get_as(s_tokens1, 0, char *)) && is_stack_ignore_variable(frame_name2, xbt_dynar_get_as(s_tokens2, 0, char *))){ + xbt_dynar_free(&s_tokens1); + xbt_dynar_free(&s_tokens2); + cursor++; + continue; + }else { + #ifdef MC_VERBOSE + XBT_VERB("Different local variable : %s at addresses %p - %p", var_name, addr1, addr2); + #endif + xbt_dynar_free(&s_tokens1); + xbt_dynar_free(&s_tokens2); + xbt_dynar_free(&tokens1); + xbt_dynar_free(&tokens2); + xbt_free(frame_name1); + xbt_free(frame_name2); + return 1; + } } - addr1 = (void *) strtoul(xbt_dynar_get_as(s_tokens1, 1, char *), NULL, 16); - addr2 = (void *) strtoul(xbt_dynar_get_as(s_tokens2, 1, char *), NULL, 16); - if(is_heap_equality(heap_equals, addr1, addr2) == 0){ - if(XBT_LOG_ISENABLED(mc_compare, xbt_log_priority_verbose)) - XBT_VERB("Variable %s is different between stacks in %s : %s - %s", xbt_dynar_get_as(s_tokens1, 0, char *), ip1, xbt_dynar_get_as(s_tokens1, 1, char *), xbt_dynar_get_as(s_tokens2, 1, char *)); - xbt_dynar_free(&s_tokens1); - xbt_dynar_free(&s_tokens2); - xbt_dynar_free(&tokens1); - xbt_dynar_free(&tokens2); - xbt_free(ip1); - xbt_free(ip2); - return 1; + }else{ + if(strcmp(xbt_dynar_get_as(s_tokens1, 1, char *), xbt_dynar_get_as(s_tokens2, 1, char *)) != 0){ + if(is_stack_ignore_variable(frame_name1, xbt_dynar_get_as(s_tokens1, 0, char *)) && is_stack_ignore_variable(frame_name2, xbt_dynar_get_as(s_tokens2, 0, char *))){ + xbt_dynar_free(&s_tokens1); + xbt_dynar_free(&s_tokens2); + cursor++; + continue; + }else { + #ifdef MC_VERBOSE + XBT_VERB("Different local variable : %s (%s - %s)", var_name, xbt_dynar_get_as(s_tokens1, 1, char *), xbt_dynar_get_as(s_tokens2, 1, char *)); + #endif + xbt_dynar_free(&s_tokens1); + xbt_dynar_free(&s_tokens2); + xbt_dynar_free(&tokens1); + xbt_dynar_free(&tokens2); + xbt_free(frame_name1); + xbt_free(frame_name2); + return 1; + } } } } @@ -596,8 +554,8 @@ static int compare_local_variables(char *s1, char *s2, xbt_dynar_t heap_equals){ cursor++; } - xbt_free(ip1); - xbt_free(ip2); + xbt_free(frame_name1); + xbt_free(frame_name2); xbt_dynar_free(&tokens1); xbt_dynar_free(&tokens2); return 0; @@ -632,37 +590,6 @@ static int is_heap_equality(xbt_dynar_t equals, void *a1, void *a2){ } - -static int compare_stack(stack_region_t s1, stack_region_t s2, void *sp1, void *sp2, void *heap1, void *heap2, xbt_dynar_t equals){ - - size_t k = 0; - size_t size_used1 = s1->size - ((char*)sp1 - (char*)s1->address); - size_t size_used2 = s2->size - ((char*)sp2 - (char*)s2->address); - - int pointer_align; - void *addr_pointed1 = NULL, *addr_pointed2 = NULL; - - while(k < size_used1){ - if(memcmp((char *)s1->address + s1->size - k, (char *)s2->address + s2->size - k, 1) != 0){ - pointer_align = ((size_used1 - k) / sizeof(void*)) * sizeof(void*); - addr_pointed1 = *((void **)(((char*)s1->address + (s1->size - size_used1)) + pointer_align)); - addr_pointed2 = *((void **)(((char*)s2->address + (s2->size - size_used2)) + pointer_align)); - if(is_heap_equality(equals, addr_pointed1, addr_pointed2) == 0){ - if((addr_pointed1 > std_heap) && (addr_pointed1 < (void *)((char *)std_heap + STD_HEAP_SIZE)) && (addr_pointed2 > std_heap) && (addr_pointed2 < (void *)((char *)std_heap + STD_HEAP_SIZE))){ - if(is_free_area(addr_pointed1, (xbt_mheap_t)heap1) == 0 || is_free_area(addr_pointed2, (xbt_mheap_t)heap2) == 0){ - return 1; - } - }else{ - return 1; - } - } - } - k++; - } - - return 0; -} - int MC_compare_snapshots(void *s1, void *s2){ MC_ignore_stack("self", "simcall_BODY_mc_snapshot"); @@ -670,3 +597,14 @@ int MC_compare_snapshots(void *s1, void *s2){ return simcall_mc_compare_snapshots(s1, s2); } + +void print_comparison_times(){ + XBT_DEBUG("*** Comparison times ***"); + XBT_DEBUG("- Nb processes : %f", mc_comp_times->nb_processes_comparison_time); + XBT_DEBUG("- Nb bytes used : %f", mc_comp_times->bytes_used_comparison_time); + XBT_DEBUG("- Stacks sizes : %f", mc_comp_times->stacks_sizes_comparison_time); + XBT_DEBUG("- Binary global variables : %f", mc_comp_times->binary_global_variables_comparison_time); + XBT_DEBUG("- Libsimgrid global variables : %f", mc_comp_times->libsimgrid_global_variables_comparison_time); + XBT_DEBUG("- Heap : %f", mc_comp_times->heap_comparison_time); + XBT_DEBUG("- Stacks : %f", mc_comp_times->stacks_comparison_time); +}