Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
[mc] Cross-process MC/safety implementation
[simgrid.git] / src / mc / mc_client_api.c
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_model_checker.h"
16 #include "mc_ignore.h"
17 #include "mc_protocol.h"
18 #include "mc_client.h"
19
20 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(mc_client_api, mc,
21   "Public API for the model-checked application");
22
23 void MC_assert(int prop)
24 {
25   if (MC_is_active() && !prop) {
26     if (mc_mode == MC_MODE_STANDALONE) {
27       MC_report_assertion_error();
28     } else {
29       MC_client_send_simple_message(MC_MESSAGE_ASSERTION_FAILED);
30       MC_client_handle_messages();
31     }
32   }
33 }
34
35 // TODO, MC_automaton_new_propositional_symbol
36
37 void *MC_snapshot(void)
38 {
39   return simcall_mc_snapshot();
40 }
41
42 int simcall_HANDLER_mc_compare_snapshots(smx_simcall_t simcall,
43                                    mc_snapshot_t s1, mc_snapshot_t s2)
44 {
45   return snapshot_compare(s1, s2);
46 }
47
48 int MC_compare_snapshots(void *s1, void *s2)
49 {
50   return simcall_mc_compare_snapshots(s1, s2);
51 }
52
53 void MC_cut(void)
54 {
55   user_max_depth_reached = 1;
56 }
57
58 void MC_ignore(void* addr, size_t size)
59 {
60   if (mc_mode == MC_MODE_CLIENT) {
61     s_mc_ignore_memory_message_t message;
62     message.type = MC_MESSAGE_IGNORE_MEMORY;
63     message.addr = addr;
64     message.size = size;
65     MC_client_send_message(&message, sizeof(message));
66   }
67
68   // TODO, remove this once the migration has been completed
69   xbt_mheap_t heap = mmalloc_set_current_heap(mc_heap);
70   MC_process_ignore_memory(&mc_model_checker->process, addr, size);
71   mmalloc_set_current_heap(heap);
72 }