X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/bb89b5397d199bde9aebb61ad2cd3e26196c0607..c4ba80fc01212c53971f8bad7d34aa399669bcc6:/src/surf/surf.c diff --git a/src/surf/surf.c b/src/surf/surf.c index 2b5121ab8a..b82cc834c9 100644 --- a/src/surf/surf.c +++ b/src/surf/surf.c @@ -12,6 +12,7 @@ #include "surf/surf_resource.h" #include "xbt/xbt_os_thread.h" +XBT_LOG_NEW_CATEGORY(surf, "All SURF categories"); XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_kernel, surf, "Logging specific to SURF (kernel)"); @@ -180,6 +181,13 @@ s_surf_model_description_t surf_optimization_mode_description[] = { {NULL, NULL, NULL} /* this array must be NULL terminated */ }; +s_surf_model_description_t surf_storage_model_description[] = { + {"default", + "Simplistic storage model.", + surf_storage_model_init_default}, + {NULL, NULL, NULL} /* this array must be NULL terminated */ +}; + #ifdef CONTEXT_THREADS static xbt_parmap_t surf_parmap = NULL; /* parallel map on models */ #endif @@ -281,56 +289,30 @@ double generic_maxmin_share_resources(xbt_swag_t running_actions, return min; } -XBT_LOG_EXTERNAL_CATEGORY(surf_cpu); -XBT_LOG_EXTERNAL_CATEGORY(surf_kernel); -XBT_LOG_EXTERNAL_CATEGORY(surf_lagrange); -XBT_LOG_EXTERNAL_CATEGORY(surf_lagrange_dichotomy); -XBT_LOG_EXTERNAL_CATEGORY(surf_maxmin); -XBT_LOG_EXTERNAL_CATEGORY(surf_network); -XBT_LOG_EXTERNAL_CATEGORY(surf_trace); -XBT_LOG_EXTERNAL_CATEGORY(surf_parse); -XBT_LOG_EXTERNAL_CATEGORY(surf_timer); -XBT_LOG_EXTERNAL_CATEGORY(surf_workstation); -XBT_LOG_EXTERNAL_CATEGORY(surf_config); -XBT_LOG_EXTERNAL_CATEGORY(surf_route); - -#ifdef HAVE_GTNETS -XBT_LOG_EXTERNAL_CATEGORY(surf_network_gtnets); -#endif +static XBT_INLINE void routing_asr_host_free(void *p) +{ + sg_routing_edge_t elm = p; + free(elm->name); + xbt_free(elm); +} void surf_init(int *argc, char **argv) { - XBT_DEBUG("Create all Libs"); - host_lib = xbt_lib_new(); - link_lib = xbt_lib_new(); - as_router_lib = xbt_lib_new(); - - XBT_DEBUG("ADD ROUTING LEVEL"); - ROUTING_HOST_LEVEL = xbt_lib_add_level(host_lib,xbt_free); - ROUTING_ASR_LEVEL = xbt_lib_add_level(as_router_lib,xbt_free); - - XBT_DEBUG("ADD SURF LEVELS"); - SURF_CPU_LEVEL = xbt_lib_add_level(host_lib,surf_resource_free); - SURF_WKS_LEVEL = xbt_lib_add_level(host_lib,surf_resource_free); - SURF_LINK_LEVEL = xbt_lib_add_level(link_lib,surf_resource_free); - - /* Connect our log channels: that must be done manually under windows */ - XBT_LOG_CONNECT(surf_cpu, surf); - XBT_LOG_CONNECT(surf_kernel, surf); - XBT_LOG_CONNECT(surf_lagrange, surf); - XBT_LOG_CONNECT(surf_lagrange_dichotomy, surf_lagrange); - XBT_LOG_CONNECT(surf_maxmin, surf); - XBT_LOG_CONNECT(surf_network, surf); - XBT_LOG_CONNECT(surf_trace, surf); - XBT_LOG_CONNECT(surf_parse, surf); - XBT_LOG_CONNECT(surf_timer, surf); - XBT_LOG_CONNECT(surf_workstation, surf); - XBT_LOG_CONNECT(surf_config, surf); - XBT_LOG_CONNECT(surf_route, surf); - -#ifdef HAVE_GTNETS - XBT_LOG_CONNECT(surf_network_gtnets, surf); -#endif + XBT_DEBUG("Create all Libs"); + host_lib = xbt_lib_new(); + link_lib = xbt_lib_new(); + as_router_lib = xbt_lib_new(); + storage_lib = xbt_lib_new(); + storage_type_lib = xbt_lib_new(); + + XBT_DEBUG("ADD ROUTING LEVEL"); + ROUTING_HOST_LEVEL = xbt_lib_add_level(host_lib,routing_asr_host_free); + ROUTING_ASR_LEVEL = xbt_lib_add_level(as_router_lib,routing_asr_host_free); + + XBT_DEBUG("ADD SURF LEVELS"); + SURF_CPU_LEVEL = xbt_lib_add_level(host_lib,surf_resource_free); + SURF_WKS_LEVEL = xbt_lib_add_level(host_lib,surf_resource_free); + SURF_LINK_LEVEL = xbt_lib_add_level(link_lib,surf_resource_free); xbt_init(argc, argv); if (!model_list) @@ -407,7 +389,8 @@ void surf_exit(void) xbt_lib_free(&host_lib); xbt_lib_free(&link_lib); xbt_lib_free(&as_router_lib); - + xbt_lib_free(&storage_lib); + xbt_lib_free(&storage_type_lib); tmgr_finalize(); surf_parse_lex_destroy(); @@ -465,9 +448,12 @@ double surf_solve(double max_date) } surf_min_index = 0; + if (surf_get_nthreads() > 1) { /* parallel version */ +#ifdef CONTEXT_THREADS xbt_parmap_apply(surf_parmap, (void_f_pvoid_t) surf_share_resources, model_list); +#endif } else { /* sequential version */ @@ -551,7 +537,9 @@ double surf_solve(double max_date) if (surf_get_nthreads() > 1) { /* parallel version */ +#ifdef CONTEXT_THREADS xbt_parmap_apply(surf_parmap, (void_f_pvoid_t) surf_update_actions_state, model_list); +#endif } else { /* sequential version */ @@ -574,14 +562,15 @@ XBT_INLINE double surf_get_clock(void) static void surf_share_resources(surf_model_t model) { + double next_action_end = -1.0; + int i = __sync_fetch_and_add(&surf_min_index, 1); if (strcmp(model->name,"network NS3")) { XBT_DEBUG("Running for Resource [%s]", model->name); - double next_action_end = model->model_private->share_resources(NOW); + next_action_end = model->model_private->share_resources(NOW); XBT_DEBUG("Resource [%s] : next action end = %f", model->name, next_action_end); - int i = __sync_fetch_and_add(&surf_min_index, 1); - surf_mins[i] = next_action_end; } + surf_mins[i] = next_action_end; } static void surf_update_actions_state(surf_model_t model)