1 /* Copyright (c) 2015-2017. The SimGrid Team. All rights reserved. */
3 /* This program is free software; you can redistribute it and/or modify it
4 * under the terms of the license (GNU LGPL) which comes with this package. */
12 #include <boost/context/all.hpp>
15 #include <xbt/xbt_os_thread.h>
17 #include "src/simix/smx_private.h"
18 #include "src/internal_config.h"
19 #include "src/kernel/context/ContextBoost.hpp"
21 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(simix_context);
27 class BoostSerialContext : public BoostContext {
29 BoostSerialContext(std::function<void()> code,
30 void_pfn_smxprocess_t cleanup_func,
32 : BoostContext(std::move(code), cleanup_func, process) {}
34 void suspend() override;
37 #if HAVE_THREAD_CONTEXTS
38 class BoostParallelContext : public BoostContext {
40 BoostParallelContext(std::function<void()> code,
41 void_pfn_smxprocess_t cleanup_func,
43 : BoostContext(std::move(code), cleanup_func, process) {}
45 void suspend() override;
46 void resume() override;
50 // BoostContextFactory
52 bool BoostContext::parallel_ = false;
53 simgrid::xbt::Parmap<smx_actor_t>* BoostContext::parmap_ = nullptr;
54 uintptr_t BoostContext::threads_working_ = 0;
55 xbt_os_thread_key_t BoostContext::worker_id_key_;
56 unsigned long BoostContext::process_index_ = 0;
57 BoostContext* BoostContext::maestro_context_ = nullptr;
58 std::vector<BoostContext*> BoostContext::workers_context_;
60 BoostContextFactory::BoostContextFactory()
61 : ContextFactory("BoostContextFactory")
63 BoostContext::parallel_ = SIMIX_context_is_parallel();
64 if (BoostContext::parallel_) {
65 #if HAVE_THREAD_CONTEXTS
66 int nthreads = SIMIX_context_get_nthreads();
67 BoostContext::parmap_ = new simgrid::xbt::Parmap<smx_actor_t>(nthreads, SIMIX_context_get_parallel_mode());
68 BoostContext::workers_context_.clear();
69 BoostContext::workers_context_.resize(nthreads, nullptr);
70 BoostContext::maestro_context_ = nullptr;
71 xbt_os_thread_key_create(&BoostContext::worker_id_key_);
73 xbt_die("No thread support for parallel context execution");
78 BoostContextFactory::~BoostContextFactory()
80 #if HAVE_THREAD_CONTEXTS
81 if (BoostContext::parmap_) {
82 delete BoostContext::parmap_;
83 BoostContext::parmap_ = nullptr;
85 BoostContext::workers_context_.clear();
89 smx_context_t BoostContextFactory::create_context(std::function<void()> code, void_pfn_smxprocess_t cleanup_func,
92 BoostContext* context = nullptr;
93 if (BoostContext::parallel_)
94 #if HAVE_THREAD_CONTEXTS
95 context = this->new_context<BoostParallelContext>(std::move(code), cleanup_func, process);
97 xbt_die("No support for parallel execution");
100 context = this->new_context<BoostSerialContext>(std::move(code), cleanup_func, process);
104 void BoostContextFactory::run_all()
106 #if HAVE_THREAD_CONTEXTS
107 if (BoostContext::parallel_) {
108 BoostContext::threads_working_ = 0;
109 BoostContext::parmap_->apply(
110 [](smx_actor_t process) {
111 BoostContext* context = static_cast<BoostContext*>(process->context);
112 return context->resume();
114 simix_global->process_to_run);
118 if (simix_global->process_to_run.empty())
120 smx_actor_t first_process = simix_global->process_to_run.front();
121 BoostContext::process_index_ = 1;
122 /* execute the first process */
123 static_cast<BoostContext*>(first_process->context)->resume();
130 void BoostContext::smx_ctx_boost_wrapper(BoostContext::ctx_arg_type arg)
132 #if BOOST_VERSION < 106100
133 BoostContext* context = reinterpret_cast<BoostContext*>(arg);
135 static_cast<BoostContext**>(arg.data)[0]->fc_ = arg.fctx;
136 BoostContext* context = static_cast<BoostContext**>(arg.data)[1];
142 inline void BoostContext::smx_ctx_boost_jump_fcontext(BoostContext* from, BoostContext* to)
144 #if BOOST_VERSION < 105600
145 boost::context::jump_fcontext(from->fc_, to->fc_, reinterpret_cast<intptr_t>(to));
146 #elif BOOST_VERSION < 106100
147 boost::context::jump_fcontext(&from->fc_, to->fc_, reinterpret_cast<intptr_t>(to));
149 BoostContext* ctx[2] = {from, to};
150 boost::context::detail::transfer_t arg = boost::context::detail::jump_fcontext(to->fc_, ctx);
151 static_cast<BoostContext**>(arg.data)[0]->fc_ = arg.fctx;
155 BoostContext::BoostContext(std::function<void()> code,
156 void_pfn_smxprocess_t cleanup_func, smx_actor_t process)
157 : Context(std::move(code), cleanup_func, process)
160 /* if the user provided a function for the process then use it, otherwise it is the context for maestro */
162 this->stack_ = SIMIX_context_stack_new();
163 // We need to pass the bottom of the stack to make_fcontext, depending on the stack direction it may be the lower
164 // or higher address:
165 #if PTH_STACKGROWTH == -1
166 void* stack = static_cast<char*>(this->stack_) + smx_context_usable_stack_size - 1;
168 void* stack = this->stack_;
170 #if BOOST_VERSION < 106100
171 this->fc_ = boost::context::make_fcontext(stack, smx_context_usable_stack_size, smx_ctx_boost_wrapper);
173 this->fc_ = boost::context::detail::make_fcontext(stack, smx_context_usable_stack_size, smx_ctx_boost_wrapper);
176 #if BOOST_VERSION < 105600
177 this->fc_ = new boost::context::fcontext_t();
179 if (BoostContext::maestro_context_ == nullptr)
180 BoostContext::maestro_context_ = this;
184 BoostContext::~BoostContext()
186 #if BOOST_VERSION < 105600
187 if (not this->stack_)
190 if (this == maestro_context_)
191 maestro_context_ = nullptr;
192 SIMIX_context_stack_delete(this->stack_);
195 // BoostSerialContext
197 void BoostContext::resume()
199 SIMIX_context_set_current(this);
200 smx_ctx_boost_jump_fcontext(maestro_context_, this);
203 void BoostSerialContext::suspend()
205 /* determine the next context */
206 BoostSerialContext* next_context;
207 unsigned long int i = process_index_;
210 if (i < simix_global->process_to_run.size()) {
211 /* execute the next process */
212 XBT_DEBUG("Run next process");
213 next_context = static_cast<BoostSerialContext*>(simix_global->process_to_run[i]->context);
215 /* all processes were run, return to maestro */
216 XBT_DEBUG("No more process to run");
217 next_context = static_cast<BoostSerialContext*>(maestro_context_);
219 SIMIX_context_set_current(static_cast<smx_context_t>(next_context));
220 smx_ctx_boost_jump_fcontext(this, next_context);
223 void BoostSerialContext::stop()
225 BoostContext::stop();
229 // BoostParallelContext
231 #if HAVE_THREAD_CONTEXTS
233 void BoostParallelContext::suspend()
235 boost::optional<smx_actor_t> next_work = parmap_->next();
236 BoostParallelContext* next_context;
238 XBT_DEBUG("Run next process");
239 next_context = static_cast<BoostParallelContext*>(next_work.get()->context);
241 XBT_DEBUG("No more processes to run");
242 uintptr_t worker_id = reinterpret_cast<uintptr_t>(xbt_os_thread_get_specific(worker_id_key_));
243 next_context = static_cast<BoostParallelContext*>(workers_context_[worker_id]);
246 SIMIX_context_set_current(static_cast<smx_context_t>(next_context));
247 smx_ctx_boost_jump_fcontext(this, next_context);
250 void BoostParallelContext::stop()
252 BoostContext::stop();
256 void BoostParallelContext::resume()
258 uintptr_t worker_id = __sync_fetch_and_add(&threads_working_, 1);
259 xbt_os_thread_set_specific(worker_id_key_, reinterpret_cast<void*>(worker_id));
261 BoostParallelContext* worker_context = static_cast<BoostParallelContext*>(SIMIX_context_self());
262 workers_context_[worker_id] = worker_context;
264 SIMIX_context_set_current(this);
265 smx_ctx_boost_jump_fcontext(worker_context, this);
270 XBT_PRIVATE ContextFactory* boost_factory()
272 XBT_VERB("Using Boost contexts. Welcome to the 21th century.");
273 return new BoostContextFactory();