X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/2b1640b1ff96d9a64a02d0c9862cf81e32d73e2e..3eb2083c05f047dcdb72bcccd697687ca3ee6aac:/src/instr/jedule/jedule_output.cpp diff --git a/src/instr/jedule/jedule_output.cpp b/src/instr/jedule/jedule_output.cpp index 1bac445f37..fa047a51c8 100644 --- a/src/instr/jedule/jedule_output.cpp +++ b/src/instr/jedule/jedule_output.cpp @@ -15,29 +15,13 @@ #ifdef HAVE_JEDULE -XBT_LOG_NEW_DEFAULT_SUBCATEGORY(jed_out, jedule, - "Logging specific to Jedule output"); - -/*********************************************************/ +XBT_LOG_NEW_DEFAULT_SUBCATEGORY(jed_out, jedule, "Logging specific to Jedule output"); xbt_dynar_t jedule_event_list; static FILE *jed_file; -static void print_platform(jed_simgrid_container_t root_container); -static void print_container(jed_simgrid_container_t container); -static void print_resources(jed_simgrid_container_t resource_parent); -static void print_key_value_dict(xbt_dict_t meta_info_dict); -static void print_events(xbt_dynar_t event_list); -static void get_hierarchy_list(xbt_dynar_t hier_list, - jed_simgrid_container_t container); - -/*********************************************************/ - - -static void get_hierarchy_list(xbt_dynar_t hier_list, - jed_simgrid_container_t container) { - +static void get_hierarchy_list(xbt_dynar_t hier_list, jed_simgrid_container_t container) { xbt_assert( container != NULL ); if( container->parent != NULL ) { @@ -45,14 +29,12 @@ static void get_hierarchy_list(xbt_dynar_t hier_list, if( container->parent->container_children == NULL ) { // we are in the last level get_hierarchy_list(hier_list, container->parent); - } else { unsigned int i; int child_nb = -1; jed_simgrid_container_t child_container; - xbt_dynar_foreach(container->parent->container_children, i, - child_container) { + xbt_dynar_foreach(container->parent->container_children, i, child_container) { if( child_container == container ) { child_nb = i; break; @@ -60,7 +42,6 @@ static void get_hierarchy_list(xbt_dynar_t hier_list, } xbt_assert( child_nb > - 1); - xbt_dynar_insert_at(hier_list, 0, &child_nb); get_hierarchy_list(hier_list, container->parent); @@ -69,23 +50,21 @@ static void get_hierarchy_list(xbt_dynar_t hier_list, int top_level = 0; xbt_dynar_insert_at(hier_list, 0, &top_level); } - } -static void get_hierarchy_string(jed_simgrid_container_t container, - char *outbuf) { +static void get_hierarchy_string(jed_simgrid_container_t container, char *outbuf) { char buf[1024]; xbt_dynar_t hier_list; unsigned int iter; int number; unsigned int length; - + outbuf[0] = '\0'; hier_list = xbt_dynar_new(sizeof(int), NULL); get_hierarchy_list(hier_list, container); - + length = xbt_dynar_length(hier_list); - + xbt_dynar_foreach(hier_list, iter, number) { if( iter != length-1 ) { sprintf(buf, "%d.", number); @@ -94,8 +73,8 @@ static void get_hierarchy_string(jed_simgrid_container_t container, } strcat(outbuf, buf); } - - xbt_dynar_free(&hier_list); + + xbt_dynar_free(&hier_list); } static void print_key_value_dict(xbt_dict_t key_value_dict) { @@ -134,8 +113,8 @@ static void print_resources(jed_simgrid_container_t resource_parent) { xbt_assert( resource_parent->resource_list != NULL ); res_nb = xbt_dynar_length(resource_parent->resource_list); - - get_hierarchy_string(resource_parent, resid); + + get_hierarchy_string(resource_parent, resid); fprintf(jed_file, " resource_list, i, res_name) { @@ -147,7 +126,6 @@ static void print_resources(jed_simgrid_container_t resource_parent) { fprintf(jed_file, "\" />\n"); } - static void print_platform(jed_simgrid_container_t root_container) { fprintf(jed_file, " \n"); print_container(root_container); @@ -158,46 +136,37 @@ static void print_event(jed_event_t event) { unsigned int i; jed_res_subset_t subset; - xbt_assert( event != NULL ); xbt_assert( event->resource_subsets != NULL ); fprintf(jed_file, " \n"); - fprintf(jed_file, " \n", event->name); - fprintf(jed_file, " \n", - event->start_time); - fprintf(jed_file, " \n", - event->end_time); + fprintf(jed_file, " \n", event->start_time); + fprintf(jed_file, " \n", event->end_time); fprintf(jed_file, " \n", event->type); fprintf(jed_file, " \n"); xbt_dynar_foreach(event->resource_subsets, i, subset) { - int start = subset->start_idx; int end = subset->start_idx + subset->nres - 1; char resid[1024]; get_hierarchy_string(subset->parent, resid); - fprintf(jed_file, "