1 /* Copyright (c) 2009-2015. The SimGrid Team.
2 * All rights reserved. */
4 /* This program is free software; you can redistribute it and/or modify it
5 * under the terms of the license (GNU LGPL) which comes with this package. */
10 #include "xbt/function_types.h"
11 #include "smx_private.h"
12 #include "src/portable.h" /* loads context system definitions */
14 #include "xbt/xbt_os_thread.h"
15 #include "src/xbt_modinter.h" /* prototype of os thread module's init/exit in XBT */
17 #include "src/simix/smx_private.hpp"
18 #include "src/simix/ThreadContext.hpp"
20 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(simix_context);
22 static xbt_os_sem_t smx_ctx_thread_sem = nullptr;
27 XBT_PRIVATE ContextFactory* thread_factory()
29 XBT_VERB("Activating thread context factory");
30 return new ThreadContextFactory();
33 ThreadContextFactory::ThreadContextFactory()
34 : ContextFactory("ThreadContextFactory")
36 if (SIMIX_context_is_parallel()) {
37 smx_ctx_thread_sem = xbt_os_sem_init(SIMIX_context_get_nthreads());
39 smx_ctx_thread_sem = nullptr;
43 ThreadContextFactory::~ThreadContextFactory()
45 if (smx_ctx_thread_sem) {
46 xbt_os_sem_destroy(smx_ctx_thread_sem);
47 smx_ctx_thread_sem = nullptr;
51 ThreadContext* ThreadContextFactory::create_context(
52 std::function<void()> code,
53 void_pfn_smxprocess_t cleanup, smx_process_t process)
55 return this->new_context<ThreadContext>(std::move(code), cleanup, process, !code);
58 void ThreadContextFactory::run_all()
60 if (smx_ctx_thread_sem == nullptr) {
62 smx_process_t process;
64 xbt_dynar_foreach(simix_global->process_to_run, cursor, process) {
65 XBT_DEBUG("Handling %p",process);
66 ThreadContext* context = static_cast<ThreadContext*>(process->context);
67 xbt_os_sem_release(context->begin_);
68 xbt_os_sem_acquire(context->end_);
73 smx_process_t process;
74 xbt_dynar_foreach(simix_global->process_to_run, index, process)
75 xbt_os_sem_release(static_cast<ThreadContext*>(process->context)->begin_);
76 xbt_dynar_foreach(simix_global->process_to_run, index, process)
77 xbt_os_sem_acquire(static_cast<ThreadContext*>(process->context)->end_);
81 ThreadContext* ThreadContextFactory::self()
83 return static_cast<ThreadContext*>(xbt_os_thread_get_extra_data());
86 ThreadContext* ThreadContextFactory::attach(void_pfn_smxprocess_t cleanup_func, smx_process_t process)
88 return this->new_context<ThreadContext>(
89 std::function<void()>(), cleanup_func, process, false);
92 ThreadContext* ThreadContextFactory::create_maestro(std::function<void()> code, smx_process_t process)
94 return this->new_context<ThreadContext>(std::move(code), nullptr, process, true);
97 ThreadContext::ThreadContext(std::function<void()> code,
98 void_pfn_smxprocess_t cleanup, smx_process_t process, bool maestro)
99 : AttachContext(std::move(code), cleanup, process)
101 // We do not need the semaphores when maestro is in main:
102 // if (!(maestro && !code)) {
103 this->begin_ = xbt_os_sem_init(0);
104 this->end_ = xbt_os_sem_init(0);
107 /* If the user provided a function for the process then use it */
109 if (smx_context_stack_size_was_set)
110 xbt_os_thread_setstacksize(smx_context_stack_size);
111 if (smx_context_guard_size_was_set)
112 xbt_os_thread_setguardsize(smx_context_guard_size);
114 /* create and start the process */
115 /* NOTE: The first argument to xbt_os_thread_create used to be the process *
116 * name, but now the name is stored at SIMIX level, so we pass a null */
118 xbt_os_thread_create(NULL,
119 maestro ? ThreadContext::maestro_wrapper : ThreadContext::wrapper,
121 /* wait the starting of the newly created process */
122 xbt_os_sem_acquire(this->end_);
125 /* Otherwise, we attach to the current thread */
127 xbt_os_thread_set_extra_data(this);
131 ThreadContext::~ThreadContext()
133 /* check if this is the context of maestro (it doesn't have a real thread) */
135 /* wait about the thread terminason */
136 xbt_os_thread_join(this->thread_, nullptr);
138 /* destroy the synchronisation objects */
139 xbt_os_sem_destroy(this->begin_);
140 xbt_os_sem_destroy(this->end_);
144 void *ThreadContext::wrapper(void *param)
146 ThreadContext* context = static_cast<ThreadContext*>(param);
149 /* Install alternate signal stack, for SIGSEGV handler. */
151 stack.ss_sp = sigsegv_stack;
152 stack.ss_size = sizeof sigsegv_stack;
154 sigaltstack(&stack, nullptr);
156 /* Tell the maestro we are starting, and wait for its green light */
157 xbt_os_sem_release(context->end_);
159 xbt_os_sem_acquire(context->begin_);
160 if (smx_ctx_thread_sem) /* parallel run */
161 xbt_os_sem_acquire(smx_ctx_thread_sem);
169 void *ThreadContext::maestro_wrapper(void *param)
171 ThreadContext* context = static_cast<ThreadContext*>(param);
174 /* Install alternate signal stack, for SIGSEGV handler. */
176 stack.ss_sp = sigsegv_stack;
177 stack.ss_size = sizeof sigsegv_stack;
179 sigaltstack(&stack, nullptr);
181 /* Tell the caller we are starting */
182 xbt_os_sem_release(context->end_);
184 // Wait for the caller to give control back to us:
185 xbt_os_sem_acquire(context->begin_);
188 // Tell main that we have finished:
189 xbt_os_sem_release(context->end_);
194 void ThreadContext::start()
196 xbt_os_sem_acquire(this->begin_);
197 if (smx_ctx_thread_sem) /* parallel run */
198 xbt_os_sem_acquire(smx_ctx_thread_sem);
201 void ThreadContext::stop()
204 if (smx_ctx_thread_sem)
205 xbt_os_sem_release(smx_ctx_thread_sem);
207 // Signal to the maestro that it has finished:
208 xbt_os_sem_release(this->end_);
210 xbt_os_thread_exit(NULL);
213 void ThreadContext::suspend()
215 if (smx_ctx_thread_sem)
216 xbt_os_sem_release(smx_ctx_thread_sem);
217 xbt_os_sem_release(this->end_);
218 xbt_os_sem_acquire(this->begin_);
219 if (smx_ctx_thread_sem)
220 xbt_os_sem_acquire(smx_ctx_thread_sem);
223 void ThreadContext::attach_start()
225 // We're breaking the layers here by depending on the upper layer:
226 ThreadContext* maestro = (ThreadContext*) simix_global->maestro_process->context;
227 xbt_os_sem_release(maestro->begin_);
231 void ThreadContext::attach_stop()
233 if (smx_ctx_thread_sem)
234 xbt_os_sem_release(smx_ctx_thread_sem);
235 xbt_os_sem_release(this->end_);
237 ThreadContext* maestro = (ThreadContext*) simix_global->maestro_process->context;
238 xbt_os_sem_acquire(maestro->end_);
240 xbt_os_thread_set_extra_data(nullptr);