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
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
|
/* Copyright (c) 2006-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. */
#include "simgrid/s4u.hpp"
XBT_LOG_NEW_DEFAULT_CATEGORY(dag_failure, "Logging specific to this example");
namespace sg4 = simgrid::s4u;
int main(int argc, char** argv)
{
sg4::Engine e(&argc, argv);
sg4::Engine::set_config("host/model:ptask_L07");
e.load_platform(argv[1]);
auto* faulty = e.host_by_name("Faulty Host");
auto* safe = e.host_by_name("Safe Host");
sg4::Exec::on_completion_cb([](sg4::Exec const& exec) {
if (exec.get_state() == sg4::Activity::State::FINISHED)
XBT_INFO("Activity '%s' is complete (start time: %f, finish time: %f)", exec.get_cname(), exec.get_start_time(),
exec.get_finish_time());
if (exec.get_state() == sg4::Activity::State::FAILED) {
if (exec.is_parallel())
XBT_INFO("Activity '%s' has failed. %.f %% remain to be done", exec.get_cname(),
100 * exec.get_remaining_ratio());
else
XBT_INFO("Activity '%s' has failed. %.f flops remain to be done", exec.get_cname(), exec.get_remaining());
}
});
/* creation of a single Exec that will poorly fail when the workstation will stop */
XBT_INFO("First test: sequential Exec activity");
sg4::ExecPtr exec = sg4::Exec::init()->set_name("Poor task")->set_flops_amount(2e10)->start();
XBT_INFO("Schedule Activity '%s' on 'Faulty Host'", exec->get_cname());
exec->set_host(faulty);
/* Add a child Exec that depends on the Poor task' */
sg4::ExecPtr child = sg4::Exec::init()->set_name("Child")->set_flops_amount(2e10)->set_host(safe);
exec->add_successor(child);
child->start();
XBT_INFO("Run the simulation");
e.run();
XBT_INFO("let's unschedule Activity '%s' and reschedule it on the 'Safe Host'", exec->get_cname());
exec->unset_host();
exec->set_host(safe);
XBT_INFO("Run the simulation again");
e.run();
XBT_INFO("Second test: parallel Exec activity");
exec = sg4::Exec::init()->set_name("Poor parallel task")->set_flops_amounts({2e10, 2e10})->start();
XBT_INFO("Schedule Activity '%s' on 'Safe Host' and 'Faulty Host'", exec->get_cname());
exec->set_hosts({safe, faulty});
/* Add a child Exec that depends on the Poor parallel task' */
child = sg4::Exec::init()->set_name("Child")->set_flops_amount(2e10)->set_host(safe);
exec->add_successor(child);
child->start();
XBT_INFO("Run the simulation");
e.run();
XBT_INFO("let's unschedule Activity '%s' and reschedule it only on the 'Safe Host'", exec->get_cname());
exec->unset_hosts();
exec->set_flops_amount(4e10)->set_host(safe);
XBT_INFO("Run the simulation again");
e.run();
return 0;
}
|
