teshsuite/simdag/basic2.c

   1 /* Copyright (c) 2007-2012. The SimGrid Team.
   2  * All rights reserved.                                                     */
   3
   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. */
   6
   7 #include <stdio.h>
   8 #include <stdlib.h>
   9 #include "simdag/simdag.h"
  10 #include "xbt/log.h"
  11
  12 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(basic2, sd, "SimDag test basic2");
  13
  14 /* Basic SimDag Test 2
  15  * Scenario:
  16  *   - Create a no-op Init task
  17  *   - Create two communication tasks: 1GB and 100MB
  18  *   - Schedule them concurrently on the two hosts of the platform
  19  * The two communications occur simultaneously. They share the network for the
  20  * duration of the shortest one, then the longest one has the full bandwidth.
  21  * Simulated time should be:
  22  *          1e8/(1/2*1.25e8) + 9e8/1.25e8) + 1e-4 = 8.8001 seconds
  23  */
  24 int main(int argc, char **argv)
  25 {
  26
  27   SD_task_t taskInit;
  28   SD_task_t taskA;
  29   SD_task_t taskB;
  30   xbt_dynar_t ret;
  31
  32   const SD_workstation_t *workstation;
  33
  34   double communication_amount1 = 1e9;
  35   double communication_amount2 = 1e8;
  36   double no_cost = 0.0;
  37
  38   /* initialization of SD */
  39   SD_init(&argc, argv);
  40
  41   /* creation of the environment */
  42   SD_create_environment(argv[1]);
  43
  44   /* creation of the tasks and their dependencies */
  45   taskInit = SD_task_create("Init", NULL, 1.0);
  46   taskA = SD_task_create("Task Comm A", NULL, 1.0);
  47   taskB = SD_task_create("Task Comm B", NULL, 1.0);
  48
  49
  50   /* scheduling parameters */
  51
  52   workstation = SD_workstation_get_list();
  53
  54   /* let's launch the simulation! */
  55   SD_task_schedule(taskInit, 1, SD_workstation_get_list(), &no_cost,
  56                    &no_cost, -1.0);
  57   SD_task_schedule(taskA, 1, &workstation[0], &no_cost,
  58                    &communication_amount1, -1.0);
  59   SD_task_schedule(taskB, 1, &workstation[1], &no_cost,
  60                    &communication_amount2, -1.0);
  61
  62   SD_task_dependency_add(NULL, NULL, taskInit, taskA);
  63   SD_task_dependency_add(NULL, NULL, taskInit, taskB);
  64
  65   ret = SD_simulate(-1.0);
  66   xbt_dynar_free(&ret);
  67   SD_task_destroy(taskA);
  68   SD_task_destroy(taskB);
  69   SD_task_destroy(taskInit);
  70
  71   XBT_INFO("Simulation time: %f", SD_get_clock());
  72
  73   SD_exit();
  74   return 0;
  75 }