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 "src/msg/msg_private.h"
   9
  10 #include "simgrid/s4u/actor.hpp"
  11 #include "simgrid/s4u/comm.hpp"
  12 #include "simgrid/s4u/host.hpp"
  13 #include "simgrid/s4u/mailbox.hpp"
  14
  15 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_actor,"S4U actors");
  16
  17 /* C main function of a actor, running this->main */
  18 static int s4u_actor_runner(int argc, char **argv)
  19 {
  20   simgrid::s4u::Actor *actor = (simgrid::s4u::Actor*) SIMIX_process_self_get_data();
  21   int res = actor->main(argc,argv);
  22   return res;
  23 }
  24
  25
  26
  27 using namespace simgrid;
  28
  29 s4u::Actor::Actor(smx_process_t smx_proc) {
  30   p_smx_process = smx_proc;
  31 }
  32 s4u::Actor::Actor(const char *name, s4u::Host *host, int argc, char **argv)
  33     : s4u::Actor::Actor(name,host, argc,argv, -1) {
  34 }
  35 s4u::Actor::Actor(const char *name, s4u::Host *host, int argc, char **argv, double killTime) {
  36   p_smx_process = simcall_process_create(name, s4u_actor_runner, this, host->name().c_str(), killTime, argc, argv, NULL/*properties*/,0);
  37
  38   xbt_assert(p_smx_process,"Cannot create the actor");
  39 //  TRACE_msg_process_create(procname, simcall_process_get_PID(p_smx_process), host->getInferior());
  40 //  simcall_process_on_exit(p_smx_process,(int_f_pvoid_pvoid_t)TRACE_msg_process_kill,p_smx_process);
  41 }
  42
  43 int s4u::Actor::main(int argc, char **argv) {
  44   fprintf(stderr,"Error: You should override the method main(int, char**) in Actor class %s\n",getName());
  45   return 0;
  46 }
  47 s4u::Actor *s4u::Actor::current()
  48 {
  49   smx_process_t smx_proc = SIMIX_process_self();
  50   simgrid::s4u::Actor* res = (simgrid::s4u::Actor*) SIMIX_process_self_get_data();
  51   if (res == NULL) // The smx_process was not created by S4U (but by deployment?). Embed it in a S4U object
  52     res = new Actor(smx_proc);
  53   return res;
  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::by_name(sg_host_get_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_execution_start(NULL,flops,1.0/*priority*/,0./*bound*/, 0L/*affinity*/);
  89   return simcall_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.start() is optional.
 106   c.wait();
 107 }