X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/941b7b09d7e8c0926a2fa56141c47537badc11ca..41626f8a47c96f54fa3b1ee61a90fb0af699dcbc:/src/mc/mc_comm_determinism.c diff --git a/src/mc/mc_comm_determinism.c b/src/mc/mc_comm_determinism.c index d5aff260a9..aed01eebfe 100644 --- a/src/mc/mc_comm_determinism.c +++ b/src/mc/mc_comm_determinism.c @@ -177,18 +177,28 @@ void MC_get_comm_pattern(xbt_dynar_t list, smx_simcall_t request, e_mc_call_type MC_process_read_simple(&mc_model_checker->process, &synchro, pattern->comm, sizeof(synchro)); - // TODO, remote access to rdv->name and rdv_copy->name - pattern->rdv = (synchro.comm.rdv != NULL) ? strdup(synchro.comm.rdv->name) : strdup(synchro.comm.rdv_cpy->name); + char* remote_name; + MC_process_read_simple(&mc_model_checker->process, &remote_name, + synchro.comm.rdv ? &synchro.comm.rdv->name : &synchro.comm.rdv_cpy->name, + sizeof(remote_name)); + pattern->rdv = + MC_process_read_string(&mc_model_checker->process, remote_name); pattern->src_proc = MC_smx_resolve_process(synchro.comm.src_proc)->pid; pattern->src_host = MC_smx_process_get_host_name(issuer); - pattern->tag = ((MPI_Request)simcall_comm_isend__get__data(request))->tag; + + struct s_smpi_mpi_request mpi_request; + MC_process_read_simple(&mc_model_checker->process, + &mpi_request, (MPI_Request) simcall_comm_isend__get__data(request), + sizeof(mpi_request)); + pattern->tag = mpi_request.tag; + if(synchro.comm.src_buff != NULL){ pattern->data_size = synchro.comm.src_buff_size; pattern->data = xbt_malloc0(pattern->data_size); MC_process_read_simple(&mc_model_checker->process, pattern->data, synchro.comm.src_buff, pattern->data_size); } - if(((MPI_Request)simcall_comm_isend__get__data(request))->detached){ + if(mpi_request.detached){ if (!initial_global_state->initial_communications_pattern_done) { /* Store comm pattern */ xbt_dynar_push(((mc_list_comm_pattern_t)xbt_dynar_get_as(initial_communications_pattern, pattern->src_proc, mc_list_comm_pattern_t))->list, &pattern); @@ -202,16 +212,24 @@ void MC_get_comm_pattern(xbt_dynar_t list, smx_simcall_t request, e_mc_call_type } else if (call_type == MC_CALL_TYPE_RECV) { pattern->type = SIMIX_COMM_RECEIVE; pattern->comm = simcall_comm_irecv__get__result(request); - // TODO, remote access - pattern->tag = ((MPI_Request)simcall_comm_irecv__get__data(request))->tag; + + struct s_smpi_mpi_request mpi_request; + MC_process_read_simple(&mc_model_checker->process, + &mpi_request, (MPI_Request) simcall_comm_irecv__get__data(request), + sizeof(mpi_request)); + pattern->tag = mpi_request.tag; s_smx_synchro_t synchro; MC_process_read_simple(&mc_model_checker->process, &synchro, pattern->comm, sizeof(synchro)); - pattern->rdv = (synchro.comm.rdv != NULL) ? strdup(synchro.comm.rdv->name) : strdup(synchro.comm.rdv_cpy->name); + char* remote_name; + MC_process_read_simple(&mc_model_checker->process, &remote_name, + synchro.comm.rdv ? &synchro.comm.rdv->name : &synchro.comm.rdv_cpy->name, + sizeof(remote_name)); + pattern->rdv = + MC_process_read_string(&mc_model_checker->process, remote_name); pattern->dst_proc = MC_smx_resolve_process(synchro.comm.dst_proc)->pid; - // FIXME, remote process access pattern->dst_host = MC_smx_process_get_host_name(issuer); } else { xbt_die("Unexpected call_type %i", (int) call_type);