teshsuite/simdag/network/mxn/test_intra_all2all.c

   1
   2 /*
   3  * SimDag
   4  * Latency tests
   5  * Copyright (C) 2007
   6  * Sascha Hunold, Frederic Suter
   7  */
   8
   9 #include <stdio.h>
  10 #include <stdlib.h>
  11
  12 #include "simdag/simdag.h"
  13
  14 /*
  15  * intra communication test
  16  * All2All
  17  *
  18  * send 1 byte from all to all
  19  * + 2 secs latency
  20  * should be 8  (platform_4p_1switch.xml)
  21  *
  22  */
  23
  24 int main(int argc, char **argv) {
  25   double time;
  26   SD_task_t task;
  27
  28   double communication_amount[] =
  29         {     0.0, 1.0, 1.0, 1.0,
  30                   1.0, 0.0, 1.0, 1.0,
  31                   1.0, 1.0, 0.0, 1.0,
  32                   1.0, 1.0, 1.0, 0.0,
  33         };
  34
  35   double no_cost[] = { 0.0, 0.0, 0.0, 0.0 };
  36
  37
  38   /***************************************/
  39
  40   SD_init(&argc, argv);
  41   SD_create_environment(argv[1]);
  42
  43   task = SD_task_create("All2all task", NULL, 1.0);
  44
  45   SD_task_schedule(task, 4, SD_workstation_get_list(), no_cost, communication_amount, -1.0);
  46
  47   SD_simulate(-1.0);
  48
  49   time = SD_get_clock();
  50
  51   printf("%g\n", time);
  52   fflush(stdout);
  53
  54   SD_task_destroy(task);
  55
  56   SD_exit();
  57
  58   return 0;
  59 }
  60