1 /* simple test trying to load a DOT file. */
3 /* Copyright (c) 2010-2023. The SimGrid Team. All rights reserved. */
5 /* This program is free software; you can redistribute it and/or modify it
6 * under the terms of the license (GNU LGPL) which comes with this package. */
8 #include "simgrid/s4u.hpp"
11 XBT_LOG_NEW_DEFAULT_CATEGORY(dag_from_dot, "Logging specific to this example");
12 namespace sg4 = simgrid::s4u;
14 int main(int argc, char** argv)
16 sg4::Engine e(&argc, argv);
17 e.load_platform(argv[1]);
19 std::vector<sg4::ActivityPtr> dag = sg4::create_DAG_from_dot(argv[2]);
22 XBT_CRITICAL("No dot loaded. Do you have a cycle in your graph?");
26 XBT_INFO("--------- Display all activities of the loaded DAG -----------");
27 for (const auto& a : dag) {
28 std::string type = "an Exec";
29 std::string task = "flops to execute";
30 if (dynamic_cast<sg4::Comm*>(a.get()) != nullptr) {
32 task = "bytes to transfer";
34 XBT_INFO("'%s' is %s: %.0f %s. Dependencies: %s; Ressources: %s", a->get_cname(), type.c_str(), a->get_remaining(),
35 task.c_str(), (a->dependencies_solved() ? "solved" : "NOT solved"),
36 (a->is_assigned() ? "assigned" : "NOT assigned"));
39 XBT_INFO("------------------- Schedule tasks ---------------------------");
40 auto hosts = e.get_all_hosts();
41 auto count = e.get_host_count();
44 static_cast<sg4::Exec*>(dag.back().get())->set_host(hosts[0]);
46 for (const auto& a : dag) {
47 if (auto* exec = dynamic_cast<sg4::Exec*>(a.get()); exec != nullptr && exec->get_name() != "end") {
48 exec->set_host(hosts[cursor % count]);
51 if (auto* comm = dynamic_cast<sg4::Comm*>(a.get())) {
52 const auto* pred = dynamic_cast<sg4::Exec*>((*comm->get_dependencies().begin()).get());
53 const auto* succ = dynamic_cast<sg4::Exec*>(comm->get_successors().front().get());
54 comm->set_source(pred->get_host())->set_destination(succ->get_host());
58 XBT_INFO("------------------- Run the schedule -------------------------");
61 XBT_INFO("-------------- Summary of executed schedule ------------------");
62 for (const auto& a : dag) {
63 if (const auto* exec = dynamic_cast<sg4::Exec*>(a.get())) {
64 XBT_INFO("[%f->%f] '%s' executed on %s", exec->get_start_time(), exec->get_finish_time(), exec->get_cname(),
65 exec->get_host()->get_cname());
67 if (const auto* comm = dynamic_cast<sg4::Comm*>(a.get())) {
68 XBT_INFO("[%f->%f] '%s' transferred from %s to %s", comm->get_start_time(), comm->get_finish_time(),
69 comm->get_cname(), comm->get_source()->get_cname(), comm->get_destination()->get_cname());