X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/e37c1e4bba9bb89cd2842f08cde998eb7f941d04..40803b27ba5bcb382dfcd593885313a975bafd89:/src/simix/smx_user.c diff --git a/src/simix/smx_user.c b/src/simix/smx_user.c index f01364295c..918687c279 100644 --- a/src/simix/smx_user.c +++ b/src/simix/smx_user.c @@ -735,6 +735,39 @@ smx_action_t simcall_comm_irecv(smx_rdv_t rdv, void *dst_buff, size_t *dst_buff_ } +/** + * \ingroup simix_comm_management + */ +void simcall_comm_recv_bounded(smx_rdv_t rdv, void *dst_buff, size_t * dst_buff_size, + int (*match_fun)(void *, void *, smx_action_t), void *data, double timeout, double rate) +{ + xbt_assert(isfinite(timeout), "timeout is not finite!"); + xbt_assert(rdv, "No rendez-vous point defined for recv"); + + if (MC_is_active()) { + /* the model-checker wants two separate simcalls */ + smx_action_t comm = simcall_comm_irecv_bounded(rdv, dst_buff, dst_buff_size, + match_fun, data, rate); + simcall_comm_wait(comm, timeout); + } + else { + simcall_BODY_comm_recv_bounded(rdv, dst_buff, dst_buff_size, + match_fun, data, timeout, rate); + } +} +/** + * \ingroup simix_comm_management + */ +smx_action_t simcall_comm_irecv_bounded(smx_rdv_t rdv, void *dst_buff, size_t *dst_buff_size, + int (*match_fun)(void *, void *, smx_action_t), void *data, double rate) +{ + xbt_assert(rdv, "No rendez-vous point defined for irecv"); + + return simcall_BODY_comm_irecv_bounded(rdv, dst_buff, dst_buff_size, + match_fun, data, rate); +} + + /** * \ingroup simix_comm_management */ @@ -1090,15 +1123,6 @@ int simcall_file_close(smx_file_t fp) return simcall_BODY_file_close(fp); } -/** - * \ingroup simix_file_management - * - */ -int simcall_file_stat(smx_file_t fd, s_file_stat_t *buf) -{ - return simcall_BODY_file_stat(fd, buf); -} - /** * \ingroup simix_file_management * @@ -1128,6 +1152,12 @@ int simcall_mc_compare_snapshots(void *s1, void *s2){ return simcall_BODY_mc_compare_snapshots(s1, s2); } +int simcall_mc_random(void) +{ + return simcall_BODY_mc_random(); +} + + #endif /* HAVE_MC */ /* ****************************************************************************************** */