1 /* s4u::Engine Simulation Engine and global functions. */
3 /* Copyright (c) 2006-2015. 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 "instr/instr_interface.h"
9 #include "simgrid/simix.h"
11 #include "simgrid/s4u/As.hpp"
12 #include "simgrid/s4u/engine.hpp"
13 #include "simgrid/s4u/Mailbox.hpp"
14 #include "simgrid/s4u/storage.hpp"
16 #include "surf/surf.h" // routing_platf. FIXME:KILLME. SOON
17 #include "src/surf/surf_routing.hpp" // routing_platf. FIXME:KILLME. SOON
19 XBT_LOG_NEW_CATEGORY(s4u,"Log channels of the S4U (Simgrid for you) interface");
24 Engine *Engine::instance_ = nullptr; /* That singleton is awful, but I don't see no other solution right now. */
27 Engine::Engine(int *argc, char **argv) {
28 xbt_assert(s4u::Engine::instance_ == nullptr, "It is currently forbidden to create more than one instance of s4u::Engine");
29 s4u::Engine::instance_ = this;
31 TRACE_global_init(argc, argv);
32 SIMIX_global_init(argc, argv);
35 Engine *Engine::instance() {
36 if (s4u::Engine::instance_ == nullptr)
37 new Engine(0,nullptr);
38 return s4u::Engine::instance_;
41 void Engine::shutdown() {
42 delete s4u::Engine::instance_;
43 s4u::Engine::instance_ = nullptr;
44 delete s4u::Storage::storages_;
47 double Engine::getClock()
49 return SIMIX_get_clock();
52 void Engine::loadPlatform(const char *platf)
54 SIMIX_create_environment(platf);
57 void Engine::registerFunction(const char*name, int (*code)(int,char**))
59 SIMIX_function_register(name,code);
61 void Engine::registerDefault(int (*code)(int,char**))
63 SIMIX_function_register_default(code);
65 void Engine::loadDeployment(const char *deploy)
67 SIMIX_launch_application(deploy);
78 s4u::As *Engine::rootAs()
80 return routing_platf->root_; // FIXME: get the root into the Engine directly (and kill the platf)
83 static s4u::As *asByNameRecursive(s4u::As *current, const char *name)
85 if(!strcmp(current->name(), name))
88 xbt_dict_cursor_t cursor = nullptr;
91 xbt_dict_foreach(current->children(), cursor, key, elem) {
92 simgrid::s4u::As *tmp = asByNameRecursive(elem, name);
99 /** @brief Retrieve the AS of the given name (or nullptr if not found) */
100 As *Engine::asByNameOrNull(const char *name) {
101 return asByNameRecursive(rootAs(),name);