X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/6c7ac1a31ecf3704cb153f7483b496f3c455e8ab..1a867155fd80328dfa6425cedfca3f4b81d4129a:/src/simix/smx_process.c diff --git a/src/simix/smx_process.c b/src/simix/smx_process.c index 8eed30e499..f22b2ccf72 100644 --- a/src/simix/smx_process.c +++ b/src/simix/smx_process.c @@ -9,12 +9,27 @@ #include "xbt/log.h" #include "xbt/dict.h" #include "msg/mailbox.h" +#include "mc/mc.h" XBT_LOG_NEW_DEFAULT_SUBCATEGORY(simix_process, simix, "Logging specific to SIMIX (process)"); static unsigned long simix_process_count = 0; +/** + * \brief Returns the current agent. + * + * This functions returns the currently running SIMIX process. + * + * \return The SIMIX process + */ +XBT_INLINE smx_process_t SIMIX_process_self(void) +{ + smx_context_t self_context = SIMIX_context_self(); + + return self_context ? SIMIX_context_get_data(self_context) : NULL; +} + /** * \brief Move a process to the list of processes to destroy. */ @@ -58,7 +73,7 @@ void SIMIX_process_empty_trash(void) void SIMIX_create_maestro_process() { smx_process_t maestro = NULL; - + /* Create maestro process and intilialize it */ maestro = xbt_new0(s_smx_process_t, 1); maestro->pid = simix_process_count++; @@ -68,8 +83,6 @@ void SIMIX_create_maestro_process() maestro->context = SIMIX_context_new(NULL, 0, NULL, NULL, maestro); simix_global->maestro_process = maestro; - simix_global->current_process = maestro; - return; } @@ -116,10 +129,10 @@ smx_process_t SIMIX_process_create_from_wrapper(smx_process_arg_t args) { */ smx_process_t SIMIX_process_create(const char *name, xbt_main_func_t code, - void *data, - const char *hostname, - int argc, char **argv, - xbt_dict_t properties) { + void *data, + const char *hostname, + int argc, char **argv, + xbt_dict_t properties) { smx_process_t process = NULL; smx_host_t host = SIMIX_host_get_by_name(hostname); @@ -139,7 +152,6 @@ smx_process_t SIMIX_process_create(const char *name, process->pid = simix_process_count++; process->name = xbt_strdup(name); process->smx_host = host; - process->iwannadie = 0; process->data = data; VERB1("Create context %s", process->name); @@ -178,11 +190,11 @@ void SIMIX_process_kill(smx_process_t process, smx_process_t killer) { DEBUG2("Killing process %s on %s", process->name, process->smx_host->name); - process->iwannadie = 1; + process->context->iwannadie = 1; process->blocked = 0; process->suspended = 0; /* FIXME: set doexception to 0 also? */ - + if (process->waiting_action) { switch (process->waiting_action->type) { @@ -305,25 +317,26 @@ void SIMIX_process_resume(smx_process_t process, smx_process_t issuer) if (process->waiting_action) { - switch(process->waiting_action->type) { + switch (process->waiting_action->type) { case SIMIX_ACTION_EXECUTE: case SIMIX_ACTION_PARALLEL_EXECUTE: SIMIX_host_execution_resume(process->waiting_action); break; - + case SIMIX_ACTION_COMMUNICATE: SIMIX_comm_resume(process->waiting_action); break; - + case SIMIX_ACTION_SLEEP: SIMIX_process_sleep_resume(process->waiting_action); break; - + default: THROW_IMPOSSIBLE; } - } else { + } + else { xbt_swag_insert(process, simix_global->process_to_run); } } @@ -386,7 +399,7 @@ int SIMIX_process_is_suspended(smx_process_t process) int SIMIX_process_is_enabled(smx_process_t process) { - if(process->request && SIMIX_request_isEnabled(process->request)) + if (process->request && SIMIX_request_is_enabled(process->request)) return TRUE; return FALSE; @@ -399,12 +412,10 @@ xbt_dict_t SIMIX_process_get_properties(smx_process_t process) void SIMIX_pre_process_sleep(smx_req_t req) { -#ifdef HAVE_MC - if(_surf_do_model_check){ + if (MC_IS_ENABLED) { req->process_sleep.result = SIMIX_DONE; SIMIX_request_answer(req); } -#endif smx_action_t action = SIMIX_process_sleep(req->issuer, req->process_sleep.duration); xbt_fifo_push(action->request_list, req); req->issuer->waiting_action = action; @@ -478,20 +489,6 @@ void SIMIX_process_sleep_resume(smx_action_t action) surf_workstation_model->resume(action->sleep.surf_sleep); } -/** - * \brief Returns the current agent. - * - * This functions returns the currently running SIMIX process. - * - * \return The SIMIX process - */ -XBT_INLINE smx_process_t SIMIX_process_self(void) -{ - if(simix_global) - return SIMIX_context_self(); - return NULL; -} - /** * Calling this function makes the process to yield. * Only the processes can call this function, giving back the control to maestro @@ -499,16 +496,16 @@ XBT_INLINE smx_process_t SIMIX_process_self(void) void SIMIX_process_yield(void) { smx_process_t self = SIMIX_process_self(); - + DEBUG1("Yield process '%s'", self->name); - + /* Go into sleep and return control to maestro */ SIMIX_context_suspend(self->context); /* Ok, maestro returned control to us */ DEBUG1("Maestro returned control to me: '%s'", self->name); - - if (self->iwannadie) + + if (self->context->iwannadie) SIMIX_context_stop(self->context); if (self->doexception) { @@ -521,7 +518,7 @@ void SIMIX_process_yield(void) /* callback: context fetching */ xbt_running_ctx_t *SIMIX_process_get_running_context(void) { - return simix_global->current_process->running_ctx; + return SIMIX_process_self()->running_ctx; } /* callback: termination */ @@ -530,3 +527,10 @@ void SIMIX_process_exception_terminate(xbt_ex_t * e) xbt_ex_display(e); abort(); } + +smx_context_t SIMIX_process_get_context(smx_process_t p) { + return p->context; +} +void SIMIX_process_set_context(smx_process_t p,smx_context_t c) { + p->context = c; +}