-/* Copyright (c) 2006, 2007, 2008, 2009, 2010. The SimGrid Team.
+/* Copyright (c) 2006-2010, 2012-2015. The SimGrid Team.
* All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
#include <stdio.h>
#include <stdlib.h>
-#include "simdag/simdag.h"
+#include "simgrid/simdag.h"
#include "xbt/ex.h"
#include "xbt/log.h"
int i;
unsigned int ctr;
const char *platform_file;
- const SD_workstation_t *workstations;
+ const sg_host_t *workstations;
SD_task_t task, seq_comp1, e2e_comm, seq_comp2;
SD_task_t par_comp1, redist, par_comp2, par_comp3;
xbt_dynar_t changed_tasks;
double computation_amount[4];
double communication_amount[16] = { 0 };
- SD_workstation_t workstation_list[4];
+ sg_host_t workstation_list[4];
/* initialization of SD */
SD_init(&argc, argv);
/* xbt_log_control_set("sd.thres=debug"); */
- if (argc < 2) {
- XBT_INFO("Usage: %s platform_file", argv[0]);
- XBT_INFO("example: %s sd_platform.xml", argv[0]);
- exit(1);
- }
+ xbt_assert(argc > 1, "Usage: %s platform_file\n"
+ "\nExample: %s two_clusters.xml", argv[0], argv[0]);
/* creation of the environment */
platform_file = argv[1];
SD_create_environment(platform_file);
- workstations = SD_workstation_get_list();
-
- for (i=0;i<SD_workstation_get_number();i++)
- XBT_INFO("%s runs at %f flops", SD_workstation_get_name(workstations[i]),
- SD_workstation_get_power(workstations[i]));
+ workstations = sg_host_list();
/* creation of some typed tasks and their dependencies */
seq_comp1 = SD_task_create_comp_seq("Seq. comp. 1", NULL, 1e9);
SD_task_schedulev(par_comp1, 4, workstations);
SD_task_schedulev(par_comp2, 3, workstations);
+ /* Let's unschedule these tasks and test the auto-scheduling in the
+ * opposite way.
+ */
+ SD_task_unschedule(par_comp1);
+ SD_task_unschedule(par_comp2);
+ SD_task_unschedule(redist); /* yes, it was scheduled too */
+
+ SD_task_schedulev(par_comp2, 3, workstations);
+ SD_task_schedulev(par_comp1, 4, workstations);
+
for (i=0;i<4;i++){
workstation_list[i]=workstations[i+4];
/* Apply Amdahl's law manually assuming a 20% serial part */
XBT_INFO("Task '%s' start time: %f, finish time: %f",
SD_task_get_name(task),
SD_task_get_start_time(task), SD_task_get_finish_time(task));
- SD_task_destroy(task);
}
+ xbt_dynar_foreach(changed_tasks, ctr, task) {
+ SD_task_destroy(task);
+ }
SD_exit();
return 0;
}