X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/9b753d1d450c04472b123ce8869126dfe5e3825c..7148c9208e34d627b13f5f1eae15d946e6811133:/teshsuite/simdag/basic2.c

diff --git a/teshsuite/simdag/basic2.c b/teshsuite/simdag/basic2.c
index fb40143712..f1eef64917 100644
--- a/teshsuite/simdag/basic2.c
+++ b/teshsuite/simdag/basic2.c
@@ -1,45 +1,75 @@
+/* Copyright (c) 2007-2012. The SimGrid Team.
+ * All rights reserved.                                                     */
+
+/* This program is free software; you can redistribute it and/or modify it
+ * under the terms of the license (GNU LGPL) which comes with this package. */
+
 #include <stdio.h>
 #include <stdlib.h>
 #include "simdag/simdag.h"
+#include "xbt/log.h"
+
+XBT_LOG_NEW_DEFAULT_SUBCATEGORY(basic2, sd, "SimDag test basic2");
+
+/* Basic SimDag Test 0
+ * Scenario:
+ *   - Create a no-op Init task
+ *   - Create two communication tasks: 1GB and 100MB
+ *   - Schedule them concurrently on the two hosts of the platform
+ * The two communications occur simultaneously. They share the network for the
+ * duration of the shortest one, then the longest one has the full bandwidth.
+ * Simulated time should be:
+ *          1e8/(1/2*1.25e8) + 9e8/1.25e8) + 1e-4 = 8.8001 seconds
+ */
+int main(int argc, char **argv)
+{
+
+  SD_task_t taskInit;
+  SD_task_t taskA;
+  SD_task_t taskB;
+  xbt_dynar_t ret;
 
-int main(int argc, char **argv) {
+  const SD_workstation_t *workstation;
 
-	SD_task_t taskInit;
-    SD_task_t taskA;
-    SD_task_t taskB;
+  double communication_amount1 = 1e9;
+  double communication_amount2 = 1e8;
+  double no_cost = 0.0;
 
-	const SD_workstation_t* workstation;
+  /* initialization of SD */
+  SD_init(&argc, argv);
 
-	double communication_amount1 = 1000000000;
-    double communication_amount2 = 100000000;
-    double no_cost = 0.0;
+  /* creation of the environment */
+  SD_create_environment(argv[1]);
 
-    /* initialisation of SD */
-    SD_init(&argc, argv);
+  /* creation of the tasks and their dependencies */
+  taskInit = SD_task_create("Init", NULL, 1.0);
+  taskA = SD_task_create("Task Comm A", NULL, 1.0);
+  taskB = SD_task_create("Task Comm B", NULL, 1.0);
 
-    /* creation of the environment */
-    SD_create_environment(argv[1]);
 
-    /* creation of the tasks and their dependencies */
-    taskInit = SD_task_create("Init",NULL,1.0);
-    taskA = SD_task_create("Task Comm A", NULL, 1.0);
-    taskB = SD_task_create("Task Comm B", NULL, 1.0);
+  /* scheduling parameters */
 
+  workstation = SD_workstation_get_list();
 
-    /* scheduling parameters */
+  /* let's launch the simulation! */
+  SD_task_schedule(taskInit, 1, SD_workstation_get_list(), &no_cost,
+                   &no_cost, -1.0);
+  SD_task_schedule(taskA, 1, &workstation[0], &no_cost,
+                   &communication_amount1, -1.0);
+  SD_task_schedule(taskB, 1, &workstation[1], &no_cost,
+                   &communication_amount2, -1.0);
 
-    workstation = SD_workstation_get_list();
+  SD_task_dependency_add(NULL, NULL, taskInit, taskA);
+  SD_task_dependency_add(NULL, NULL, taskInit, taskB);
 
-    /* let's launch the simulation! */
-    SD_task_schedule(taskInit, 1, SD_workstation_get_list(), &no_cost, &no_cost, -1.0);
-    SD_task_schedule(taskA, 1, &workstation[0], &no_cost, &communication_amount1, -1.0);
-    SD_task_schedule(taskB, 1, &workstation[1], &no_cost, &communication_amount2, -1.0);
+  ret = SD_simulate(-1.0);
+  xbt_dynar_free(&ret);
+  SD_task_destroy(taskA);
+  SD_task_destroy(taskB);
+  SD_task_destroy(taskInit);
 
-    SD_task_dependency_add(NULL, NULL, taskInit, taskA);
-    SD_task_dependency_add(NULL, NULL, taskInit, taskB);
-    
-    SD_simulate(-1.0);
+  XBT_INFO("Simulation time: %f", SD_get_clock());
 
-    SD_exit();
-    return 0;
+  SD_exit();
+  return 0;
 }