Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
[mc] Move MC_random is mc_base.cpp
[simgrid.git] / src / mc / mc_client_api.cpp
1 /* Copyright (c) 2008-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 <xbt/fifo.h>
9 #include <xbt/sysdep.h>
10 #include <simgrid/modelchecker.h>
11
12 #include "mc_record.h"
13 #include "mc_private.h"
14 #include "mc_mmalloc.h"
15 #include "mc_ignore.h"
16 #include "mc_protocol.h"
17 #include "mc_client.h"
18 #include "ModelChecker.hpp"
19
20 /** \file mc_client_api.cpp
21  *
22  *  This is the implementation of the API used by the user simulated program to
23  *  communicate with the MC (declared in modelchecker.h).
24  */
25
26 extern "C" {
27
28 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(mc_client_api, mc,
29   "Public API for the model-checked application");
30
31 }
32
33 // MC_random() is in mc_base.cpp
34
35 void MC_assert(int prop)
36 {
37   if (MC_is_active() && !prop) {
38     MC_client_send_simple_message(MC_MESSAGE_ASSERTION_FAILED);
39     MC_client_handle_messages();
40   }
41 }
42
43 void *MC_snapshot(void)
44 {
45   return simcall_mc_snapshot();
46 }
47
48 int simcall_HANDLER_mc_compare_snapshots(smx_simcall_t simcall,
49                                    mc_snapshot_t s1, mc_snapshot_t s2)
50 {
51   return snapshot_compare(s1, s2);
52 }
53
54 int MC_compare_snapshots(void *s1, void *s2)
55 {
56   return simcall_mc_compare_snapshots(s1, s2);
57 }
58
59 void MC_cut(void)
60 {
61   user_max_depth_reached = 1;
62 }
63
64 void MC_ignore(void* addr, size_t size)
65 {
66   xbt_assert(mc_mode != MC_MODE_SERVER);
67   if (mc_mode != MC_MODE_CLIENT)
68     return;
69
70   s_mc_ignore_memory_message_t message;
71   message.type = MC_MESSAGE_IGNORE_MEMORY;
72   message.addr = (std::uintptr_t) addr;
73   message.size = size;
74   MC_client_send_message(&message, sizeof(message));
75 }
76
77 void MC_automaton_new_propositional_symbol(const char *id, int(*fct)(void))
78 {
79   xbt_assert(mc_mode != MC_MODE_SERVER);
80   if (mc_mode != MC_MODE_CLIENT)
81     return;
82
83   xbt_die("Support for client-side function proposition is not implemented: "
84     "use MC_automaton_new_propositional_symbol_pointer instead."
85   );
86 }
87
88 void MC_automaton_new_propositional_symbol_pointer(const char *name, int* value)
89 {
90   xbt_assert(mc_mode != MC_MODE_SERVER);
91   if (mc_mode != MC_MODE_CLIENT)
92     return;
93
94   s_mc_register_symbol_message_t message;
95   message.type = MC_MESSAGE_REGISTER_SYMBOL;
96   if (strlen(name) + 1 > sizeof(message.name))
97     xbt_die("Symbol is too long");
98   strncpy(message.name, name, sizeof(message.name));
99   message.callback = nullptr;
100   message.data = value;
101   MC_client_send_message(&message, sizeof(message));
102 }