Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Merge branch 'master' of scm.gforge.inria.fr:/gitroot/simgrid/simgrid
[simgrid.git] / 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 }