teshsuite/simdag/comm-mxn-independent/comm-mxn-independent.c

   1 /* Latency tests                                                            */
   2
   3 /* Copyright (c) 2007, 2009-2011, 2013-2015. The SimGrid Team.
   4  * All rights reserved.                                                     */
   5
   6 /* This program is free software; you can redistribute it and/or modify it
   7  * under the terms of the license (GNU LGPL) which comes with this package. */
   8
   9 #include "simgrid/simdag.h"
  10 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(comm_mxn_independent, sd, "SimDag test independent communications");
  11
  12 /*
  13  * intra communication test
  14  * independent communication
  15  *
  16  * 0 -> 1
  17  * 2 -> 3
  18  * shared is only switch which is fat pipe
  19  * should be 1 + 2 latency = 3
  20  */
  21
  22 int main(int argc, char **argv)
  23 {
  24   double communication_amount[] = { 0.0, 1.0, 0.0, 0.0,
  25                                     0.0, 0.0, 0.0, 0.0,
  26                                     0.0, 0.0, 0.0, 1.0,
  27                                     0.0, 0.0, 0.0, 0.0 };
  28
  29   SD_init(&argc, argv);
  30   SD_create_environment(argv[1]);
  31
  32   SD_task_t task = SD_task_create("Comm 1", NULL, 1.0);
  33
  34   sg_host_t *hosts = sg_host_list();
  35   SD_task_schedule(task, 4, hosts, SD_SCHED_NO_COST, communication_amount, -1.0);
  36   xbt_free(hosts);
  37
  38   SD_simulate(-1.0);
  39
  40   XBT_INFO("%g", SD_get_clock());
  41
  42   SD_task_destroy(task);
  43
  44   return 0;
  45 }