teshsuite/msg/host_on_off/host_on_off_wait.c

   1 /* Copyright (c) 2010-2015. 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 "simgrid/msg.h"            /* Yeah! If you want to use msg, you need to include simgrid/msg.h */
   9 #include "xbt/sysdep.h"         /* calloc, printf */
  10 #include "xbt/ex.h"
  11
  12 /* Create a log channel to have nice outputs. */
  13 #include "xbt/log.h"
  14 #include "xbt/asserts.h"
  15 XBT_LOG_NEW_DEFAULT_CATEGORY(msg_test,
  16                              "Messages specific for this msg example");
  17
  18 int master(int argc, char *argv[]);
  19 int slave(int argc, char *argv[]);
  20
  21 /** Emitter function  */
  22 int master(int argc, char *argv[])
  23 {
  24   xbt_ex_t e;
  25   TRY {
  26     msg_host_t jupiter = MSG_host_by_name("Jupiter");
  27     XBT_INFO("Master waiting");
  28     MSG_process_sleep(1);
  29
  30     XBT_INFO("Turning off the slave host");
  31     MSG_host_off(jupiter);
  32     XBT_INFO("Master has finished");
  33   }
  34   CATCH(e) {
  35     xbt_die("Exception caught in the master");
  36     return 1;
  37   }
  38   return 0;
  39 }
  40
  41 /** Receiver function  */
  42 int slave(int argc, char *argv[])
  43 {
  44   xbt_ex_t e;
  45   TRY {
  46     XBT_INFO("Slave waiting");
  47     // TODO, This should really be MSG_HOST_FAILURE
  48     MSG_process_sleep(5);
  49     XBT_ERROR("Slave should be off already.");
  50     return 1;
  51   }
  52   CATCH(e) {
  53     XBT_ERROR("Exception caught in the slave");
  54     return 1;
  55   }
  56   return 0;
  57 }
  58
  59 /** Main function */
  60 int main(int argc, char *argv[])
  61 {
  62   msg_error_t res;
  63   const char *platform_file;
  64   const char *application_file;
  65
  66   MSG_init(&argc, argv);
  67   xbt_assert(argc > 2, "Usage: %s platform_file deployment_file\n"
  68        "\tExample: %s msg_platform.xml msg_deployment.xml\n", argv[0], argv[0]);
  69
  70   platform_file = argv[1];
  71   application_file = argv[2];
  72
  73   {                             /*  Simulation setting */
  74     MSG_create_environment(platform_file);
  75   }
  76   {                             /*   Application deployment */
  77     MSG_function_register("master", master);
  78     MSG_function_register("slave", slave);
  79
  80     MSG_launch_application(application_file);
  81   }
  82   res = MSG_main();
  83
  84   XBT_INFO("Simulation time %g", MSG_get_clock());
  85
  86   return res != MSG_OK;
  87 }                               /* end_of_main */