src/s4u/s4u_mailbox.cpp

   1 /* Copyright (c) 2006-2015. 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 #include "src/simix/smx_network_private.h"
  10
  11 #include "simgrid/s4u/mailbox.hpp"
  12
  13 XBT_LOG_EXTERNAL_CATEGORY(s4u);
  14 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(s4u_channel,s4u,"S4U Communication Mailboxes");
  15
  16
  17 using namespace simgrid;
  18
  19 boost::unordered_map <std::string, s4u::Mailbox *> *s4u::Mailbox::mailboxes = new boost::unordered_map<std::string, s4u::Mailbox*> ();
  20
  21
  22 s4u::Mailbox::Mailbox(const char*name, smx_mailbox_t inferior) {
  23   pimpl_ = inferior;
  24   name_ = name;
  25   mailboxes->insert({name, this});
  26 }
  27 const char *s4u::Mailbox::getName() {
  28   return name_.c_str();
  29 }
  30 s4u::Mailbox *s4u::Mailbox::byName(const char*name) {
  31   s4u::Mailbox *res;
  32   try {
  33     res = mailboxes->at(name);
  34   } catch (std::out_of_range& e) {
  35     // FIXME: there is a potential race condition here where two actors run Mailbox::byName on a non-existent mailbox
  36     // during the same scheduling round. Both will be interrupted in the simcall creating the underlying simix mbox.
  37     // Only one simix object will be created, but two S4U objects will be created.
  38     // Only one S4U object will be stored in the hashmap and used, and the other one will be leaked.
  39     new Mailbox(name,simcall_mbox_create(name));
  40     res = mailboxes->at(name); // Use the stored one, even if it's not the one I created myself.
  41   }
  42   return res;
  43 }
  44
  45 bool s4u::Mailbox::empty() {
  46   return nullptr == simcall_mbox_front(pimpl_);
  47 }
  48
  49 void s4u::Mailbox::setReceiver(smx_process_t process) {
  50   simcall_mbox_set_receiver(pimpl_, process);
  51 }
  52 /** @brief get the receiver (process associated to the mailbox) */
  53 smx_process_t s4u::Mailbox::receiver() {
  54   return pimpl_->permanent_receiver;
  55 }
  56
  57 /*------- C functions -------*/
  58
  59 sg_mbox_t sg_mbox_by_name(const char*name){
  60   return s4u::Mailbox::byName(name);
  61 }
  62 int sg_mbox_is_empty(sg_mbox_t mbox) {
  63   return mbox->empty();
  64 }
  65 void sg_mbox_setReceiver(sg_mbox_t mbox, smx_process_t process) {
  66   mbox->setReceiver(process);
  67 }
  68 smx_process_t sg_mbox_receiver(sg_mbox_t mbox) {
  69   return mbox->receiver();
  70 }