do not use f2c with 64 bits platforms which use old gcc (<4.5)

[simgrid.git] / teshsuite / simdag / basic1.c

diff --git a/teshsuite/simdag/basic1.c b/teshsuite/simdag/basic1.c
index 1e4e027..a3dcd3a 100644 (file)
--- a/teshsuite/simdag/basic1.c
+++ b/teshsuite/simdag/basic1.c
@@ -1,21 +1,41 @@
+/* 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(basic1, sd, "SimDag test basic1");
+
+/* Basic SimDag Test 1
+ * Scenario:
+ *   - Create a no-op Init task
+ *   - Create two communication tasks: 1GB and 1GB
+ *   - Schedule them concurrently on the two hosts of the platform
+ * The two communications occur simultaneously. They share the network for the
+ * whole duration of the simulation.
+ * Simulated time should be:
+ *          1e9/(1/2*1.25e8) + 1e-4 = 16.0001 seconds
+ */
 int main(int argc, char **argv)
 {
 
   SD_task_t taskInit;
   SD_task_t taskA;
   SD_task_t taskB;
+  xbt_dynar_t ret;
 
-  double communication_amount1 = 1000000000;
-  double communication_amount2 = 1000000000;
+  double communication_amount1 = 1e9;
+  double communication_amount2 = 1e9;
   double no_cost = 0.0;
 
   const SD_workstation_t *workstation;
 
-  /* initialisation of SD */
+  /* initialization of SD */
   SD_init(&argc, argv);
 
   /* creation of the environment */
@@ -33,8 +53,8 @@ int main(int argc, char **argv)
   workstation = SD_workstation_get_list();
 
   /* let's launch the simulation! */
-  SD_task_schedule(taskInit, 1, SD_workstation_get_list(), &no_cost, &no_cost,
-                   -1.0);
+  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,
@@ -43,7 +63,13 @@ int main(int argc, char **argv)
   SD_task_dependency_add(NULL, NULL, taskInit, taskA);
   SD_task_dependency_add(NULL, NULL, taskInit, taskB);
 
-  SD_simulate(-1.0);
+  ret = SD_simulate(-1.0);
+  xbt_dynar_free(&ret);
+  SD_task_destroy(taskA);
+  SD_task_destroy(taskB);
+  SD_task_destroy(taskInit);
+
+  XBT_INFO("Simulation time: %f", SD_get_clock());
 
   SD_exit();
   return 0;