src/mc/mc_smx.h

   1 /* Copyright (c) 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 #ifndef SIMGRID_MC_SMX_H
   8 #define SIMGRID_MC_SMX_H
   9
  10 #include <stddef.h>
  11
  12 #include <xbt/base.h>
  13 #include <xbt/log.h>
  14
  15 #include <simgrid/simix.h>
  16
  17 #include "src/smpi/private.h"
  18
  19 #include "src/mc/Process.hpp"
  20 #include "src/mc/mc_protocol.h"
  21
  22 /** @file
  23  *  @brief (Cross-process, MCer/MCed) Access to SMX structures
  24  *
  25  *  We copy some C data structure from the MCed process in the MCer process.
  26  *  This is implemented by:
  27  *
  28  *   - `model_checker->process.smx_process_infos`
  29  *      (copy of `simix_global->process_list`);
  30  *
  31  *   - `model_checker->process.smx_old_process_infos`
  32  *      (copy of `simix_global->process_to_destroy`);
  33  *
  34  *   - `model_checker->hostnames`.
  35  *
  36  * The process lists are currently refreshed each time MCed code is executed.
  37  * We don't try to give a persistent MCer address for a given MCed process.
  38  * For this reason, a MCer simgrid::mc::Process* is currently not reusable after
  39  * MCed code.
  40  */
  41
  42 SG_BEGIN_DECL()
  43
  44 struct s_mc_smx_process_info {
  45   /** MCed address of the process */
  46   void* address;
  47   /** (Flat) Copy of the process data structure */
  48   struct s_smx_process copy;
  49   /** Hostname (owned by `mc_modelchecker->hostnames`) */
  50   const char* hostname;
  51   char* name;
  52 };
  53
  54 typedef struct s_mc_smx_process_info s_mc_smx_process_info_t, *mc_smx_process_info_t;
  55
  56 XBT_PRIVATE xbt_dynar_t MC_smx_process_info_list_new(void);
  57
  58 XBT_PRIVATE void MC_process_smx_refresh(simgrid::mc::Process* process);
  59
  60 /** Get the issuer of  a simcall (`req->issuer`)
  61  *
  62  *  In split-process mode, it does the black magic necessary to get an address
  63  *  of a (shallow) copy of the data structure the issuer SIMIX process in the local
  64  *  address space.
  65  *
  66  *  @param process the MCed process
  67  *  @param req     the simcall (copied in the local process)
  68  */
  69 XBT_PRIVATE smx_process_t MC_smx_simcall_get_issuer(smx_simcall_t req);
  70
  71 XBT_PRIVATE const char* MC_smx_process_get_name(smx_process_t p);
  72 XBT_PRIVATE const char* MC_smx_process_get_host_name(smx_process_t p);
  73
  74 #define MC_EACH_SIMIX_PROCESS(process, code) \
  75   if (mc_mode == MC_MODE_CLIENT) { \
  76     xbt_swag_foreach(process, simix_global->process_list) { \
  77       code; \
  78     } \
  79   } else { \
  80     MC_process_smx_refresh(&mc_model_checker->process()); \
  81     unsigned int _smx_process_index; \
  82     mc_smx_process_info_t _smx_process_info; \
  83     xbt_dynar_foreach_ptr(mc_model_checker->process().smx_process_infos, _smx_process_index, _smx_process_info) { \
  84       smx_process_t process = &_smx_process_info->copy; \
  85       code; \
  86     } \
  87   }
  88
  89
  90 XBT_PRIVATE int MC_smpi_process_count(void);
  91
  92
  93 /* ***** Resolve (local/MCer structure from remote/MCed addresses) ***** */
  94
  95 /** Get a local copy of the process from the process remote address */
  96 XBT_PRIVATE smx_process_t MC_smx_resolve_process(smx_process_t process_remote_address);
  97
  98 /** Get the process info structure from the process remote address */
  99 XBT_PRIVATE mc_smx_process_info_t MC_smx_resolve_process_info(smx_process_t process_remote_address);
 100
 101 XBT_PRIVATE unsigned long MC_smx_get_maxpid(void);
 102
 103 SG_END_DECL()
 104
 105 #endif