1 /* Copyright (c) 2006-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. */
8 #include "simgrid/s4u/Actor.hpp"
9 #include "simgrid/s4u/Comm.hpp"
10 #include "simgrid/s4u/Host.hpp"
11 #include "simgrid/s4u/Mailbox.hpp"
13 #include "src/kernel/context/Context.hpp"
14 #include "src/simix/smx_private.h"
18 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_actor, "S4U actors");
23 // ***** Actor creation *****
24 ActorPtr Actor::self()
26 smx_context_t self_context = SIMIX_context_self();
27 if (self_context == nullptr)
28 return simgrid::s4u::ActorPtr();
30 return self_context->process()->iface();
33 ActorPtr Actor::createActor(const char* name, s4u::Host* host, std::function<void()> code)
35 simgrid::simix::ActorImpl* actor = simcall_process_create(name, std::move(code), nullptr, host, nullptr);
36 return actor->iface();
39 ActorPtr Actor::createActor(const char* name, s4u::Host* host, const char* function, std::vector<std::string> args)
41 simgrid::simix::ActorCodeFactory& factory = SIMIX_get_actor_code_factory(function);
42 simgrid::simix::ActorCode code = factory(std::move(args));
43 simgrid::simix::ActorImpl* actor = simcall_process_create(name, std::move(code), nullptr, host, nullptr);
44 return actor->iface();
47 void intrusive_ptr_add_ref(Actor* actor)
49 xbt_assert(actor != nullptr);
50 intrusive_ptr_add_ref(actor->pimpl_);
52 void intrusive_ptr_release(Actor* actor)
54 xbt_assert(actor != nullptr);
55 intrusive_ptr_release(actor->pimpl_);
58 // ***** Actor methods *****
61 simcall_process_join(this->pimpl_, -1);
64 void Actor::setAutoRestart(bool autorestart) {
65 simcall_process_auto_restart_set(pimpl_,autorestart);
68 void Actor::onExit(int_f_pvoid_pvoid_t fun, void* data)
70 simcall_process_on_exit(pimpl_, fun, data);
73 void Actor::migrate(Host* new_host)
75 simcall_process_set_host(pimpl_, new_host);
78 s4u::Host* Actor::host()
80 return this->pimpl_->host;
83 const char* Actor::cname()
85 return this->pimpl_->name.c_str();
88 simgrid::xbt::string Actor::name()
90 return this->pimpl_->name;
95 return this->pimpl_->pid;
100 return this->pimpl_->ppid;
103 void Actor::suspend()
105 simcall_process_suspend(pimpl_);
110 simcall_process_resume(pimpl_);
113 int Actor::isSuspended()
115 return simcall_process_is_suspended(pimpl_);
118 void Actor::setKillTime(double time) {
119 simcall_process_set_kill_time(pimpl_,time);
122 double Actor::killTime()
124 return simcall_process_get_kill_time(pimpl_);
127 void Actor::kill(aid_t pid)
129 smx_actor_t process = SIMIX_process_from_PID(pid);
130 if(process != nullptr) {
131 simcall_process_kill(process);
133 std::ostringstream oss;
134 oss << "kill: ("<< pid <<") - No such process" << std::endl;
135 throw std::runtime_error(oss.str());
139 smx_actor_t Actor::getImpl() {
144 simcall_process_kill(pimpl_);
147 // ***** Static functions *****
149 ActorPtr Actor::byPid(aid_t pid)
151 smx_actor_t process = SIMIX_process_from_PID(pid);
152 if (process != nullptr)
153 return process->iface();
158 void Actor::killAll()
160 simcall_process_killall(1);
163 void Actor::killAll(int resetPid)
165 simcall_process_killall(resetPid);
168 /** Retrieve the property value (or nullptr if not set) */
169 const char* Actor::property(const char* key)
171 return (char*)xbt_dict_get_or_null(simcall_process_get_properties(pimpl_), key);
173 void Actor::setProperty(const char* key, const char* value)
175 simgrid::simix::kernelImmediate([this, key, value] {
176 xbt_dict_set(simcall_process_get_properties(pimpl_), key, (char*)value, (void_f_pvoid_t) nullptr);
180 // ***** this_actor *****
182 namespace this_actor {
184 /** Returns true if run from the kernel mode, and false if run from a real actor
186 * Everything that is run out of any actor (simulation setup before the engine is run,
187 * computing the model evolutions as a result to the actors' action, etc) is run in
188 * kernel mode, just as in any operating systems.
190 * In SimGrid, the actor in charge of doing the stuff in kernel mode is called Maestro,
191 * because it is the one scheduling when the others should move or wait.
195 smx_actor_t process = SIMIX_process_self();
196 return process == nullptr || process == simix_global->maestro_process;
199 void sleep_for(double duration)
202 simcall_process_sleep(duration);
205 XBT_PUBLIC(void) sleep_until(double timeout)
207 double now = SIMIX_get_clock();
209 simcall_process_sleep(timeout - now);
212 e_smx_state_t execute(double flops) {
213 smx_activity_t s = simcall_execution_start(nullptr,flops,1.0/*priority*/,0./*bound*/);
214 return simcall_execution_wait(s);
217 void* recv(MailboxPtr chan) {
219 CommPtr c = Comm::recv_init(chan);
220 c->setDstData(&res, sizeof(res));
225 void* recv(MailboxPtr chan, double timeout)
228 CommPtr c = Comm::recv_init(chan);
229 c->setDstData(&res, sizeof(res));
234 void send(MailboxPtr chan, void* payload, double simulatedSize)
236 CommPtr c = Comm::send_init(chan);
237 c->setRemains(simulatedSize);
238 c->setSrcData(payload);
239 // c->start() is optional.
243 void send(MailboxPtr chan, void* payload, double simulatedSize, double timeout)
245 CommPtr c = Comm::send_init(chan);
246 c->setRemains(simulatedSize);
247 c->setSrcData(payload);
248 // c->start() is optional.
252 CommPtr isend(MailboxPtr chan, void* payload, double simulatedSize)
254 return Comm::send_async(chan, payload, simulatedSize);
257 void dsend(MailboxPtr chan, void* payload, double simulatedSize)
259 Comm::send_detached(chan, payload, simulatedSize);
262 CommPtr irecv(MailboxPtr chan, void** data)
264 return Comm::recv_async(chan, data);
269 return SIMIX_process_self()->pid;
274 return SIMIX_process_self()->ppid;
279 return SIMIX_process_self()->name;
284 return SIMIX_process_self()->host;
289 simcall_process_suspend(SIMIX_process_self());
294 simcall_process_resume(SIMIX_process_self());
299 return simcall_process_is_suspended(SIMIX_process_self());
304 simcall_process_kill(SIMIX_process_self());
307 void onExit(int_f_pvoid_pvoid_t fun, void* data)
309 simcall_process_on_exit(SIMIX_process_self(), fun, data);
312 void migrate(Host* new_host)
314 simcall_process_set_host(SIMIX_process_self(), new_host);