teshsuite/s4u/actor-suspend/actor-suspend.cpp

   1 /* Copyright (c) 2020. The SimGrid Team. All rights reserved.          */
   2
   3 /* This program is free software; you can redistribute it and/or modify it
   4  * under the terms of the license (GNU LGPL) which comes with this package. */
   5
   6 // This is the MWE of https://framagit.org/simgrid/simgrid/-/issues/50
   7 // The problem was occuring when suspending an actor that will be executed later in the same scheduling round
   8
   9 #include <iostream>
  10 #include <simgrid/s4u.hpp>
  11 #include <stdio.h>
  12 #include <stdlib.h>
  13 #include <vector>
  14
  15 XBT_LOG_NEW_DEFAULT_CATEGORY(mwe, "Minimum Working Example");
  16
  17 simgrid::s4u::ActorPtr receiver;
  18
  19 class Receiver {
  20 public:
  21   void operator()()
  22   {
  23     XBT_INFO("Starting.");
  24     auto mailbox = simgrid::s4u::Mailbox::by_name("receiver");
  25     int data     = *(int*)mailbox->get();
  26     XBT_INFO("Got %d at the end", data);
  27   }
  28 };
  29
  30 class Suspender {
  31 public:
  32   void operator()()
  33   {
  34     XBT_INFO("Suspend the receiver...");
  35     receiver->suspend();
  36     XBT_INFO("Resume the receiver...");
  37     receiver->resume();
  38
  39     XBT_INFO("Sleeping 10 sec...");
  40     simgrid::s4u::this_actor::sleep_for(10);
  41
  42     XBT_INFO("Sending a message to the receiver...");
  43     auto mailbox = simgrid::s4u::Mailbox::by_name("receiver");
  44     int data     = 42;
  45     mailbox->put(&data, 4);
  46
  47     XBT_INFO("Done!");
  48   }
  49 };
  50
  51 int main(int argc, char** argv)
  52 {
  53   simgrid::s4u::Engine* engine = new simgrid::s4u::Engine(&argc, argv);
  54
  55   engine->load_platform(argv[1]);
  56   simgrid::s4u::Host* host = simgrid::s4u::Host::by_name("Tremblay");
  57
  58   simgrid::s4u::Actor::create("Suspender", host, Suspender());
  59   receiver = simgrid::s4u::Actor::create("Receiver", host, Receiver());
  60
  61   engine->run();
  62
  63   return 0;
  64 }