1 /* Copyright (c) 2006-2017. The SimGrid Team. All rights reserved. */
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. */
7 #include "src/msg/msg_private.h"
9 #include "simgrid/s4u/Comm.hpp"
10 #include "simgrid/s4u/Mailbox.hpp"
12 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(s4u_comm,s4u_activity,"S4U asynchronous communications");
18 if (state_ == started && not detached_ && (pimpl_ == nullptr || pimpl_->state == SIMIX_RUNNING)) {
19 XBT_INFO("Comm %p freed before its completion. Detached: %d, State: %d", this, detached_, state_);
20 if (pimpl_ != nullptr)
21 XBT_INFO("pimpl_->state: %d", pimpl_->state);
23 XBT_INFO("pimpl_ is null");
24 xbt_backtrace_display_current();
30 s4u::CommPtr Comm::send_init(s4u::MailboxPtr chan)
32 CommPtr res = CommPtr(new s4u::Comm());
33 res->sender_ = SIMIX_process_self();
38 s4u::CommPtr Comm::recv_init(s4u::MailboxPtr chan)
40 CommPtr res = CommPtr(new s4u::Comm());
41 res->receiver_ = SIMIX_process_self();
46 void Comm::setRate(double rate) {
47 xbt_assert(state_==inited);
51 void Comm::setSrcData(void * buff) {
52 xbt_assert(state_==inited);
53 xbt_assert(dstBuff_ == nullptr, "Cannot set the src and dst buffers at the same time");
56 void Comm::setSrcDataSize(size_t size){
57 xbt_assert(state_==inited);
60 void Comm::setSrcData(void * buff, size_t size) {
61 xbt_assert(state_==inited);
63 xbt_assert(dstBuff_ == nullptr, "Cannot set the src and dst buffers at the same time");
67 void Comm::setDstData(void ** buff) {
68 xbt_assert(state_==inited);
69 xbt_assert(srcBuff_ == nullptr, "Cannot set the src and dst buffers at the same time");
72 size_t Comm::getDstDataSize(){
73 xbt_assert(state_==finished);
76 void Comm::setDstData(void ** buff, size_t size) {
77 xbt_assert(state_==inited);
79 xbt_assert(srcBuff_ == nullptr, "Cannot set the src and dst buffers at the same time");
85 xbt_assert(state_ == inited);
87 if (srcBuff_ != nullptr) { // Sender side
88 pimpl_ = simcall_comm_isend(sender_, mailbox_->getImpl(), remains_, rate_,
89 srcBuff_, srcBuffSize_,
90 matchFunction_, cleanFunction_, copyDataFunction_,
91 userData_, detached_);
92 } else if (dstBuff_ != nullptr) { // Receiver side
93 pimpl_ = simcall_comm_irecv(receiver_, mailbox_->getImpl(), dstBuff_, &dstBuffSize_,
94 matchFunction_, copyDataFunction_,
98 xbt_die("Cannot start a communication before specifying whether we are the sender or the receiver");
103 xbt_assert(state_ == started || state_ == inited);
105 if (state_ == started)
106 simcall_comm_wait(pimpl_, -1/*timeout*/);
107 else { // state_ == inited. Save a simcall and do directly a blocking send/recv
108 if (srcBuff_ != nullptr) {
109 simcall_comm_send(sender_, mailbox_->getImpl(), remains_, rate_,
110 srcBuff_, srcBuffSize_,
111 matchFunction_, copyDataFunction_,
112 userData_, -1 /*timeout*/);
114 simcall_comm_recv(receiver_, mailbox_->getImpl(), dstBuff_, &dstBuffSize_,
115 matchFunction_, copyDataFunction_,
116 userData_, -1/*timeout*/, rate_);
124 void Comm::wait(double timeout) {
125 xbt_assert(state_ == started || state_ == inited);
127 if (state_ == started) {
128 simcall_comm_wait(pimpl_, timeout);
134 // It's not started yet. Do it in one simcall
135 if (srcBuff_ != nullptr) {
136 simcall_comm_send(sender_, mailbox_->getImpl(), remains_, rate_,
137 srcBuff_, srcBuffSize_,
138 matchFunction_, copyDataFunction_,
141 simcall_comm_recv(receiver_, mailbox_->getImpl(), dstBuff_, &dstBuffSize_,
142 matchFunction_, copyDataFunction_,
143 userData_, timeout, rate_);
150 void Comm::send_detached(MailboxPtr dest, void* data, int simulatedSize)
152 s4u::CommPtr res = CommPtr(s4u::Comm::send_init(dest));
153 res->setRemains(simulatedSize);
154 res->srcBuff_ = data;
155 res->srcBuffSize_ = sizeof(void*);
156 res->detached_ = true;
160 s4u::CommPtr Comm::send_async(MailboxPtr dest, void* data, int simulatedSize)
162 s4u::CommPtr res = CommPtr(s4u::Comm::send_init(dest));
163 res->setRemains(simulatedSize);
164 res->srcBuff_ = data;
165 res->srcBuffSize_ = sizeof(void*);
170 s4u::CommPtr Comm::recv_async(MailboxPtr dest, void** data)
172 s4u::CommPtr res = CommPtr(s4u::Comm::recv_init(dest));
173 res->setDstData(data, sizeof(*data));
180 simgrid::kernel::activity::CommImplPtr commPimpl =
181 boost::static_pointer_cast<simgrid::kernel::activity::CommImpl>(pimpl_);
186 xbt_assert(state_ == inited || state_ == started || state_ == finished);
188 if (state_ == finished)
189 xbt_die("Don't call test on a finished comm.");
191 if (state_ == inited) {
195 if(simcall_comm_test(pimpl_)){
203 void intrusive_ptr_release(simgrid::s4u::Comm* c)
205 if (c->refcount_.fetch_sub(1, std::memory_order_release) == 1) {
206 std::atomic_thread_fence(std::memory_order_acquire);
210 void intrusive_ptr_add_ref(simgrid::s4u::Comm* c)
212 c->refcount_.fetch_add(1, std::memory_order_relaxed);