Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Update all our XML files + next XML version will be 4.1, not 5
[simgrid.git] / examples / s4u / actor-kill / s4u_actor-kill.cpp
1 /* Copyright (c) 2017 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 #include <simgrid/s4u.hpp>
7
8 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_actor_kill, "Messages specific for this s4u example");
9
10 static void victim()
11 {
12   XBT_INFO("Hello!");
13   XBT_INFO("Suspending myself");
14   simgrid::s4u::this_actor::suspend(); /* - Start by suspending itself */
15   XBT_INFO("OK, OK. Let's work");      /* - Then is resumed and start to execute a task */
16   simgrid::s4u::this_actor::execute(1e9);
17   XBT_INFO("Bye!"); /* - But will never reach the end of it */
18 }
19
20 static void killer()
21 {
22   XBT_INFO("Hello!"); /* - First start a victim process */
23   simgrid::s4u::ActorPtr poor_victim =
24       simgrid::s4u::Actor::createActor("victim", simgrid::s4u::Host::by_name("Fafard"), victim);
25   simgrid::s4u::this_actor::sleep_for(10); /* - Wait for 10 seconds */
26
27   XBT_INFO("Resume process"); /* - Resume it from its suspended state */
28   poor_victim->resume();
29
30   XBT_INFO("Kill process"); /* - and then kill it */
31   poor_victim->kill();
32
33   XBT_INFO("OK, goodbye now. I commit a suicide.");
34   simgrid::s4u::this_actor::kill();
35
36   XBT_INFO("This line will never get displayed: I'm already dead since the previous line.");
37 }
38
39 int main(int argc, char* argv[])
40 {
41   simgrid::s4u::Engine* e = new simgrid::s4u::Engine(&argc, argv);
42   xbt_assert(argc == 2, "Usage: %s platform_file\n\tExample: %s msg_platform.xml\n", argv[0], argv[0]);
43
44   e->loadPlatform(argv[1]); /* - Load the platform description */
45   /* - Create and deploy killer process, that will create the victim process  */
46   simgrid::s4u::Actor::createActor("killer", simgrid::s4u::Host::by_name("Tremblay"), killer);
47
48   e->run(); /* - Run the simulation */
49
50   XBT_INFO("Simulation time %g", e->getClock());
51   return 0;
52 }