src/s4u/s4u_actor.cpp

   1 /* Copyright (c) 2006-2017. The SimGrid Team. All rights reserved.          */
   2
   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. */
   5
   6 #include "xbt/log.h"
   7
   8 #include "simgrid/s4u/Actor.hpp"
   9 #include "simgrid/s4u/Comm.hpp"
  10 #include "simgrid/s4u/Exec.hpp"
  11 #include "simgrid/s4u/Host.hpp"
  12 #include "simgrid/s4u/Mailbox.hpp"
  13
  14 #include "src/kernel/context/Context.hpp"
  15 #include "src/simix/smx_private.hpp"
  16
  17 #include <sstream>
  18
  19 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_actor, "S4U actors");
  20
  21 namespace simgrid {
  22 namespace s4u {
  23
  24 // ***** Actor creation *****
  25 ActorPtr Actor::self()
  26 {
  27   smx_context_t self_context = SIMIX_context_self();
  28   if (self_context == nullptr)
  29     return simgrid::s4u::ActorPtr();
  30
  31   return self_context->process()->iface();
  32 }
  33
  34 ActorPtr Actor::createActor(const char* name, s4u::Host* host, std::function<void()> code)
  35 {
  36   simgrid::simix::ActorImpl* actor = simcall_process_create(name, std::move(code), nullptr, host, nullptr);
  37   return actor->iface();
  38 }
  39
  40 ActorPtr Actor::createActor(const char* name, s4u::Host* host, const char* function, std::vector<std::string> args)
  41 {
  42   simgrid::simix::ActorCodeFactory& factory = SIMIX_get_actor_code_factory(function);
  43   simgrid::simix::ActorCode code = factory(std::move(args));
  44   simgrid::simix::ActorImpl* actor          = simcall_process_create(name, std::move(code), nullptr, host, nullptr);
  45   return actor->iface();
  46 }
  47
  48 void intrusive_ptr_add_ref(Actor* actor)
  49 {
  50   intrusive_ptr_add_ref(actor->pimpl_);
  51 }
  52 void intrusive_ptr_release(Actor* actor)
  53 {
  54   intrusive_ptr_release(actor->pimpl_);
  55 }
  56
  57 // ***** Actor methods *****
  58
  59 void Actor::join() {
  60   simcall_process_join(this->pimpl_, -1);
  61 }
  62
  63 void Actor::join(double timeout)
  64 {
  65   simcall_process_join(this->pimpl_, timeout);
  66 }
  67
  68 void Actor::setAutoRestart(bool autorestart) {
  69   simgrid::simix::kernelImmediate([this, autorestart]() { pimpl_->auto_restart = autorestart; });
  70 }
  71
  72 void Actor::onExit(int_f_pvoid_pvoid_t fun, void* data)
  73 {
  74   simcall_process_on_exit(pimpl_, fun, data);
  75 }
  76
  77 /** @brief Moves the actor to another host
  78  *
  79  * If the actor is currently blocked on an execution activity, the activity is also
  80  * migrated to the new host. If it's blocked on another kind of activity, an error is
  81  * raised as the mandated code is not written yet. Please report that bug if you need it.
  82  *
  83  * Asynchronous activities started by the actor are not migrated automatically, so you have
  84  * to take care of this yourself (only you knows which ones should be migrated).
  85  */
  86 void Actor::migrate(Host* new_host)
  87 {
  88   simgrid::simix::kernelImmediate([this, new_host]() {
  89     if (pimpl_->waiting_synchro != nullptr) {
  90       // The actor is blocked on an activity. If it's an exec, migrate it too.
  91       // FIXME: implement the migration of other kind of activities
  92       simgrid::kernel::activity::ExecImplPtr exec =
  93           boost::dynamic_pointer_cast<simgrid::kernel::activity::ExecImpl>(pimpl_->waiting_synchro);
  94       xbt_assert(exec.get() != nullptr, "We can only migrate blocked actors when they are blocked on executions.");
  95       exec->migrate(new_host);
  96     }
  97     SIMIX_process_change_host(this->pimpl_, new_host);
  98   });
  99 }
 100
 101 s4u::Host* Actor::getHost()
 102 {
 103   return this->pimpl_->host;
 104 }
 105
 106 void Actor::daemonize()
 107 {
 108   simgrid::simix::kernelImmediate([this]() { pimpl_->daemonize(); });
 109 }
 110
 111 const simgrid::xbt::string& Actor::getName() const
 112 {
 113   return this->pimpl_->getName();
 114 }
 115
 116 const char* Actor::getCname() const
 117 {
 118   return this->pimpl_->getCname();
 119 }
 120
 121 aid_t Actor::getPid()
 122 {
 123   return this->pimpl_->pid;
 124 }
 125
 126 aid_t Actor::getPpid()
 127 {
 128   return this->pimpl_->ppid;
 129 }
 130
 131 void Actor::suspend()
 132 {
 133   simcall_process_suspend(pimpl_);
 134 }
 135
 136 void Actor::resume()
 137 {
 138   simgrid::simix::kernelImmediate([this] { pimpl_->resume(); });
 139 }
 140
 141 int Actor::isSuspended()
 142 {
 143   return simgrid::simix::kernelImmediate([this] { return pimpl_->suspended; });
 144 }
 145
 146 void Actor::setKillTime(double time) {
 147   simcall_process_set_kill_time(pimpl_,time);
 148 }
 149
 150 /** \brief Get the kill time of an actor(or 0 if unset). */
 151 double Actor::getKillTime()
 152 {
 153   return SIMIX_timer_get_date(pimpl_->kill_timer);
 154 }
 155
 156 void Actor::kill(aid_t pid)
 157 {
 158   smx_actor_t process = SIMIX_process_from_PID(pid);
 159   if(process != nullptr) {
 160     simgrid::simix::kernelImmediate([process] { SIMIX_process_kill(process, process); });
 161   } else {
 162     std::ostringstream oss;
 163     oss << "kill: ("<< pid <<") - No such process" << std::endl;
 164     throw std::runtime_error(oss.str());
 165   }
 166 }
 167
 168 smx_actor_t Actor::getImpl() {
 169   return pimpl_;
 170 }
 171
 172 void Actor::kill() {
 173   smx_actor_t process = SIMIX_process_self();
 174   simgrid::simix::kernelImmediate(
 175       [this, process] { SIMIX_process_kill(pimpl_, (pimpl_ == simix_global->maestro_process) ? pimpl_ : process); });
 176 }
 177
 178 // ***** Static functions *****
 179
 180 ActorPtr Actor::byPid(aid_t pid)
 181 {
 182   smx_actor_t process = SIMIX_process_from_PID(pid);
 183   if (process != nullptr)
 184     return process->iface();
 185   else
 186     return ActorPtr();
 187 }
 188
 189 void Actor::killAll()
 190 {
 191   simcall_process_killall(1);
 192 }
 193
 194 void Actor::killAll(int resetPid)
 195 {
 196   simcall_process_killall(resetPid);
 197 }
 198
 199 std::map<std::string, std::string>* Actor::getProperties()
 200 {
 201   return simgrid::simix::kernelImmediate([this] { return this->pimpl_->getProperties(); });
 202 }
 203
 204 /** Retrieve the property value (or nullptr if not set) */
 205 const char* Actor::getProperty(const char* key)
 206 {
 207   return simgrid::simix::kernelImmediate([this, key] { return pimpl_->getProperty(key); });
 208 }
 209
 210 void Actor::setProperty(const char* key, const char* value)
 211 {
 212   simgrid::simix::kernelImmediate([this, key, value] { pimpl_->setProperty(key, value); });
 213 }
 214
 215 Actor* Actor::restart()
 216 {
 217   return simgrid::simix::kernelImmediate([this]() { return pimpl_->restart(); });
 218 }
 219
 220 // ***** this_actor *****
 221
 222 namespace this_actor {
 223
 224 /** Returns true if run from the kernel mode, and false if run from a real actor
 225  *
 226  * Everything that is run out of any actor (simulation setup before the engine is run,
 227  * computing the model evolutions as a result to the actors' action, etc) is run in
 228  * kernel mode, just as in any operating systems.
 229  *
 230  * In SimGrid, the actor in charge of doing the stuff in kernel mode is called Maestro,
 231  * because it is the one scheduling when the others should move or wait.
 232  */
 233 bool isMaestro()
 234 {
 235   smx_actor_t process = SIMIX_process_self();
 236   return process == nullptr || process == simix_global->maestro_process;
 237 }
 238
 239 void sleep_for(double duration)
 240 {
 241   if (duration > 0)
 242     simcall_process_sleep(duration);
 243 }
 244
 245 void yield()
 246 {
 247   simgrid::simix::kernelImmediate([] { /* do nothing*/ });
 248 }
 249
 250 XBT_PUBLIC(void) sleep_until(double timeout)
 251 {
 252   double now = SIMIX_get_clock();
 253   if (timeout > now)
 254     simcall_process_sleep(timeout - now);
 255 }
 256
 257 void execute(double flops)
 258 {
 259   smx_activity_t s = simcall_execution_start(nullptr, flops, 1.0 /*priority*/, 0. /*bound*/, getHost());
 260   simcall_execution_wait(s);
 261 }
 262
 263 void execute(double flops, double priority)
 264 {
 265   smx_activity_t s = simcall_execution_start(nullptr, flops, 1 / priority /*priority*/, 0. /*bound*/, getHost());
 266   simcall_execution_wait(s);
 267 }
 268
 269 void parallel_execute(int host_nb, sg_host_t* host_list, double* flops_amount, double* bytes_amount, double timeout)
 270 {
 271   smx_activity_t s =
 272       simcall_execution_parallel_start(nullptr, host_nb, host_list, flops_amount, bytes_amount, -1, timeout);
 273   simcall_execution_wait(s);
 274 }
 275
 276 void parallel_execute(int host_nb, sg_host_t* host_list, double* flops_amount, double* bytes_amount)
 277 {
 278   smx_activity_t s = simcall_execution_parallel_start(nullptr, host_nb, host_list, flops_amount, bytes_amount, -1, -1);
 279   simcall_execution_wait(s);
 280 }
 281
 282 ExecPtr exec_init(double flops_amount)
 283 {
 284   ExecPtr res        = ExecPtr(new Exec());
 285   res->host_         = getHost();
 286   res->flops_amount_ = flops_amount;
 287   res->setRemains(flops_amount);
 288   return res;
 289 }
 290
 291 ExecPtr exec_async(double flops)
 292 {
 293   ExecPtr res = exec_init(flops);
 294   res->start();
 295   return res;
 296 }
 297
 298 void* recv(MailboxPtr chan) // deprecated
 299 {
 300   return chan->get();
 301 }
 302
 303 void* recv(MailboxPtr chan, double timeout) // deprecated
 304 {
 305   return chan->get(timeout);
 306 }
 307
 308 void send(MailboxPtr chan, void* payload, double simulatedSize) // deprecated
 309 {
 310   chan->put(payload, simulatedSize);
 311 }
 312
 313 void send(MailboxPtr chan, void* payload, double simulatedSize, double timeout) // deprecated
 314 {
 315   chan->put(payload, simulatedSize, timeout);
 316 }
 317
 318 CommPtr isend(MailboxPtr chan, void* payload, double simulatedSize) // deprecated
 319 {
 320   return chan->put_async(payload, simulatedSize);
 321 }
 322
 323 CommPtr irecv(MailboxPtr chan, void** data) // deprecated
 324 {
 325   return chan->get_async(data);
 326 }
 327
 328 aid_t getPid()
 329 {
 330   return SIMIX_process_self()->pid;
 331 }
 332
 333 aid_t getPpid()
 334 {
 335   return SIMIX_process_self()->ppid;
 336 }
 337
 338 std::string getName()
 339 {
 340   return SIMIX_process_self()->getName();
 341 }
 342
 343 const char* getCname()
 344 {
 345   return SIMIX_process_self()->getCname();
 346 }
 347
 348 Host* getHost()
 349 {
 350   return SIMIX_process_self()->host;
 351 }
 352
 353 void suspend()
 354 {
 355   simcall_process_suspend(SIMIX_process_self());
 356 }
 357
 358 void resume()
 359 {
 360   smx_actor_t process = SIMIX_process_self();
 361   simgrid::simix::kernelImmediate([process] { process->resume(); });
 362 }
 363
 364 bool isSuspended()
 365 {
 366   smx_actor_t process = SIMIX_process_self();
 367   return simgrid::simix::kernelImmediate([process] { return process->suspended; });
 368 }
 369
 370 void kill()
 371 {
 372   smx_actor_t process = SIMIX_process_self();
 373   simgrid::simix::kernelImmediate([process] { SIMIX_process_kill(process, process); });
 374 }
 375
 376 void onExit(int_f_pvoid_pvoid_t fun, void* data)
 377 {
 378   simcall_process_on_exit(SIMIX_process_self(), fun, data);
 379 }
 380
 381 /** @brief Moves the current actor to another host
 382  *
 383  * @see simgrid::s4u::Actor::migrate() for more information
 384  */
 385 void migrate(Host* new_host)
 386 {
 387   SIMIX_process_self()->iface()->migrate(new_host);
 388 }
 389 }
 390 }
 391 }