1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
/* Copyright (c) 2010-2025. The SimGrid Team. All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
* under the terms of the license (GNU LGPL) which comes with this package. */
/* This source code simply loads the platform. This is only useful to play
* with the tracing module. See the tesh file to see how to generate the
* traces.
*/
#include "simgrid/instr.h"
#include "simgrid/s4u.hpp"
#include <memory>
namespace sg4 = simgrid::s4u;
/* The guy we will move from host to host. It move alone and then is moved by policeman back */
static void emigrant()
{
auto* mailbox = sg4::Mailbox::by_name("master_mailbox");
sg4::this_actor::sleep_for(2);
while (true) { // I am an eternal emigrant
auto destination = mailbox->get_unique<std::string>();
if (destination->empty())
break; // there is no destination, die
sg4::this_actor::set_host(sg4::Host::by_name(*destination));
sg4::this_actor::sleep_for(2); // I am tired, have to sleep for 2 seconds
}
}
static void policeman()
{
// I am the master of emigrant actor,
// I tell it where it must emigrate to.
auto destinations = {"Tremblay", "Jupiter", "Fafard", "Ginette", "Bourassa", "Fafard", "Tremblay", "Ginette", ""};
auto* mailbox = sg4::Mailbox::by_name("master_mailbox");
simgrid::instr::declare_tracing_category("migration_order");
for (auto const& destination : destinations) {
mailbox->put_init(new std::string(destination), 0)->set_tracing_category("migration_order")->wait();
}
}
int main(int argc, char* argv[])
{
sg4::Engine e(&argc, argv);
xbt_assert(argc > 1, "Usage: %s platform_file\n \tExample: %s small_platform.xml\n", argv[0], argv[0]);
e.load_platform(argv[1]);
e.host_by_name("Fafard")->add_actor("emigrant", emigrant);
e.host_by_name("Tremblay")->add_actor("policeman", policeman);
e.run();
return 0;
}
|
