X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/f5a0234ae3d4adeb86ed57763ff23aba502a186f..f150764ab6d151957355c437ad66146210cbf8f9:/src/mc/mc_global.c diff --git a/src/mc/mc_global.c b/src/mc/mc_global.c index 457776c8a2..7521448d9f 100644 --- a/src/mc/mc_global.c +++ b/src/mc/mc_global.c @@ -8,6 +8,7 @@ #include #include #include +#include #include "simgrid/sg_config.h" #include "../surf/surf_private.h" @@ -177,6 +178,13 @@ static void dw_variable_free_voidp(void *t){ mc_object_info_t MC_new_object_info() { mc_object_info_t res = xbt_new(s_mc_object_info_t, 1); res->file_name = NULL; + res->start_text = NULL; + res->start_data = NULL; + res->start_bss = NULL; + res->start_plt = NULL; + res->end_plt = NULL; + res->start_got_plt = NULL; + res->end_got_plt = NULL; res->local_variables = xbt_dict_new_homogeneous(NULL); res->global_variables = xbt_dynar_new(sizeof(dw_variable_t), dw_variable_free_voidp); res->types = xbt_dict_new_homogeneous(NULL); @@ -518,7 +526,9 @@ static int MC_dwarf_get_variable_index(xbt_dynar_t variables, char* var, void *a } -static mc_object_info_t MC_dwarf_get_variables(const char *elf_file){ +void MC_dwarf_get_variables(mc_object_info_t info) { + mc_object_info_t result = info; + const char *elf_file = info->file_name; xbt_dict_t location_list = MC_dwarf_get_location_list(elf_file); @@ -529,9 +539,6 @@ static mc_object_info_t MC_dwarf_get_variables(const char *elf_file){ if(fp == NULL) perror("popen for objdump failed"); - mc_object_info_t result = MC_new_object_info(); - result->file_name = xbt_strdup(elf_file); - xbt_dict_t *local_variables = &result->local_variables; xbt_dynar_t *global_variables = &result->global_variables; xbt_dict_t *types = &result->types; @@ -781,8 +788,9 @@ static mc_object_info_t MC_dwarf_get_variables(const char *elf_file){ xbt_dynar_free(&split2); split2 = xbt_str_split(loc_expr, " "); if(strcmp(elf_file, xbt_binary_name) != 0) - var->address.address = (char *)start_text_libsimgrid + (long)((void *)strtoul(xbt_dynar_get_as(split2, xbt_dynar_length(split2) - 1, char*), NULL, 16)); + var->address.address = (char *) info->start_text + (long)((void *)strtoul(xbt_dynar_get_as(split2, xbt_dynar_length(split2) - 1, char*), NULL, 16)); else + // Why is it different ? var->address.address = (void *)strtoul(xbt_dynar_get_as(split2, xbt_dynar_length(split2) - 1, char*), NULL, 16); }else{ var->address.location = MC_dwarf_get_location(NULL, loc_expr); @@ -794,8 +802,9 @@ static mc_object_info_t MC_dwarf_get_variables(const char *elf_file){ global_address = xbt_strdup(xbt_dynar_get_as(split, xbt_dynar_length(split) - 1, char *)); xbt_str_rtrim(global_address, ")"); if(strcmp(elf_file, xbt_binary_name) != 0) - var->address.address = (char *)start_text_libsimgrid + (long)((void *)strtoul(global_address, NULL, 16)); + var->address.address = (char *) info->start_text + (long)((void *)strtoul(global_address, NULL, 16)); else + // Why is it different ? var->address.address = (void *)strtoul(global_address, NULL, 16); xbt_free(global_address); global_address = NULL; @@ -1258,7 +1267,6 @@ static mc_object_info_t MC_dwarf_get_variables(const char *elf_file){ xbt_dict_free(&location_list); pclose(fp); - return result; } @@ -1734,10 +1742,24 @@ static void MC_dump_ignored_global_variables(void){ } +static void MC_init_debug_info(); +static void MC_init_debug_info() { + XBT_INFO("Get debug information ..."); + + memory_map_t maps = MC_get_memory_map(); + + /* Get local variables for state equality detection */ + mc_binary_info = MC_find_object_info(maps, xbt_binary_name); + mc_libsimgrid_info = MC_find_object_info(maps, libsimgrid_path); + + MC_free_memory_map(maps); + XBT_INFO("Get debug information done !"); +} + void MC_init(){ int raw_mem_set = (mmalloc_get_current_heap() == raw_heap); - + compare = 0; /* Initialize the data structures that must be persistent across every @@ -1746,22 +1768,11 @@ void MC_init(){ MC_SET_RAW_MEM; MC_init_memory_map_info(); - - XBT_INFO("Get debug information ..."); - - /* Get local variables for state equality detection */ - mc_binary_info = MC_dwarf_get_variables(xbt_binary_name); - mc_libsimgrid_info = MC_dwarf_get_variables(libsimgrid_path); - - XBT_INFO("Get debug information done !"); + MC_init_debug_info(); /* Remove variables ignored before getting list of variables */ MC_dump_ignored_local_variables(); MC_dump_ignored_global_variables(); - - /* Get .plt section (start and end addresses) for data libsimgrid and data program comparison */ - MC_get_libsimgrid_plt_section(); - MC_get_binary_plt_section(); /* Init parmap */ parmap = xbt_parmap_mc_new(xbt_os_get_numcores(), XBT_PARMAP_DEFAULT); @@ -1896,8 +1907,7 @@ void MC_modelcheck_safety(void) }else{ MC_SET_RAW_MEM; MC_init_memory_map_info(); - MC_get_libsimgrid_plt_section(); - MC_get_binary_plt_section(); + MC_init(); MC_UNSET_RAW_MEM; }