src/s4u/s4u_actor.cpp

   1 /* Copyright (c) 2006-2014. The SimGrid Team.
   2  * All rights reserved.                                                     */
   3
   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. */
   6
   7 #include "xbt/log.h"
   8 #include "msg/msg_private.h"
   9 #include "msg/msg_mailbox.h"
  10
  11 #include "simgrid/s4u/actor.hpp"
  12 #include "simgrid/s4u/comm.hpp"
  13 #include "simgrid/s4u/host.hpp"
  14 #include "simgrid/s4u/mailbox.hpp"
  15
  16 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_actor,"S4U actors");
  17
  18 /* C main function of a actor, running this->main */
  19 static int s4u_actor_runner(int argc, char **argv) {
  20
  21         smx_process_t smx_proc = SIMIX_process_self();
  22         simgrid::s4u::Actor *actor = (simgrid::s4u::Actor*) SIMIX_process_self_get_data(smx_proc);
  23         int res = actor->main(argc,argv);
  24         return res;
  25 }
  26
  27
  28
  29 using namespace simgrid;
  30
  31 s4u::Actor::Actor(smx_process_t smx_proc) {
  32         p_smx_process = smx_proc;
  33 }
  34 s4u::Actor::Actor(const char *name, s4u::Host *host, int argc, char **argv)
  35     : s4u::Actor::Actor(name,host, argc,argv, -1) {
  36 }
  37 s4u::Actor::Actor(const char *name, s4u::Host *host, int argc, char **argv, double killTime) {
  38         p_smx_process = simcall_process_create(name, s4u_actor_runner, this, host->getName(), killTime, argc, argv, NULL/*properties*/,0);
  39
  40         xbt_assert(p_smx_process,"Cannot create the actor");
  41 //      TRACE_msg_process_create(procname, simcall_process_get_PID(p_smx_process), host->getInferior());
  42 //      simcall_process_on_exit(p_smx_process,(int_f_pvoid_pvoid_t)TRACE_msg_process_kill,p_smx_process);
  43 }
  44
  45 s4u::Actor *s4u::Actor::current() {
  46         smx_process_t smx_proc = SIMIX_process_self();
  47         simgrid::s4u::Actor* res = (simgrid::s4u::Actor*) SIMIX_process_self_get_data(smx_proc);
  48         if (res == NULL) // The smx_process was not created by S4U (but by deployment?). Embed it in a S4U object
  49                 res = new Actor(smx_proc);
  50         return res;
  51 }
  52 s4u::Actor *s4u::Actor::byPid(int pid) {
  53         return (simgrid::s4u::Actor*) SIMIX_process_self_get_data(SIMIX_process_from_PID(pid));
  54 }
  55
  56 void s4u::Actor::setAutoRestart(bool autorestart) {
  57         simcall_process_auto_restart_set(p_smx_process,autorestart);
  58 }
  59
  60 s4u::Host *s4u::Actor::getHost() {
  61         return s4u::Host::byName(sg_host_name(simcall_process_get_host(p_smx_process)));
  62 }
  63 const char* s4u::Actor::getName() {
  64         return simcall_process_get_name(p_smx_process);
  65 }
  66 int s4u::Actor::getPid(){
  67         return simcall_process_get_PID(p_smx_process);
  68 }
  69
  70 void s4u::Actor::setKillTime(double time) {
  71         simcall_process_set_kill_time(p_smx_process,time);
  72 }
  73 double s4u::Actor::getKillTime() {
  74         return simcall_process_get_kill_time(p_smx_process);
  75 }
  76 void s4u::Actor::killAll() {
  77         simcall_process_killall(1);
  78 }
  79 void s4u::Actor::kill() {
  80         simcall_process_kill(p_smx_process);
  81 }
  82
  83 void s4u::Actor::sleep(double duration) {
  84         simcall_process_sleep(duration);
  85 }
  86
  87 e_smx_state_t s4u::Actor::execute(double flops) {
  88         smx_synchro_t s = simcall_process_execute(NULL,flops,1.0/*priority*/,0./*bound*/, 0L/*affinity*/);
  89     return simcall_process_execution_wait(s);
  90 }
  91
  92 void *s4u::Actor::recv(Mailbox &chan) {
  93         void *res=NULL;
  94
  95         Comm c = Comm::recv_init(this, chan);
  96         c.setDstData(&res,sizeof(res));
  97         c.wait();
  98
  99     return res;
 100 }
 101 void s4u::Actor::send(Mailbox &chan, void *payload, size_t simulatedSize) {
 102         Comm c = Comm::send_init(this,chan);
 103         c.setRemains(simulatedSize);
 104         c.setSrcData(payload);
 105         c.wait();
 106 }
 107
 108 s4u::Comm &s4u::Actor::send_init(Mailbox &chan) {
 109         return s4u::Comm::send_init(this, chan);
 110 }