1 /* Copyright (c) 2006-2014. 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. */
8 #include "src/msg/msg_private.h"
10 #include "simgrid/s4u/actor.hpp"
11 #include "simgrid/s4u/comm.hpp"
12 #include "simgrid/s4u/host.hpp"
13 #include "simgrid/s4u/mailbox.hpp"
15 #include "src/simix/smx_private.h"
17 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_actor,"S4U actors");
22 Actor::Actor(const char* name, s4u::Host *host, double killTime, std::function<void()> code)
24 // TODO, when autorestart is used, the std::function is copied so the new
25 // instance will get a fresh (reinitialized) state. Is this what we want?
26 this->pimpl_ = SIMIX_process_ref(simcall_process_create(
27 name, std::move(code), nullptr, host->name().c_str(),
28 killTime, nullptr, 0));
31 Actor::Actor(const char* name, s4u::Host *host, double killTime,
32 const char* function, std::vector<std::string> args)
34 simgrid::simix::ActorCodeFactory& factory = SIMIX_get_actor_code_factory(function);
35 simgrid::simix::ActorCode code = factory(std::move(args));
36 this->pimpl_ = SIMIX_process_ref(simcall_process_create(
37 name, std::move(code), nullptr, host->name().c_str(),
38 killTime, nullptr, 0));
42 simcall_process_join(pimpl_, -1);
45 void Actor::setAutoRestart(bool autorestart) {
46 simcall_process_auto_restart_set(pimpl_,autorestart);
49 s4u::Host *Actor::getHost() {
50 return s4u::Host::by_name(sg_host_get_name(simcall_process_get_host(pimpl_)));
53 const char* Actor::getName() {
54 return simcall_process_get_name(pimpl_);
58 return simcall_process_get_PID(pimpl_);
61 void Actor::setKillTime(double time) {
62 simcall_process_set_kill_time(pimpl_,time);
65 double Actor::getKillTime() {
66 return simcall_process_get_kill_time(pimpl_);
69 void Actor::kill(int pid) {
70 msg_process_t process = SIMIX_process_from_PID(pid);
71 if(process != nullptr) {
72 simcall_process_kill(process);
74 std::ostringstream oss;
75 oss << "kill: ("<< pid <<") - No such process" << std::endl;
76 throw std::runtime_error(oss.str());
80 smx_process_t Actor::getInferior() {
86 simcall_process_kill(pimpl_);
89 simgrid::s4u::Actor Actor::forPid(int pid)
91 // Should we throw if we did not find it?
92 smx_process_t process = SIMIX_process_from_PID(pid);
93 return simgrid::s4u::Actor(process);
98 void Actor::killAll() {
99 simcall_process_killall(1);
102 namespace this_actor {
104 void sleep(double duration) {
105 simcall_process_sleep(duration);
108 e_smx_state_t execute(double flops) {
109 smx_synchro_t s = simcall_execution_start(nullptr,flops,1.0/*priority*/,0./*bound*/, 0L/*affinity*/);
110 return simcall_execution_wait(s);
113 void* recv(Mailbox &chan) {
115 Comm c = Comm::recv_init(chan);
116 c.setDstData(&res,sizeof(res));
121 void send(Mailbox &chan, void *payload, size_t simulatedSize) {
122 Comm c = Comm::send_init(chan);
123 c.setRemains(simulatedSize);
124 c.setSrcData(payload);
125 // c.start() is optional.
130 return simcall_process_get_PID(SIMIX_process_self());