Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Merge branch 'master' into S4U
[simgrid.git] / 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(const char *name, s4u::Host *host, int argc, char **argv)
32     : s4u::Actor::Actor(name,host, argc,argv, -1) {
33 }
34 s4u::Actor::Actor(const char *name, s4u::Host *host, int argc, char **argv, double killTime) {
35         p_smx_process = simcall_process_create(name, s4u_actor_runner, this, host->getName(), killTime, argc, argv, NULL/*properties*/,0);
36
37         xbt_assert(p_smx_process,"Cannot create the actor");
38 //      TRACE_msg_process_create(procname, simcall_process_get_PID(p_smx_process), host->getInferior());
39 //      simcall_process_on_exit(p_smx_process,(int_f_pvoid_pvoid_t)TRACE_msg_process_kill,p_smx_process);
40 }
41
42 s4u::Actor *s4u::Actor::current() {
43         smx_process_t smx_proc = SIMIX_process_self();
44         return (simgrid::s4u::Actor*) SIMIX_process_self_get_data(smx_proc);
45 }
46 s4u::Actor *s4u::Actor::byPid(int pid) {
47         return (simgrid::s4u::Actor*) SIMIX_process_self_get_data(SIMIX_process_from_PID(pid));
48 }
49
50 void s4u::Actor::setAutoRestart(bool autorestart) {
51         simcall_process_auto_restart_set(p_smx_process,autorestart);
52 }
53
54 s4u::Host *s4u::Actor::getHost() {
55         return s4u::Host::byName(sg_host_name(simcall_process_get_host(p_smx_process)));
56 }
57 const char* s4u::Actor::getName() {
58         return simcall_process_get_name(p_smx_process);
59 }
60 int s4u::Actor::getPid(){
61         return simcall_process_get_PID(p_smx_process);
62 }
63
64 void s4u::Actor::setKillTime(double time) {
65         simcall_process_set_kill_time(p_smx_process,time);
66 }
67 double s4u::Actor::getKillTime() {
68         return simcall_process_get_kill_time(p_smx_process);
69 }
70 void s4u::Actor::killAll() {
71         simcall_process_killall(1);
72 }
73 void s4u::Actor::kill() {
74         simcall_process_kill(p_smx_process);
75 }
76
77 void s4u::Actor::sleep(double duration) {
78         simcall_process_sleep(duration);
79 }
80
81 void s4u::Actor::execute(double flops) {
82         simcall_process_execute(NULL,flops,1.0/*priority*/,0./*bound*/, 0L/*affinity*/);
83 }
84
85 char *s4u::Actor::recvstr(Mailbox &chan) {
86         void *res=NULL;
87
88         Comm c = Comm::recv_init(chan);
89         c.setDstData(&res,sizeof(res));
90         c.wait();
91
92     return (char*)res;
93 }
94 void s4u::Actor::sendstr(Mailbox &chan, const char*msg) {
95         Comm c = Comm::send_init(this,chan);
96         c.setRemains(strlen(msg));
97         c.setSrcData(xbt_strdup(msg),sizeof(char*));
98         c.wait();
99 }
100
101 s4u::Comm &s4u::Actor::send_init(Mailbox &chan) {
102         return s4u::Comm::send_init(this, chan);
103 }