src/mc/private.h

   1 /*      $Id: private.h 5497 2008-05-26 12:19:15Z cristianrosa $  */
   2
   3 /* Copyright (c) 2007 Arnaud Legrand, Bruno Donnassolo.
   4    All rights reserved.                                          */
   5
   6 /* This program is free software; you can redistribute it and/or modify it
   7  * under the terms of the license (GNU LGPL) which comes with this package. */
   8
   9 #ifndef MC_PRIVATE_H
  10 #define MC_PRIVATE_H
  11
  12 #include <stdio.h>
  13 #include <sys/mman.h>
  14 #include "mc/mc.h"
  15 #include "mc/datatypes.h"
  16 #include "xbt/fifo.h"
  17 #include "xbt/config.h"
  18 #include "xbt/function_types.h"
  19 #include "xbt/mmalloc.h"
  20 #include "../simix/private.h"
  21 #include "xbt/automaton.h"
  22 #include "xbt/hash.h"
  23
  24 /****************************** Snapshots ***********************************/
  25
  26 typedef struct s_mc_mem_region{
  27   void *start_addr;
  28   void *data;
  29   size_t size;
  30 } s_mc_mem_region_t, *mc_mem_region_t;
  31
  32 typedef struct s_mc_snapshot{
  33   unsigned int num_reg;
  34   mc_mem_region_t *regions;
  35 } s_mc_snapshot_t, *mc_snapshot_t;
  36
  37 void MC_take_snapshot(mc_snapshot_t);
  38 void MC_restore_snapshot(mc_snapshot_t);
  39 void MC_free_snapshot(mc_snapshot_t);
  40
  41 /********************************* MC Global **********************************/
  42 extern double *mc_time;
  43
  44 /* Bound of the MC depth-first search algorithm */
  45 #define MAX_DEPTH 1000
  46
  47 int MC_deadlock_check(void);
  48 void MC_replay(xbt_fifo_t stack);
  49 void MC_wait_for_requests(void);
  50 void MC_get_enabled_processes();
  51 void MC_show_deadlock(smx_req_t req);
  52 void MC_show_stack(xbt_fifo_t stack);
  53 void MC_dump_stack(xbt_fifo_t stack);
  54 void MC_show_deadlock_stateful(smx_req_t req);
  55 void MC_show_stack_stateful(xbt_fifo_t stack);
  56 void MC_dump_stack_stateful(xbt_fifo_t stack);
  57
  58 /********************************* Requests ***********************************/
  59 int MC_request_depend(smx_req_t req1, smx_req_t req2);
  60 char* MC_request_to_string(smx_req_t req, int value);
  61 unsigned int MC_request_testany_fail(smx_req_t req);
  62 /*int MC_waitany_is_enabled_by_comm(smx_req_t req, unsigned int comm);*/
  63 int MC_request_is_visible(smx_req_t req);
  64 int MC_request_is_enabled(smx_req_t req);
  65 int MC_request_is_enabled_by_idx(smx_req_t req, unsigned int idx);
  66 int MC_process_is_enabled(smx_process_t process);
  67
  68 /********************************** DPOR **************************************/
  69 void MC_dpor_init(void);
  70 void MC_dpor(void);
  71 void MC_dpor_exit(void);
  72
  73 /******************************** States **************************************/
  74 /* Possible exploration status of a process in a state */
  75 typedef enum {
  76   MC_NOT_INTERLEAVE=0,      /* Do not interleave (do not execute) */
  77   MC_INTERLEAVE,            /* Interleave the process (one or more request) */
  78   MC_DONE                   /* Already interleaved */
  79 } e_mc_process_state_t;
  80
  81 /* On every state, each process has an entry of the following type */
  82 typedef struct mc_procstate{
  83   e_mc_process_state_t state;       /* Exploration control information */
  84   unsigned int interleave_count;    /* Number of times that the process was
  85                                        interleaved */
  86 } s_mc_procstate_t, *mc_procstate_t;
  87
  88 /* An exploration state is composed of: */
  89 typedef struct mc_state {
  90   unsigned long max_pid;            /* Maximum pid at state's creation time */
  91   mc_procstate_t proc_status;       /* State's exploration status by process */
  92   s_smx_action_t internal_comm;     /* To be referenced by the internal_req */
  93   s_smx_req_t internal_req;         /* Internal translation of request */
  94   s_smx_req_t executed_req;         /* The executed request of the state */
  95   int req_num;                      /* The request number (in the case of a
  96                                        multi-request like waitany ) */
  97 } s_mc_state_t, *mc_state_t;
  98
  99 extern xbt_fifo_t mc_stack;
 100
 101 mc_state_t MC_state_new(void);
 102 void MC_state_delete(mc_state_t state);
 103 void MC_state_interleave_process(mc_state_t state, smx_process_t process);
 104 unsigned int MC_state_interleave_size(mc_state_t state);
 105 int MC_state_process_is_done(mc_state_t state, smx_process_t process);
 106 void MC_state_set_executed_request(mc_state_t state, smx_req_t req, int value);
 107 smx_req_t MC_state_get_executed_request(mc_state_t state, int *value);
 108 smx_req_t MC_state_get_internal_request(mc_state_t state);
 109 smx_req_t MC_state_get_request(mc_state_t state, int *value);
 110
 111 /****************************** Statistics ************************************/
 112 typedef struct mc_stats {
 113   unsigned long state_size;
 114   unsigned long visited_states;
 115   unsigned long expanded_states;
 116   unsigned long executed_transitions;
 117 } s_mc_stats_t, *mc_stats_t;
 118
 119 typedef struct mc_stats_pair {
 120   //unsigned long pair_size;
 121   unsigned long visited_pairs;
 122   unsigned long expanded_pairs;
 123   unsigned long executed_transitions;
 124 } s_mc_stats_pair_t, *mc_stats_pair_t;
 125
 126 extern mc_stats_t mc_stats;
 127 extern mc_stats_pair_t mc_stats_pair;
 128
 129 void MC_print_statistics(mc_stats_t);
 130 void MC_print_statistics_pairs(mc_stats_pair_t);
 131
 132 /********************************** MEMORY ******************************/
 133 /* The possible memory modes for the modelchecker are standard and raw. */
 134 /* Normally the system should operate in std, for switching to raw mode */
 135 /* you must wrap the code between MC_SET_RAW_MODE and MC_UNSET_RAW_MODE */
 136
 137 extern void *std_heap;
 138 extern void *raw_heap;
 139 /* extern int raw_heap_fd; */ /* unused */
 140 #define STD_HEAP_SIZE   20480000        /* Maximum size of the system's heap */
 141
 142 /* FIXME: Horrible hack! because the mmalloc library doesn't provide yet of */
 143 /* an API to query about the status of a heap, we simply call mmstats and */
 144 /* because I now how does structure looks like, then I redefine it here */
 145
 146 struct mstats {
 147   size_t bytes_total;           /* Total size of the heap. */
 148   size_t chunks_used;           /* Chunks allocated by the user. */
 149   size_t bytes_used;            /* Byte total of user-allocated chunks. */
 150   size_t chunks_free;           /* Chunks in the free list. */
 151   size_t bytes_free;            /* Byte total of chunks in the free list. */
 152 };
 153
 154 #define MC_SET_RAW_MEM    mmalloc_set_current_heap(raw_heap)
 155 #define MC_UNSET_RAW_MEM    mmalloc_set_current_heap(std_heap)
 156
 157 /******************************* MEMORY MAPPINGS ***************************/
 158 /* These functions and data structures implements a binary interface for   */
 159 /* the proc maps ascii interface                                           */
 160
 161 /* Each field is defined as documented in proc's manual page  */
 162 typedef struct s_map_region {
 163
 164   void *start_addr;             /* Start address of the map */
 165   void *end_addr;               /* End address of the map */
 166   int prot;                     /* Memory protection */
 167   int flags;                    /* Aditional memory flags */
 168   void *offset;                 /* Offset in the file/whatever */
 169   char dev_major;               /* Major of the device */
 170   char dev_minor;               /* Minor of the device */
 171   unsigned long inode;          /* Inode in the device */
 172   char *pathname;               /* Path name of the mapped file */
 173
 174 } s_map_region;
 175
 176 typedef struct s_memory_map {
 177
 178   s_map_region *regions;        /* Pointer to an array of regions */
 179   int mapsize;                  /* Number of regions in the memory */
 180
 181 } s_memory_map_t, *memory_map_t;
 182
 183 memory_map_t get_memory_map(void);
 184
 185
 186 /********************************** DFS for liveness property**************************************/
 187
 188 typedef struct s_mc_pair{
 189   mc_snapshot_t system_state;
 190   mc_state_t graph_state;
 191   xbt_state_t automaton_state;
 192   int num;
 193 }s_mc_pair_t, *mc_pair_t;
 194
 195 extern xbt_fifo_t mc_snapshot_stack;
 196
 197 int MC_automaton_evaluate_label(xbt_automaton_t a, xbt_exp_label_t l);
 198 mc_pair_t new_pair(mc_snapshot_t sn, mc_state_t sg, xbt_state_t st);
 199
 200 int reached(mc_pair_t p);
 201 void set_pair_reached(mc_pair_t p);
 202 void MC_show_snapshot_stack(xbt_fifo_t stack);
 203 void MC_dump_snapshot_stack(xbt_fifo_t stack);
 204 void MC_pair_delete(mc_pair_t pair);
 205 void MC_exit_with_automaton(void);
 206 mc_state_t MC_state_pair_new(void);
 207
 208 /* **** Double-DFS without visited state **** */
 209
 210 void MC_ddfs_with_restore_snapshot_init(xbt_automaton_t a);
 211 void MC_ddfs_with_restore_snapshot(xbt_automaton_t a, int search_cycle, int restore);
 212
 213 /* **** Double-DFS with visited state **** */
 214
 215 typedef struct s_mc_visited_pair{
 216   mc_pair_t pair;
 217   int search_cycle;
 218 }s_mc_visited_pair_t, *mc_visited_pair_t;
 219
 220 void MC_vddfs_with_restore_snapshot_init(xbt_automaton_t a);
 221 void MC_vddfs_with_restore_snapshot(xbt_automaton_t automaton, int search_cycle, int restore);
 222 void set_pair_visited(mc_pair_t p, int search_cycle);
 223 int visited(mc_pair_t p, int search_cycle);
 224
 225
 226 /* **** DPOR Cristian stateful **** */
 227
 228 typedef struct s_mc_state_with_snapshot{
 229   mc_snapshot_t system_state;
 230   mc_state_t graph_state;
 231 }s_mc_state_ws_t, *mc_state_ws_t;
 232
 233 void MC_init_stateful(void);
 234 void MC_modelcheck_stateful(void);
 235 mc_state_ws_t new_state_ws(mc_snapshot_t s, mc_state_t gs);
 236 void MC_dpor_stateful_init(void);
 237 void MC_dpor_stateful(void);
 238 void MC_exit_stateful(void);
 239
 240 /* **** DPOR 2 (invisible and independant transitions) **** */
 241
 242 typedef struct s_mc_prop_ato{
 243   char *id;
 244   int value;
 245 }s_mc_prop_ato_t, *mc_prop_ato_t;
 246
 247 typedef struct s_mc_pair_prop{
 248   mc_snapshot_t system_state;
 249   mc_state_t graph_state;
 250   xbt_state_t automaton_state;
 251   int num;
 252   xbt_dynar_t propositions;
 253   int fully_expanded;
 254   int interleave;
 255 }s_mc_pair_prop_t, *mc_pair_prop_t;
 256
 257 mc_prop_ato_t new_proposition(char* id, int value);
 258 mc_pair_prop_t new_pair_prop(mc_snapshot_t sn, mc_state_t sg, xbt_state_t st);
 259 int reached_prop(mc_pair_prop_t pair);
 260 void set_pair_prop_reached(mc_pair_prop_t pair);
 261 void MC_dpor2_init(xbt_automaton_t a);
 262 void MC_dpor2(xbt_automaton_t a, int search_cycle);
 263 int invisible(mc_pair_prop_t p, mc_pair_prop_t np);
 264 void set_fully_expanded(mc_pair_prop_t pair);
 265
 266 /* **** DPOR 3 (invisible and independant transitions with coloration of pairs) **** */
 267
 268 typedef enum {
 269   GREEN=0,
 270   ORANGE,
 271   RED
 272 } e_mc_color_pair_t;
 273
 274 typedef struct s_mc_pair_prop_col{
 275   mc_snapshot_t system_state;
 276   mc_state_t graph_state;
 277   xbt_state_t automaton_state;
 278   int num;
 279   xbt_dynar_t propositions;
 280   int fully_expanded;
 281   int interleave;
 282   e_mc_color_pair_t color;
 283   int expanded;
 284 }s_mc_pair_prop_col_t, *mc_pair_prop_col_t;
 285
 286 typedef struct s_mc_visited_pair_prop_col{
 287   mc_pair_prop_col_t pair;
 288   int search_cycle;
 289 }s_mc_visited_pair_prop_col_t, *mc_visited_pair_prop_col_t;
 290
 291 void MC_dpor3_init(xbt_automaton_t a);
 292 void MC_dpor3(xbt_automaton_t a, int search_cycle);
 293 mc_pair_prop_col_t new_pair_prop_col(mc_snapshot_t sn, mc_state_t sg, xbt_state_t st);
 294 void set_expanded(mc_pair_prop_col_t pair);
 295 int reached_prop_col(mc_pair_prop_col_t pair);
 296 void set_pair_prop_col_reached(mc_pair_prop_col_t pair);
 297 int invisible_col(mc_pair_prop_col_t p, mc_pair_prop_col_t np);
 298 void set_fully_expanded_col(mc_pair_prop_col_t pair);
 299 void set_pair_prop_col_visited(mc_pair_prop_col_t pair, int sc);
 300 int visited_pair_prop_col(mc_pair_prop_col_t pair, int sc);
 301
 302 #endif