X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/0446fc9e3f379b9aff5e0bb44cf06d06b9e663cc..231662d24e63cfb172fdfe6fd613fe02f257171c:/src/simix/smx_global.c diff --git a/src/simix/smx_global.c b/src/simix/smx_global.c index 51290f0cb3..9bcb36dd1d 100644 --- a/src/simix/smx_global.c +++ b/src/simix/smx_global.c @@ -9,6 +9,7 @@ #include "private.h" #include "xbt/sysdep.h" #include "xbt/log.h" +#include "xbt/str.h" #include "xbt/ex.h" /* ex_backtrace_display */ XBT_LOG_NEW_DEFAULT_SUBCATEGORY(simix_kernel, simix, "Logging specific to SIMIX (kernel)"); @@ -31,7 +32,7 @@ static void simix_cfg_control_set(const char *control_string) /* To split the string in commands, and the cursors */ xbt_dynar_t set_strings; char *str; - int cpt; + unsigned int cpt; if (!control_string) return; @@ -112,14 +113,14 @@ void SIMIX_global_init(int *argc, char **argv) simix_global = xbt_new0(s_SIMIX_Global_t, 1); - simix_global->host = xbt_fifo_new(); + simix_global->host = xbt_dict_new(); simix_global->process_to_run = xbt_swag_new(xbt_swag_offset(proc, synchro_hookup)); simix_global->process_list = xbt_swag_new(xbt_swag_offset(proc, process_hookup)); simix_global->current_process = NULL; simix_global->registered_functions = xbt_dict_new(); - + simix_global->create_process_function = NULL; simix_global->kill_process_function = NULL; simix_global->cleanup_process_function = SIMIX_process_cleanup; @@ -152,18 +153,18 @@ void SIMIX_display_process_status(void) : ((process->simdata->suspended) ? "[SUSPENDED] " : "")); if (p_simdata->mutex) { - who2 = bprintf("%s Blocked on mutex %p", who, p_simdata->mutex); + who2 = bprintf("%s Blocked on mutex %p", who, (XBT_LOG_ISENABLED(simix_kernel,xbt_log_priority_verbose))?p_simdata->mutex:(void*)0xdead); free(who); who = who2; } else if (p_simdata->cond) { who2 = bprintf ("%s Blocked on condition %p; Waiting for the following actions:", - who, p_simdata->cond); + who, (XBT_LOG_ISENABLED(simix_kernel,xbt_log_priority_verbose))?p_simdata->cond:(void*)0xdead); free(who); who = who2; xbt_fifo_foreach(p_simdata->cond->actions, item, act, smx_action_t) { - who2 = bprintf("%s '%s'(%p)", who, act->name,act); + who2 = bprintf("%s '%s'(%p)", who, act->name,(XBT_LOG_ISENABLED(simix_kernel,xbt_log_priority_verbose))?act:(void*)0xdead); free(who); who = who2; } @@ -277,24 +278,20 @@ void SIMIX_process_killall() */ void SIMIX_clean(void) { - xbt_fifo_item_t i = NULL; - smx_host_t h = NULL; smx_process_t p = NULL; while ((p = xbt_swag_extract(simix_global->process_list))) { SIMIX_process_kill(p); } - xbt_fifo_foreach(simix_global->host, i, h, smx_host_t) { - __SIMIX_host_destroy(h); - } - xbt_fifo_free(simix_global->host); + xbt_dict_free(&(simix_global->host)); xbt_swag_free(simix_global->process_to_run); xbt_swag_free(simix_global->process_list); xbt_dict_free(&(simix_global->registered_functions)); simix_config_finalize(); free(simix_global); simix_global = NULL; + surf_exit(); return; @@ -311,6 +308,15 @@ double SIMIX_get_clock(void) return surf_get_clock(); } +/** + * \brief Finish the simulation initialization + * + * Must be called before the first call to SIMIX_solve() + */ +void SIMIX_init(void) { + surf_presolve(); +} + /** * \brief Does a turn of the simulation * @@ -323,19 +329,15 @@ double SIMIX_solve(xbt_fifo_t actions_done, xbt_fifo_t actions_failed) { smx_process_t process = NULL; - int i; + unsigned int iter; double elapsed_time = 0.0; static int state_modifications = 1; - static int first = 1; xbt_context_empty_trash(); if (xbt_swag_size(simix_global->process_to_run) && (elapsed_time > 0)) { DEBUG0("**************************************************"); } - if (first) { - surf_solve(); /* Takes traces into account. Returns 0.0 */ - first = 0; - } + while ((process = xbt_swag_extract(simix_global->process_to_run))) { DEBUG2("Scheduling %s on %s", process->name, process->simdata->smx_host->name); @@ -353,11 +355,12 @@ double SIMIX_solve(xbt_fifo_t actions_done, xbt_fifo_t actions_failed) void *fun = NULL; void *arg = NULL; - xbt_dynar_foreach(model_list, i, model) { + xbt_dynar_foreach(model_list, iter, model) { if (xbt_swag_size(model->common_public->states.failed_action_set) || xbt_swag_size(model->common_public->states. done_action_set)) { state_modifications = 1; + break; } } @@ -374,7 +377,7 @@ double SIMIX_solve(xbt_fifo_t actions_done, xbt_fifo_t actions_failed) DEBUG2("Launching %s on %s", args->name, args->hostname); process = SIMIX_process_create(args->name, args->code, args->data, args->hostname, - args->argc, args->argv); + args->argc, args->argv, args->properties); if (args->kill_time > SIMIX_get_clock()) { surf_timer_model->extension_public->set(args->kill_time, (void *) @@ -392,7 +395,7 @@ double SIMIX_solve(xbt_fifo_t actions_done, xbt_fifo_t actions_failed) } /* Wake up all process waiting for the action finish */ - xbt_dynar_foreach(model_list, i, model) { + xbt_dynar_foreach(model_list, iter, model) { while ((action = xbt_swag_extract(model->common_public->states. failed_action_set))) {