double value;
} s_smpi_factor_t;
-typedef struct s_net_card *net_card_t;
-typedef struct s_net_card {
- char* name;
- void* routing_obj;
-} s_net_card_t;
double sg_sender_gap = 0.0;
double sg_latency_factor = 1.0; /* default value; can be set by model or from command line */
static int net_selective_update = 0;
static int net_action_is_suspended(surf_action_t action);
-static void update_action_remaining_lazy(double now);
+static void net_update_action_remaining_lazy(double now);
static xbt_swag_t net_modified_set = NULL;
static xbt_heap_t net_action_heap = NULL;
-/* added to manage the communication action's heap */
-static void net_action_update_index_heap(void *action, int i)
-{
- surf_action_network_CM02_t a = action;
- GENERIC_LMM_ACTION(a).index_heap = i;
-}
-
-/* insert action on heap using a given key and a hat (heap_action_type)
- * a hat can be of three types for communications:
- *
- * NORMAL = this is a normal heap entry stating the date to finish transmitting
- * LATENCY = this is a heap entry to warn us when the latency is payed
- * MAX_DURATION =this is a heap entry to warn us when the max_duration limit is reached
- */
-static void heap_insert(surf_action_network_CM02_t action, double key,
- enum heap_action_type hat)
-{
- GENERIC_LMM_ACTION(action).hat = hat;
- xbt_heap_push(net_action_heap, action, key);
-}
-
-static void heap_remove(surf_action_network_CM02_t action)
-{
- GENERIC_LMM_ACTION(action).hat = NOTSET;
- if (GENERIC_LMM_ACTION(action).index_heap >= 0) {
- xbt_heap_remove(net_action_heap, GENERIC_LMM_ACTION(action).index_heap);
- }
-}
/******************************************************************************/
/* Factors callbacks */
((surf_action_lmm_t) action)->variable);
}
if (network_update_mechanism == UM_LAZY) { // remove action from the heap
- heap_remove((surf_action_network_CM02_t) action);
+ surf_action_lmm_heap_remove(net_action_heap,(surf_action_lmm_t) action);
xbt_swag_remove(action, net_modified_set);
}
surf_action_free(&action);
surf_network_model->action_state_set(action, SURF_ACTION_FAILED);
if (network_update_mechanism == UM_LAZY) { // remove action from the heap
xbt_swag_remove(action, net_modified_set);
- heap_remove((surf_action_network_CM02_t) action);
+ surf_action_lmm_heap_remove(net_action_heap,(surf_action_lmm_t) action);
}
}
double net_action_get_remains(surf_action_t action)
{
if (network_update_mechanism == UM_LAZY) /* update remains before return it */
- update_action_remaining_lazy(surf_get_clock());
+ net_update_action_remaining_lazy(surf_get_clock());
return action->remains;
}
-static void update_action_remaining_lazy(double now)
+static void net_update_action_remaining_lazy(double now)
{
- surf_action_network_CM02_t action = NULL;
+ surf_action_lmm_t action = NULL;
double delta = 0.0;
xbt_swag_foreach(action, net_modified_set) {
- if (GENERIC_LMM_ACTION(action).suspended != 0) {
+ if (action->suspended != 0) {
continue;
}
- delta = now - GENERIC_LMM_ACTION(action).last_update;
+ delta = now - action->last_update;
double_update(&(((surf_action_t)action)->remains),
- lmm_variable_getvalue(((surf_action_lmm_t) action)->variable) * delta);
+ lmm_variable_getvalue(action->variable) * delta);
if (((surf_action_t)action)->max_duration != NO_MAX_DURATION)
double_update(&(((surf_action_t)action)->max_duration), delta);
if ((((surf_action_t)action)->remains <= 0) &&
- (lmm_get_variable_weight(((surf_action_lmm_t)action)->variable) > 0)) {
+ (lmm_get_variable_weight(action->variable) > 0)) {
((surf_action_t)action)->finish = surf_get_clock();
surf_network_model->action_state_set((surf_action_t) action,
SURF_ACTION_DONE);
- heap_remove(action);
+ surf_action_lmm_heap_remove(net_action_heap,action);
} else if (((((surf_action_t)action)->max_duration != NO_MAX_DURATION)
&& (((surf_action_t)action)->max_duration <= 0))) {
((surf_action_t)action)->finish = surf_get_clock();
surf_network_model->action_state_set((surf_action_t) action,
SURF_ACTION_DONE);
- heap_remove(action);
+ surf_action_lmm_heap_remove(net_action_heap,action);
}
- GENERIC_LMM_ACTION(action).last_update = now;
+ action->last_update = now;
}
}
XBT_DEBUG
("Before share resources, the size of modified actions set is %d",
xbt_swag_size(net_modified_set));
- update_action_remaining_lazy(now);
+ net_update_action_remaining_lazy(now);
lmm_solve(network_maxmin_system);
GENERIC_ACTION(action).max_duration);
if (min != -1) {
- heap_remove(action);
- heap_insert(action, min, max_dur_flag ? MAX_DURATION : NORMAL);
+ surf_action_lmm_heap_remove(net_action_heap,(surf_action_lmm_t)action);
+ surf_action_lmm_heap_insert(net_action_heap,(surf_action_lmm_t)action, min, max_dur_flag ? MAX_DURATION : NORMAL);
XBT_DEBUG("Insert at heap action(%p) min %lf now %lf", action, min,
now);
} else DIE_IMPOSSIBLE;
if (GENERIC_LMM_ACTION(action).hat == LATENCY) {
lmm_update_variable_weight(network_maxmin_system, GENERIC_LMM_ACTION(action).variable,
action->weight);
- heap_remove(action);
+ surf_action_lmm_heap_remove(net_action_heap,(surf_action_lmm_t)action);
GENERIC_LMM_ACTION(action).last_update = surf_get_clock();
// if I am wearing a max_duration or normal hat
((surf_action_t)action)->finish = surf_get_clock();
surf_network_model->action_state_set((surf_action_t) action,
SURF_ACTION_DONE);
- heap_remove(action);
+ surf_action_lmm_heap_remove(net_action_heap,(surf_action_lmm_t)action);
}
}
return;
}
-static surf_action_t net_communicate(const char *src_name,
- const char *dst_name, double size,
+static surf_action_t net_communicate(void *src,
+ void *dst, double size,
double rate)
{
unsigned int i;
xbt_dynar_t route = xbt_dynar_new(global_routing->size_of_link, NULL);
- XBT_IN("(%s,%s,%g,%g)", src_name, dst_name, size, rate);
+ XBT_IN("(%s,%s,%g,%g)", ((network_element_t)src)->name, ((network_element_t)dst)->name, size, rate);
- routing_get_route_and_latency(src_name, dst_name, &route, &latency);
+ routing_get_route_and_latency((network_element_t)src, (network_element_t)dst, &route, &latency);
xbt_assert(!xbt_dynar_is_empty(route) || latency,
"You're trying to send data from %s to %s but there is no connection at all between these two hosts.",
- src_name, dst_name);
+ ((network_element_t)src)->name, ((network_element_t)dst)->name);
xbt_dynar_foreach(route, i, link) {
if (link->lmm_resource.state_current == SURF_RESOURCE_OFF) {
}
}
if (sg_network_crosstraffic == 1) {
- routing_get_route_and_latency(dst_name, src_name, &back_route, NULL);
+ routing_get_route_and_latency((network_element_t)dst, (network_element_t)src, &back_route, NULL);
xbt_dynar_foreach(back_route, i, link) {
if (link->lmm_resource.state_current == SURF_RESOURCE_OFF) {
failed = 1;
link = *(link_CM02_t *) xbt_dynar_get_ptr(route, 0);
gap_append(size, link, action);
XBT_DEBUG("Comm %p: %s -> %s gap=%f (lat=%f)",
- action, src_name, dst_name, action->sender.gap,
+ action, ((network_element_t)src)->name, ((network_element_t)dst)->name, action->sender.gap,
action->latency);
}
// add to the heap the event when the latency is payed
XBT_DEBUG("Added action (%p) one latency event at date %f", action,
action->latency + GENERIC_LMM_ACTION(action).last_update);
- heap_insert(action, action->latency + GENERIC_LMM_ACTION(action).last_update,
+ surf_action_lmm_heap_insert(net_action_heap,(surf_action_lmm_t)action, action->latency + GENERIC_LMM_ACTION(action).last_update,
xbt_dynar_is_empty(route) ? NORMAL : LATENCY);
}
} else
return (surf_action_t) action;
}
-static xbt_dynar_t net_get_route(const char *src, const char *dst)
+static xbt_dynar_t net_get_route(void *src, void *dst)
{
xbt_dynar_t route = NULL;
routing_get_route_and_latency(src, dst, &route, NULL);
action)->generic_lmm_action.variable, 0.0);
if (network_update_mechanism == UM_LAZY) // remove action from the heap
- heap_remove((surf_action_network_CM02_t) action);
+ surf_action_lmm_heap_remove(net_action_heap,(surf_action_lmm_t)action);
}
static void net_action_resume(surf_action_t action)
action)->weight);
((surf_action_network_CM02_t) action)->generic_lmm_action.suspended = 0;
if (network_update_mechanism == UM_LAZY) // remove action from the heap
- heap_remove((surf_action_network_CM02_t) action);
+ surf_action_lmm_heap_remove(net_action_heap,(surf_action_lmm_t)action);
}
}
{
action->max_duration = duration;
if (network_update_mechanism == UM_LAZY) // remove action from the heap
- heap_remove((surf_action_network_CM02_t) action);
+ surf_action_lmm_heap_remove(net_action_heap,(surf_action_lmm_t)action);
}
#ifdef HAVE_TRACING
if (network_update_mechanism == UM_LAZY) {
net_action_heap = xbt_heap_new(8, NULL);
xbt_heap_set_update_callback(net_action_heap,
- net_action_update_index_heap);
+ surf_action_lmm_update_index_heap);
net_modified_set =
xbt_swag_new(xbt_swag_offset(comm, generic_lmm_action.action_list_hookup));
network_maxmin_system->keep_track = net_modified_set;
