Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
f991b12959e946be8d26ab99e3b13774ac374de5
[simgrid.git] / src / s4u / s4u_engine.cpp
1 /* s4u::Engine Simulation Engine and global functions. */
2
3 /* Copyright (c) 2006-2017. The SimGrid Team. All rights reserved.          */
4
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. */
7
8 #include "instr/instr_interface.h"
9 #include "mc/mc.h"
10 #include "simgrid/s4u/Engine.hpp"
11 #include "simgrid/s4u/Host.hpp"
12 #include "simgrid/s4u/Mailbox.hpp"
13 #include "simgrid/s4u/NetZone.hpp"
14 #include "simgrid/s4u/Storage.hpp"
15 #include "simgrid/simix.h"
16 #include "src/kernel/EngineImpl.hpp"
17 #include "src/kernel/routing/NetPoint.hpp"
18 #include "src/kernel/routing/NetZoneImpl.hpp"
19 #include "src/surf/network_interface.hpp"
20 #include "surf/surf.hpp" // routing_platf. FIXME:KILLME. SOON
21
22 XBT_LOG_NEW_CATEGORY(s4u,"Log channels of the S4U (Simgrid for you) interface");
23
24 namespace simgrid {
25 namespace s4u {
26 xbt::signal<void()> onPlatformCreated;
27 xbt::signal<void()> onSimulationEnd;
28 xbt::signal<void(double)> onTimeAdvance;
29 xbt::signal<void(void)> onDeadlock;
30
31 Engine *Engine::instance_ = nullptr; /* That singleton is awful, but I don't see no other solution right now. */
32
33
34 Engine::Engine(int *argc, char **argv) {
35   xbt_assert(s4u::Engine::instance_ == nullptr, "It is currently forbidden to create more than one instance of s4u::Engine");
36   TRACE_global_init();
37   SIMIX_global_init(argc, argv);
38
39   pimpl                  = new kernel::EngineImpl();
40   s4u::Engine::instance_ = this;
41 }
42
43 Engine::~Engine()
44 {
45   delete pimpl;
46   s4u::Engine::instance_ = nullptr;
47 }
48
49 Engine* Engine::getInstance()
50 {
51   if (s4u::Engine::instance_ == nullptr)
52     return new Engine(0, nullptr);
53   else
54     return s4u::Engine::instance_;
55 }
56
57 void Engine::shutdown() {
58   delete s4u::Engine::instance_;
59   s4u::Engine::instance_ = nullptr;
60 }
61
62 double Engine::getClock()
63 {
64   return SIMIX_get_clock();
65 }
66
67 void Engine::loadPlatform(const char *platf)
68 {
69   SIMIX_create_environment(platf);
70 }
71
72 void Engine::registerFunction(const char*name, int (*code)(int,char**))
73 {
74   SIMIX_function_register(name,code);
75 }
76 void Engine::registerDefault(int (*code)(int,char**))
77 {
78   SIMIX_function_register_default(code);
79 }
80 void Engine::loadDeployment(const char *deploy)
81 {
82   SIMIX_launch_application(deploy);
83 }
84 /** @brief Returns the amount of hosts in the platform */
85 size_t Engine::getHostCount()
86 {
87   return pimpl->hosts_.size();
88 }
89 /** @brief Fills the passed list with all hosts found in the platform */
90 void Engine::getHostList(std::vector<Host*>* list)
91 {
92   for (auto const& kv : pimpl->hosts_)
93     list->push_back(kv.second);
94 }
95 void Engine::addHost(std::string name, simgrid::s4u::Host* host)
96 {
97   pimpl->hosts_[name] = host;
98 }
99 void Engine::delHost(std::string name)
100 {
101   pimpl->hosts_.erase(name);
102 }
103 simgrid::s4u::Host* Engine::hostByName(std::string name)
104 {
105   return pimpl->hosts_.at(name); // Will raise a std::out_of_range if the host does not exist
106 }
107 simgrid::s4u::Host* Engine::hostByNameOrNull(std::string name)
108 {
109   auto host = pimpl->hosts_.find(name);
110   return host == pimpl->hosts_.end() ? nullptr : host->second;
111 }
112
113 /** @brief Returns the amount of links in the platform */
114 size_t Engine::getLinkCount()
115 {
116   return simgrid::surf::LinkImpl::linksCount();
117 }
118 /** @brief Fills the passed list with all hosts found in the platform */
119 void Engine::getLinkList(std::vector<Link*>* list)
120 {
121   simgrid::surf::LinkImpl::linksList(list);
122 }
123
124 void Engine::run() {
125   if (MC_is_active()) {
126     MC_run();
127   } else {
128     SIMIX_run();
129   }
130 }
131
132 s4u::NetZone* Engine::getNetRoot()
133 {
134   return pimpl->netRoot_;
135 }
136
137 static s4u::NetZone* netzoneByNameRecursive(s4u::NetZone* current, const char* name)
138 {
139   if (not strcmp(current->getCname(), name))
140     return current;
141
142   for (auto const& elem : *(current->getChildren())) {
143     simgrid::s4u::NetZone* tmp = netzoneByNameRecursive(elem, name);
144     if (tmp != nullptr) {
145       return tmp;
146     }
147   }
148   return nullptr;
149 }
150
151 /** @brief Retrieve the NetZone of the given name (or nullptr if not found) */
152 NetZone* Engine::getNetzoneByNameOrNull(const char* name)
153 {
154   return netzoneByNameRecursive(getNetRoot(), name);
155 }
156
157 /** @brief Retrieve the netpoint of the given name (or nullptr if not found) */
158 simgrid::kernel::routing::NetPoint* Engine::getNetpointByNameOrNull(std::string name)
159 {
160   auto netp = pimpl->netpoints_.find(name);
161   return netp == pimpl->netpoints_.end() ? nullptr : netp->second;
162 }
163
164 /** @brief Fill the provided vector with all existing netpoints */
165 void Engine::getNetpointList(std::vector<simgrid::kernel::routing::NetPoint*>* list)
166 {
167   for (auto const& kv : pimpl->netpoints_)
168     list->push_back(kv.second);
169 }
170 /** @brief Register a new netpoint to the system */
171 void Engine::netpointRegister(simgrid::kernel::routing::NetPoint* point)
172 {
173   // simgrid::simix::kernelImmediate([&]{ FIXME: this segfaults in set_thread
174   pimpl->netpoints_[point->getName()] = point;
175   // });
176 }
177 /** @brief Unregister a given netpoint */
178 void Engine::netpointUnregister(simgrid::kernel::routing::NetPoint* point)
179 {
180   simgrid::simix::kernelImmediate([this, point] {
181     pimpl->netpoints_.erase(point->getName());
182     delete point;
183   });
184 }
185
186 bool Engine::isInitialized()
187 {
188   return Engine::instance_ != nullptr;
189 }
190 void Engine::setConfig(std::string str)
191 {
192   xbt_cfg_set_parse(str.c_str());
193 }
194 }
195 } // namespace