Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
make it possible to return intrusive_ptr in simcalls
[simgrid.git] / src / kernel / activity / CommImpl.cpp
1 /* Copyright (c) 2007-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 "src/kernel/activity/CommImpl.hpp"
7
8 #include "simgrid/modelchecker.h"
9 #include "src/mc/mc_replay.h"
10 #include "src/simix/smx_network_private.h"
11 #include "src/surf/surf_interface.hpp"
12
13 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(simix_network);
14
15 simgrid::kernel::activity::CommImpl::CommImpl(e_smx_comm_type_t _type) : type(_type)
16 {
17   state    = SIMIX_WAITING;
18   src_data = nullptr;
19   dst_data = nullptr;
20   intrusive_ptr_add_ref(this);
21   XBT_DEBUG("Create comm activity %p", this);
22 }
23
24 simgrid::kernel::activity::CommImpl::~CommImpl()
25 {
26   XBT_DEBUG("Really free communication %p", this);
27
28   cleanupSurf();
29
30   if (detached && state != SIMIX_DONE) {
31     /* the communication has failed and was detached:
32      * we have to free the buffer */
33     if (clean_fun)
34       clean_fun(src_buff);
35     src_buff = nullptr;
36   }
37
38   if (mbox)
39     mbox->remove(this);
40 }
41
42 void simgrid::kernel::activity::CommImpl::suspend()
43 {
44   /* FIXME: shall we suspend also the timeout synchro? */
45   if (surf_comm)
46     surf_comm->suspend();
47   /* in the other case, the action will be suspended on creation, in SIMIX_comm_start() */
48 }
49
50 void simgrid::kernel::activity::CommImpl::resume()
51 {
52   /*FIXME: check what happen with the timeouts */
53   if (surf_comm)
54     surf_comm->resume();
55   /* in the other case, the synchro were not really suspended yet, see SIMIX_comm_suspend() and SIMIX_comm_start() */
56 }
57
58 void simgrid::kernel::activity::CommImpl::cancel()
59 {
60   /* if the synchro is a waiting state means that it is still in a mbox */
61   /* so remove from it and delete it */
62   if (state == SIMIX_WAITING) {
63     mbox->remove(this);
64     state = SIMIX_CANCELED;
65     this->unref();
66   } else if (not MC_is_active() /* when running the MC there are no surf actions */
67              && not MC_record_replay_is_active() && (state == SIMIX_READY || state == SIMIX_RUNNING)) {
68
69     surf_comm->cancel();
70   }
71 }
72
73 /**  @brief get the amount remaining from the communication */
74 double simgrid::kernel::activity::CommImpl::remains()
75 {
76   if (state == SIMIX_RUNNING)
77     return surf_comm->getRemains();
78
79   /* FIXME: check what should be returned in the other cases */
80   return 0;
81 }
82
83 /** @brief This is part of the cleanup process, probably an internal command */
84 void simgrid::kernel::activity::CommImpl::cleanupSurf()
85 {
86   if (surf_comm) {
87     surf_comm->unref();
88     surf_comm = nullptr;
89   }
90
91   if (src_timeout) {
92     src_timeout->unref();
93     src_timeout = nullptr;
94   }
95
96   if (dst_timeout) {
97     dst_timeout->unref();
98     dst_timeout = nullptr;
99   }
100 }
101
102 void simgrid::kernel::activity::CommImpl::post()
103 {
104   /* Update synchro state */
105   if (src_timeout && src_timeout->getState() == simgrid::surf::Action::State::done)
106     state = SIMIX_SRC_TIMEOUT;
107   else if (dst_timeout && dst_timeout->getState() == simgrid::surf::Action::State::done)
108     state = SIMIX_DST_TIMEOUT;
109   else if (src_timeout && src_timeout->getState() == simgrid::surf::Action::State::failed)
110     state = SIMIX_SRC_HOST_FAILURE;
111   else if (dst_timeout && dst_timeout->getState() == simgrid::surf::Action::State::failed)
112     state = SIMIX_DST_HOST_FAILURE;
113   else if (surf_comm && surf_comm->getState() == simgrid::surf::Action::State::failed) {
114     state = SIMIX_LINK_FAILURE;
115   } else
116     state = SIMIX_DONE;
117
118   XBT_DEBUG("SIMIX_post_comm: comm %p, state %d, src_proc %p, dst_proc %p, detached: %d", this, (int)state, src_proc,
119             dst_proc, detached);
120
121   /* destroy the surf actions associated with the Simix communication */
122   cleanupSurf();
123
124   /* if there are simcalls associated with the synchro, then answer them */
125   if (not simcalls.empty()) {
126     SIMIX_comm_finish(this);
127     this->unref();
128   }
129 }