X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/470b276614f45ce71f58dad1c2ab118aa3e4d1bb..c9915805944cfa61187e82d2139703b99716fbf9:/examples/simdag/dot/dot_test.c diff --git a/examples/simdag/dot/dot_test.c b/examples/simdag/dot/dot_test.c index 2d72a6c88f..c54aece092 100644 --- a/examples/simdag/dot/dot_test.c +++ b/examples/simdag/dot/dot_test.c @@ -14,111 +14,111 @@ #include XBT_LOG_NEW_DEFAULT_CATEGORY(test, - "Logging specific to this SimDag example"); + "Logging specific to this SimDag example"); static int name_compare_hosts(const void *n1, const void *n2) { - char name1[80], name2[80]; - strcpy(name1, SD_workstation_get_name(*((SD_workstation_t *) n1))); - strcpy(name2, SD_workstation_get_name(*((SD_workstation_t *) n2))); + char name1[80], name2[80]; + strcpy(name1, SD_workstation_get_name(*((SD_workstation_t *) n1))); + strcpy(name2, SD_workstation_get_name(*((SD_workstation_t *) n2))); - return strcmp(name1, name2); + return strcmp(name1, name2); } int main(int argc, char **argv) { - xbt_dynar_t dot, changed; - unsigned int cursor; - SD_task_t task; - - /* initialisation of SD */ - SD_init(&argc, argv); - - /* Check our arguments */ - if (argc < 3) { - INFO1("Usage: %s platform_file dot_file [trace_file]", argv[0]); - INFO1("example: %s ../sd_platform.xml Montage_50.xml Montage_50.mytrace", argv[0]); - exit(1); - } - char *tracefilename; - if (argc == 3) { - char *last=strrchr(argv[2],'.'); - - tracefilename=bprintf("%.*s.trace",(int)(last==NULL?strlen(argv[2]):last-argv[2]),argv[2]); - } else { - tracefilename = xbt_strdup(argv[3]); - } - - /* creation of the environment */ - SD_create_environment(argv[1]); - - /* load the DAX file */ - dot=SD_dotload(argv[2]); - - /* Display all the tasks */ - INFO0("------------------- Display all tasks of the loaded DAG ---------------------------"); - xbt_dynar_foreach(dot,cursor,task) { - SD_task_dump(task); - } - - FILE *dotout = fopen("dot.dot","w"); - fprintf(dotout,"digraph A {\n"); - xbt_dynar_foreach(dot,cursor,task) { - SD_task_dotty(task,dotout); - } - fprintf(dotout,"}\n"); - fclose(dotout); - - /* Schedule them all on the first workstation */ - INFO0("------------------- Schedule tasks ---------------------------"); - const SD_workstation_t *ws_list = SD_workstation_get_list(); - int totalHosts = SD_workstation_get_number(); - qsort((void *) ws_list, totalHosts, sizeof(SD_workstation_t), - name_compare_hosts); - - int count = SD_workstation_get_number(); - xbt_dynar_foreach(dot,cursor,task) { - if (SD_task_get_kind(task) == SD_TASK_COMP_SEQ) { - if (!strcmp(SD_task_get_name(task),"end")) - SD_task_schedulel(task,1,ws_list[0]); - else - SD_task_schedulel(task,1,ws_list[cursor%count]); - } - } - - INFO0("------------------- Run the schedule ---------------------------"); - changed = SD_simulate(-1); - xbt_dynar_free_container(&changed); - INFO0("------------------- Produce the trace file---------------------------"); - INFO1("Producing the trace of the run into %s",tracefilename); - FILE*out = fopen(tracefilename,"w"); - xbt_assert1(out,"Cannot write to %s",tracefilename); - free(tracefilename); - - xbt_dynar_foreach(dot,cursor,task) { - int kind = SD_task_get_kind(task); - SD_workstation_t *wsl = SD_task_get_workstation_list(task); - switch (kind) { - case SD_TASK_COMP_SEQ: - fprintf(out,"[%f] %s compute %f # %s\n",SD_task_get_start_time(task), - SD_workstation_get_name(wsl[0]),SD_task_get_amount(task), - SD_task_get_name(task)); - break; - case SD_TASK_COMM_E2E: - fprintf(out,"[%f] %s send %s %f # %s\n",SD_task_get_start_time(task), - SD_workstation_get_name(wsl[0]),SD_workstation_get_name(wsl[1]), - SD_task_get_amount(task), SD_task_get_name(task)); - fprintf(out,"[%f] %s recv %s %f # %s\n",SD_task_get_finish_time(task), - SD_workstation_get_name(wsl[1]),SD_workstation_get_name(wsl[0]), - SD_task_get_amount(task), SD_task_get_name(task)); - break; - default: - xbt_die(bprintf("Task %s is of unknown kind %d",SD_task_get_name(task),SD_task_get_kind(task))); - } - SD_task_destroy(task); - } - fclose(out); - - /* exit */ - SD_exit(); - return 0; + xbt_dynar_t dot, changed; + unsigned int cursor; + SD_task_t task; + + /* initialisation of SD */ + SD_init(&argc, argv); + + /* Check our arguments */ + if (argc < 3) { + INFO1("Usage: %s platform_file dot_file [trace_file]", argv[0]); + INFO1("example: %s ../sd_platform.xml Montage_50.xml Montage_50.mytrace", argv[0]); + exit(1); + } + char *tracefilename; + if (argc == 3) { + char *last=strrchr(argv[2],'.'); + + tracefilename=bprintf("%.*s.trace",(int)(last==NULL?strlen(argv[2]):last-argv[2]),argv[2]); + } else { + tracefilename = xbt_strdup(argv[3]); + } + + /* creation of the environment */ + SD_create_environment(argv[1]); + + /* load the DAX file */ + dot=SD_dotload(argv[2]); + + /* Display all the tasks */ + INFO0("------------------- Display all tasks of the loaded DAG ---------------------------"); + xbt_dynar_foreach(dot,cursor,task) { + SD_task_dump(task); + } + + FILE *dotout = fopen("dot.dot","w"); + fprintf(dotout,"digraph A {\n"); + xbt_dynar_foreach(dot,cursor,task) { + SD_task_dotty(task,dotout); + } + fprintf(dotout,"}\n"); + fclose(dotout); + + /* Schedule them all on the first workstation */ + INFO0("------------------- Schedule tasks ---------------------------"); + const SD_workstation_t *ws_list = SD_workstation_get_list(); + int totalHosts = SD_workstation_get_number(); + qsort((void *) ws_list, totalHosts, sizeof(SD_workstation_t), + name_compare_hosts); + + int count = SD_workstation_get_number(); + xbt_dynar_foreach(dot,cursor,task) { + if (SD_task_get_kind(task) == SD_TASK_COMP_SEQ) { + if (!strcmp(SD_task_get_name(task),"end")) + SD_task_schedulel(task,1,ws_list[0]); + else + SD_task_schedulel(task,1,ws_list[cursor%count]); + } + } + + INFO0("------------------- Run the schedule ---------------------------"); + changed = SD_simulate(-1); + xbt_dynar_free_container(&changed); + INFO0("------------------- Produce the trace file---------------------------"); + INFO1("Producing the trace of the run into %s",tracefilename); + FILE*out = fopen(tracefilename,"w"); + xbt_assert1(out,"Cannot write to %s",tracefilename); + free(tracefilename); + + xbt_dynar_foreach(dot,cursor,task) { + int kind = SD_task_get_kind(task); + SD_workstation_t *wsl = SD_task_get_workstation_list(task); + switch (kind) { + case SD_TASK_COMP_SEQ: + fprintf(out,"[%f] %s compute %f # %s\n",SD_task_get_start_time(task), + SD_workstation_get_name(wsl[0]),SD_task_get_amount(task), + SD_task_get_name(task)); + break; + case SD_TASK_COMM_E2E: + fprintf(out,"[%f] %s send %s %f # %s\n",SD_task_get_start_time(task), + SD_workstation_get_name(wsl[0]),SD_workstation_get_name(wsl[1]), + SD_task_get_amount(task), SD_task_get_name(task)); + fprintf(out,"[%f] %s recv %s %f # %s\n",SD_task_get_finish_time(task), + SD_workstation_get_name(wsl[1]),SD_workstation_get_name(wsl[0]), + SD_task_get_amount(task), SD_task_get_name(task)); + break; + default: + xbt_die(bprintf("Task %s is of unknown kind %d",SD_task_get_name(task),SD_task_get_kind(task))); + } + SD_task_destroy(task); + } + fclose(out); + + /* exit */ + SD_exit(); + return 0; }