Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Merge pull request #237 from oar-team/upstream
[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
30 Engine *Engine::instance_ = nullptr; /* That singleton is awful, but I don't see no other solution right now. */
31
32
33 Engine::Engine(int *argc, char **argv) {
34   xbt_assert(s4u::Engine::instance_ == nullptr, "It is currently forbidden to create more than one instance of s4u::Engine");
35   TRACE_global_init();
36   SIMIX_global_init(argc, argv);
37
38   pimpl                  = new kernel::EngineImpl();
39   s4u::Engine::instance_ = this;
40 }
41
42 Engine::~Engine()
43 {
44   delete pimpl;
45   s4u::Engine::instance_ = nullptr;
46 }
47
48 Engine* Engine::getInstance()
49 {
50   if (s4u::Engine::instance_ == nullptr)
51     return new Engine(0, nullptr);
52   else
53     return s4u::Engine::instance_;
54 }
55
56 void Engine::shutdown() {
57   delete s4u::Engine::instance_;
58   s4u::Engine::instance_ = nullptr;
59 }
60
61 double Engine::getClock()
62 {
63   return SIMIX_get_clock();
64 }
65
66 void Engine::loadPlatform(const char *platf)
67 {
68   SIMIX_create_environment(platf);
69 }
70
71 void Engine::registerFunction(const char*name, int (*code)(int,char**))
72 {
73   SIMIX_function_register(name,code);
74 }
75 void Engine::registerDefault(int (*code)(int,char**))
76 {
77   SIMIX_function_register_default(code);
78 }
79 void Engine::loadDeployment(const char *deploy)
80 {
81   SIMIX_launch_application(deploy);
82 }
83 // FIXME: The following duplicates the content of s4u::Host
84 extern std::map<std::string, simgrid::s4u::Host*> host_list;
85 /** @brief Returns the amount of hosts in the platform */
86 size_t Engine::getHostCount()
87 {
88   return host_list.size();
89 }
90 /** @brief Fills the passed list with all hosts found in the platform */
91 void Engine::getHostList(std::vector<Host*>* list)
92 {
93   for (auto const& kv : host_list)
94     list->push_back(kv.second);
95 }
96 /** @brief Returns the amount of links in the platform */
97 size_t Engine::getLinkCount()
98 {
99   return simgrid::surf::LinkImpl::linksCount();
100 }
101 /** @brief Fills the passed list with all hosts found in the platform */
102 void Engine::getLinkList(std::vector<Link*>* list)
103 {
104   simgrid::surf::LinkImpl::linksList(list);
105 }
106
107 void Engine::run() {
108   if (MC_is_active()) {
109     MC_run();
110   } else {
111     SIMIX_run();
112   }
113 }
114
115 s4u::NetZone* Engine::getNetRoot()
116 {
117   return pimpl->netRoot_;
118 }
119
120 static s4u::NetZone* netzoneByNameRecursive(s4u::NetZone* current, const char* name)
121 {
122   if (not strcmp(current->getCname(), name))
123     return current;
124
125   for (auto const& elem : *(current->getChildren())) {
126     simgrid::s4u::NetZone* tmp = netzoneByNameRecursive(elem, name);
127     if (tmp != nullptr) {
128       return tmp;
129     }
130   }
131   return nullptr;
132 }
133
134 /** @brief Retrieve the NetZone of the given name (or nullptr if not found) */
135 NetZone* Engine::getNetzoneByNameOrNull(const char* name)
136 {
137   return netzoneByNameRecursive(getNetRoot(), name);
138 }
139
140 /** @brief Retrieve the netpoint of the given name (or nullptr if not found) */
141 simgrid::kernel::routing::NetPoint* Engine::getNetpointByNameOrNull(std::string name)
142 {
143   auto netp = pimpl->netpoints_.find(name);
144   return netp == pimpl->netpoints_.end() ? nullptr : netp->second;
145 }
146
147 /** @brief Fill the provided vector with all existing netpoints */
148 void Engine::getNetpointList(std::vector<simgrid::kernel::routing::NetPoint*>* list)
149 {
150   for (auto const& kv : pimpl->netpoints_)
151     list->push_back(kv.second);
152 }
153 /** @brief Register a new netpoint to the system */
154 void Engine::netpointRegister(simgrid::kernel::routing::NetPoint* point)
155 {
156   // simgrid::simix::kernelImmediate([&]{ FIXME: this segfaults in set_thread
157   pimpl->netpoints_[point->getName()] = point;
158   // });
159 }
160 /** @brief Unregister a given netpoint */
161 void Engine::netpointUnregister(simgrid::kernel::routing::NetPoint* point)
162 {
163   simgrid::simix::kernelImmediate([this, point] {
164     pimpl->netpoints_.erase(point->getName());
165     delete point;
166   });
167 }
168
169 bool Engine::isInitialized()
170 {
171   return Engine::instance_ != nullptr;
172 }
173 void Engine::setConfig(std::string str)
174 {
175   xbt_cfg_set_parse(str.c_str());
176 }
177 }
178 } // namespace