-}
-
-UContext::~UContext()
-{
- SIMIX_context_stack_delete(this->stack_);
-}
-
-void UContext::wrapper(int i1, int i2)
-{
- smx_ctx_sysv_wrapper(i1, i2);
-}
-
-/** A better makecontext
- *
- * Makecontext expects integer arguments, we the context variable is decomposed into a serie of integers and each
- * integer is passed as argument to makecontext.
- */
-void UContext::make_ctx(ucontext_t* ucp, void (*func)(int, int), UContext* arg)
-{
- int ctx_addr[CTX_ADDR_LEN]{};
- memcpy(ctx_addr, &arg, sizeof arg);
- makecontext(ucp, (void (*)())func, 2, ctx_addr[0], ctx_addr[1]);
-}
-
-void UContext::stop()
-{
- Context::stop();
- throw StopRequest();
-}
-
-// SerialUContext
-
-unsigned long SerialUContext::process_index_; /* index of the next process to run in the list of runnable processes */
-
-void SerialUContext::suspend()
-{
- /* determine the next context */
- SerialUContext* next_context;
- unsigned long int i = process_index_;
- process_index_++;
-
- if (i < simix_global->process_to_run.size()) {
- /* execute the next process */
- XBT_DEBUG("Run next process");
- next_context = static_cast<SerialUContext*>(simix_global->process_to_run[i]->context);
- } else {
- /* all processes were run, return to maestro */
- XBT_DEBUG("No more process to run");
- next_context = static_cast<SerialUContext*>(UContext::getMaestro());
- }
- SIMIX_context_set_current(next_context);
- UContext::swap(this, next_context);
-}
-
-void SerialUContext::resume()
-{
- SIMIX_context_set_current(this);
- UContext::swap(UContext::getMaestro(), this);
-}
-
-void SerialUContext::run_all()
-{
- if (simix_global->process_to_run.empty())
- return;
- smx_actor_t first_process = simix_global->process_to_run.front();
- process_index_ = 1;
- static_cast<SerialUContext*>(first_process->context)->resume();
-}
-
-// ParallelUContext
-
-#if HAVE_THREAD_CONTEXTS
-
-simgrid::xbt::Parmap<smx_actor_t>* ParallelUContext::parmap_;
-std::atomic<uintptr_t> ParallelUContext::threads_working_; /* number of threads that have started their work */
-xbt_os_thread_key_t ParallelUContext::worker_id_key_; /* thread-specific storage for the thread id */
-std::vector<ParallelUContext*> ParallelUContext::workers_context_; /* space to save the worker's context
- * in each thread */
-
-void ParallelUContext::initialize()
-{
- parmap_ = nullptr;
- workers_context_.clear();
- workers_context_.resize(SIMIX_context_get_nthreads(), nullptr);
- xbt_os_thread_key_create(&worker_id_key_);
-}
-
-void ParallelUContext::finalize()
-{
- delete parmap_;
- parmap_ = nullptr;
- workers_context_.clear();
- xbt_os_thread_key_destroy(worker_id_key_);
-}
-
-void ParallelUContext::run_all()
-{
- threads_working_ = 0;
- // Parmap_apply ensures that every working thread get an index in the process_to_run array (through an atomic
- // fetch_and_add), and runs the ParallelUContext::resume function on that index
-
- // We lazily create the parmap because the parmap creates context with simix_global->context_factory (which might not
- // be initialized when bootstrapping):
- if (parmap_ == nullptr)
- parmap_ = new simgrid::xbt::Parmap<smx_actor_t>(SIMIX_context_get_nthreads(), SIMIX_context_get_parallel_mode());
- parmap_->apply(
- [](smx_actor_t process) {
- ParallelUContext* context = static_cast<ParallelUContext*>(process->context);
- context->resume();
- },
- simix_global->process_to_run);
-}
-
-/** Yield
- *
- * This function is called when a simulated process wants to yield back to the maestro in a blocking simcall. This
- * naturally occurs within SIMIX_context_suspend(self->context), called from SIMIX_process_yield() Actually, it does not
- * really yield back to maestro, but into the next process that must be executed. If no one is to be executed, then it
- * yields to the initial soul that was in this working thread (that was saved in resume_parallel).
- */
-void ParallelUContext::suspend()
-{
- /* determine the next context */
- // Get the next soul to embody now:
- boost::optional<smx_actor_t> next_work = parmap_->next();
- ParallelUContext* next_context;
- if (next_work) {
- // There is a next soul to embody (ie, a next process to resume)
- XBT_DEBUG("Run next process");
- next_context = static_cast<ParallelUContext*>(next_work.get()->context);
- } else {
- // All processes were run, go to the barrier
- XBT_DEBUG("No more processes to run");
- // Get back the identity of my body that was stored when starting the scheduling round
- uintptr_t worker_id = reinterpret_cast<uintptr_t>(xbt_os_thread_get_specific(worker_id_key_));
- // Deduce the initial soul of that body
- next_context = workers_context_[worker_id];
- // When given that soul, the body will wait for the next scheduling round