+
+static void MC_get_global_variables(char *elf_file){
+
+ FILE *fp;
+
+ char *command = bprintf("objdump -t -j .data -j .bss %s", elf_file);
+
+ fp = popen(command, "r");
+
+ if(fp == NULL){
+ perror("popen failed");
+ xbt_abort();
+ }
+
+ if(mc_global_variables == NULL)
+ mc_global_variables = xbt_dynar_new(sizeof(global_variable_t), global_variable_free_voidp);
+
+ char *line = NULL;
+ ssize_t read;
+ size_t n = 0;
+
+ xbt_dynar_t line_tokens = NULL;
+ unsigned long offset;
+
+ int type = strcmp(elf_file, xbt_binary_name); /* 0 = binary, other = libsimgrid */
+
+ while ((read = getline(&line, &n, fp)) != -1){
+
+ if(n == 0)
+ continue;
+
+ /* Wipeout the new line character */
+ line[read - 1] = '\0';
+
+ xbt_str_strip_spaces(line);
+ xbt_str_ltrim(line, NULL);
+
+ line_tokens = xbt_str_split(line, NULL);
+
+ if(xbt_dynar_length(line_tokens) <= 4 || strcmp(xbt_dynar_get_as(line_tokens, 0, char *), "SYMBOL") == 0)
+ continue;
+
+ if((strncmp(xbt_dynar_get_as(line_tokens, xbt_dynar_length(line_tokens) - 1, char*), "__gcov", 6) == 0)
+ || (strncmp(xbt_dynar_get_as(line_tokens, xbt_dynar_length(line_tokens) - 1, char*), "gcov", 4) == 0)
+ || (strcmp(xbt_dynar_get_as(line_tokens, xbt_dynar_length(line_tokens) - 1, char*), ".data") == 0)
+ || (strcmp(xbt_dynar_get_as(line_tokens, xbt_dynar_length(line_tokens) - 1, char*), ".bss") == 0)
+ || (strncmp(xbt_dynar_get_as(line_tokens, xbt_dynar_length(line_tokens) - 1, char*), "stderr", 6) == 0)
+ || (strncmp(xbt_dynar_get_as(line_tokens, xbt_dynar_length(line_tokens) - 1, char*), "counter", 7) == 0)
+ || ((size_t)strtoul(xbt_dynar_get_as(line_tokens, xbt_dynar_length(line_tokens) - 2, char*), NULL, 16) == 0))
+ continue;
+
+ global_variable_t var = xbt_new0(s_global_variable_t, 1);
+
+ if(type == 0){
+ var->address = (void *)strtoul(xbt_dynar_get_as(line_tokens, 0, char*), NULL, 16);
+ }else{
+ offset = strtoul(xbt_dynar_get_as(line_tokens, 0, char*), NULL, 16);
+ var->address = (char *)start_text_libsimgrid+offset;
+ }
+
+ var->size = (size_t)strtoul(xbt_dynar_get_as(line_tokens, xbt_dynar_length(line_tokens) - 2, char*), NULL, 16);
+ var->name = strdup(xbt_dynar_get_as(line_tokens, xbt_dynar_length(line_tokens) - 1, char*));
+
+ if(data_bss_ignore_size(var->address) > 0)
+ global_variable_free(var);
+ else
+ xbt_dynar_push(mc_global_variables, &var);
+
+ xbt_dynar_free(&line_tokens);
+
+ }
+
+ xbt_free(command);
+ xbt_free(line);
+ pclose(fp);
+
+}
+
+void global_variable_free(global_variable_t v){
+ xbt_free(v->name);
+ xbt_free(v);
+}
+
+void global_variable_free_voidp(void *v){
+ global_variable_free((global_variable_t) * (void **) v);
+}