X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/80754e48a1b954af90d9c70af3919b4ef19d834e..2e185540fa6bda4bb82e96a881508c7b81152629:/src/msg/msg_process.c diff --git a/src/msg/msg_process.c b/src/msg/msg_process.c index 6fbe364a69..70725e7341 100644 --- a/src/msg/msg_process.c +++ b/src/msg/msg_process.c @@ -7,6 +7,7 @@ #include "msg_private.h" #include "xbt/sysdep.h" #include "xbt/log.h" +#include "simix/smx_process_private.h" XBT_LOG_NEW_DEFAULT_SUBCATEGORY(msg_process, msg, "Logging specific to MSG (process)"); @@ -52,13 +53,16 @@ void MSG_process_cleanup_from_SIMIX(smx_process_t smx_proc) // free the MSG process xbt_free(msg_proc); + SIMIX_process_cleanup(smx_proc); } /* This function creates a MSG process. It has the prototype enforced by SIMIX_function_register_process_create */ void MSG_process_create_from_SIMIX(smx_process_t* process, const char *name, - xbt_main_func_t code, void *data, - const char *hostname, double kill_time, int argc, char **argv, - xbt_dict_t properties, int auto_restart) + xbt_main_func_t code, void *data, + const char *hostname, double kill_time, + int argc, char **argv, + xbt_dict_t properties, int auto_restart, + smx_process_t parent_process) { msg_host_t host = MSG_get_host_by_name(hostname); msg_process_t p = MSG_process_create_with_environment(name, code, data, @@ -170,7 +174,7 @@ msg_process_t MSG_process_create_with_environment(const char *name, argc, argv, properties,0); #ifdef HAVE_TRACING - TRACE_msg_process_create(name, simcall_process_get_PID(process), host); + TRACE_msg_process_create(name, SIMIX_process_get_PID(process), host); #endif if (!process) { @@ -180,7 +184,7 @@ msg_process_t MSG_process_create_with_environment(const char *name, } else { #ifdef HAVE_TRACING - simcall_process_on_exit(process,(int_f_pvoid_t)TRACE_msg_process_kill,MSG_process_self()); + simcall_process_on_exit(process,(int_f_pvoid_pvoid_t)TRACE_msg_process_kill,process); #endif } return process; @@ -198,12 +202,23 @@ void MSG_process_kill(msg_process_t process) // if (p_simdata->waiting_task && p_simdata->waiting_task->simdata->comm) { // simcall_comm_cancel(p_simdata->waiting_task->simdata->comm); // } - + simcall_process_kill(process); return; } +/** +* \brief Wait for the completion of a #msg_process_t. +* +* \param process the process to wait for +* \param timeout wait until the process is over, or the timeout occurs +*/ +msg_error_t MSG_process_join(msg_process_t process, double timeout){ + simcall_process_join(process, timeout); + return MSG_OK; +} + /** \ingroup m_process_management * \brief Migrates a process to another location. * @@ -475,7 +490,7 @@ smx_context_t MSG_process_get_smx_ctx(msg_process_t process) { * The on_exit functions are the functions executed when your process is killed. * You should use them to free the data used by your process. */ -void MSG_process_on_exit(int_f_pvoid_t fun, void *data) { +void MSG_process_on_exit(int_f_pvoid_pvoid_t fun, void *data) { simcall_process_on_exit(MSG_process_self(),fun,data); } /**