Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Merge branch 'klement/simgrid-klement' into master
[simgrid.git] / teshsuite / mc / mutex-handling / mutex-handling.cpp
1 /* Copyright (c) 2015-2020. 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 /* In this test, we have two senders sending one message to a common receiver.
7  * The receiver should be able to see any ordering between the two messages.
8  * If we model-check the application with assertions on a specific order of
9  * the messages (see the assertions in the receiver code), it should fail
10  * because both ordering are possible.
11  *
12  * If the senders sends the message directly, the current version of the MC
13  * finds that the ordering may differ and the MC find a counter-example.
14  *
15  * However, if the senders send the message in a mutex, the MC always let
16  * the first process take the mutex because it thinks that the effect of
17  * a mutex is purely local: the ordering of the messages is always the same
18  * and the MC does not find the counter-example.
19  */
20
21 #include "simgrid/modelchecker.h"
22 #include "simgrid/s4u/Engine.hpp"
23 #include "simgrid/s4u/Host.hpp"
24 #include "simgrid/s4u/Mailbox.hpp"
25 #include "simgrid/s4u/Mutex.hpp"
26
27 XBT_LOG_NEW_DEFAULT_CATEGORY(msg_test, "Messages specific for this msg example");
28
29 static int receiver(const char* box_name)
30 {
31   auto mb = simgrid::s4u::Mailbox::by_name(box_name);
32   const int* payload;
33
34   payload = static_cast<int*>(mb->get());
35   MC_assert(*payload == 1);
36   delete payload;
37
38   payload = static_cast<int*>(mb->get());
39   MC_assert(*payload == 2);
40   delete payload;
41
42   return 0;
43 }
44
45 static int sender(const char* box_name, simgrid::s4u::MutexPtr mutex, int value)
46 {
47   auto* payload = new int(value);
48   auto mb      = simgrid::s4u::Mailbox::by_name(box_name);
49
50   if (mutex)
51     mutex->lock();
52
53   mb->put(static_cast<void*>(payload), 8);
54
55   if (mutex)
56     mutex->unlock();
57
58   return 0;
59 }
60
61 int main(int argc, char* argv[])
62 {
63   simgrid::s4u::Engine e(&argc, argv);
64   xbt_assert(argc > 1, "Usage: %s platform_file\n"
65                        "\tExample: %s msg_platform.xml\n",
66              argv[0], argv[0]);
67
68   simgrid::s4u::MutexPtr mutex;
69 #ifndef DISABLE_THE_MUTEX
70   mutex = simgrid::s4u::Mutex::create();
71 #endif
72
73   e.load_platform(argv[1]);
74   simgrid::s4u::Actor::create("receiver", simgrid::s4u::Host::by_name("Jupiter"), receiver, "box");
75   simgrid::s4u::Actor::create("sender", simgrid::s4u::Host::by_name("Boivin"), sender, "box", mutex, 1);
76   simgrid::s4u::Actor::create("sender", simgrid::s4u::Host::by_name("Fafard"), sender, "box", mutex, 2);
77
78   e.run();
79   XBT_INFO("Simulation time %g", e.get_clock());
80
81   return 0;
82 }