1 /* Copyright (c) 2013-2014. The SimGrid Team.
2 * All rights reserved. */
4 /* This program is free software; you can redistribute it and/or modify it
5 * under the terms of the license (GNU LGPL) which comes with this package. */
12 #include <simdag/simdag.h>
24 static void usage(char *name)
26 fprintf(stdout, "Error on parameters.\n");
27 fprintf(stdout, "usage: %s <XML environment file> <DAX file>\n", name);
30 static void checkParameters(int argc, char *argv[])
34 printf("====%d===\n",argc);
35 for(i=0; i<argc; i++) {
36 printf("\t%s\n",argv[i]);
42 /* Check that files exist */
44 if ((xmlFiles.envFile = fopen(argv[1], "r")) == NULL) {
45 fprintf(stderr, "Error while opening XML file %s.\n", argv[1]);
48 fclose(xmlFiles.envFile);
50 if ((xmlFiles.daxFile = fopen(argv[2], "r")) == NULL) {
51 fprintf(stderr, "Error while opening DAX file %s.\n", argv[2]);
54 fclose(xmlFiles.daxFile);
57 static int name_compare_hosts(const void *n1, const void *n2)
59 char name1[80], name2[80];
60 strcpy(name1, SD_workstation_get_name(*((SD_workstation_t *) n1)));
61 strcpy(name2, SD_workstation_get_name(*((SD_workstation_t *) n2)));
63 return strcmp(name1, name2);
66 static void scheduleDAX(xbt_dynar_t dax)
71 const SD_workstation_t *ws_list = SD_workstation_get_list();
72 int totalHosts = SD_workstation_get_number();
73 qsort((void *) ws_list, totalHosts, sizeof(SD_workstation_t),
76 int count = SD_workstation_get_number();
77 //fprintf(stdout, "No. workstations: %d, %d\n", count, (dax != NULL));
79 xbt_dynar_foreach(dax, cursor, task) {
80 if (SD_task_get_kind(task) == SD_TASK_COMP_SEQ) {
81 if (!strcmp(SD_task_get_name(task), "end")
82 || !strcmp(SD_task_get_name(task), "root")) {
83 fprintf(stdout, "Scheduling %s to node: %s\n", SD_task_get_name(task),
84 SD_workstation_get_name(ws_list[0]));
85 SD_task_schedulel(task, 1, ws_list[0]);
87 fprintf(stdout, "Scheduling %s to node: %s\n", SD_task_get_name(task),
88 SD_workstation_get_name(ws_list[(cursor) % count]));
89 SD_task_schedulel(task, 1, ws_list[(cursor) % count]);
95 /* static void printTasks(xbt_dynar_t completedTasks) */
97 /* unsigned int cursor; */
100 /* xbt_dynar_foreach(completedTasks, cursor, task) */
102 /* if(SD_task_get_state(task) == SD_DONE) */
104 /* fprintf(stdout, "Task done: %s, %f, %f\n", */
105 /* SD_task_get_name(task), SD_task_get_start_time(task), SD_task_get_finish_time(task)); */
111 /* void createDottyFile(xbt_dynar_t dax, char *filename) */
113 /* char filename2[1000]; */
114 /* unsigned int cursor; */
115 /* SD_task_t task; */
117 /* sprintf(filename2, "%s.dot", filename); */
118 /* FILE *dotout = fopen(filename2, "w"); */
119 /* fprintf(dotout, "digraph A {\n"); */
120 /* xbt_dynar_foreach(dax, cursor, task) */
122 /* SD_task_dotty(task, dotout); */
124 /* fprintf(dotout, "}\n"); */
125 /* fclose(dotout); */
128 static xbt_dynar_t initDynamicThrottling(int *argc, char *argv[])
133 /* Check parameters */
134 checkParameters(*argc,argv);
136 /* Create environment */
137 SD_create_environment(argv[1]);
139 xbt_dynar_t dax = SD_daxload(argv[2]);
141 // createDottyFile(dax, argv[2]);
144 fprintf(stdout, "Scheduling DAX...\n");
146 fprintf(stdout, "DAX scheduled\n");
147 xbt_dynar_t ret = SD_simulate(-1);
148 xbt_dynar_free(&ret);
149 fprintf(stdout, "Simulation end. Time: %f\n", SD_get_clock());
155 * Garbage collector :D
157 static void garbageCollector(xbt_dynar_t dax)
159 while (!xbt_dynar_is_empty(dax)) {
160 SD_task_t task = xbt_dynar_pop_as(dax, SD_task_t);
161 SD_task_destroy(task);
163 xbt_dynar_free(&dax);
175 int main(int argc, char *argv[])
178 /* Start process... */
179 xbt_dynar_t dax = initDynamicThrottling(&argc, argv);
182 garbageCollector(dax);