static void *name_service(const char *name)
{
- return xbt_dict_get_or_null(workstation_set, name);
+ xbt_ex_t e;
+ void *res=NULL;
+ TRY {
+ res = xbt_dict_get(workstation_set, name);
+ } CATCH(e) {
+ RETHROW1("Host '%s' not found (dict raised this exception: %s)",name);
+ }
+ return res;
}
static const char *get_resource_name(void *resource_id)
static void action_suspend(surf_action_t action)
{
XBT_IN1("(%p))",action);
- ((surf_action_workstation_KCCFLN05_t) action)->suspended = 1;
- lmm_update_variable_weight(maxmin_system,
- ((surf_action_workstation_KCCFLN05_t)
- action)->variable, 0.0);
+ if(((surf_action_workstation_KCCFLN05_t) action)->suspended != 2) {
+ ((surf_action_workstation_KCCFLN05_t) action)->suspended = 1;
+ lmm_update_variable_weight(maxmin_system,
+ ((surf_action_workstation_KCCFLN05_t)
+ action)->variable, 0.0);
+ }
XBT_OUT;
}
static void action_resume(surf_action_t action)
{
XBT_IN1("(%p)",action);
- if(((surf_action_workstation_KCCFLN05_t)action)->lat_current==0.0)
- lmm_update_variable_weight(maxmin_system,
- ((surf_action_workstation_KCCFLN05_t)
- action)->variable, 1.0);
- else
- lmm_update_variable_weight(maxmin_system,
- ((surf_action_workstation_KCCFLN05_t) action)->variable,
- ((surf_action_workstation_KCCFLN05_t) action)->lat_current);
-
- ((surf_action_workstation_KCCFLN05_t) action)->suspended = 0;
+ if(((surf_action_workstation_KCCFLN05_t) action)->suspended !=2) {
+ if(((surf_action_workstation_KCCFLN05_t)action)->lat_current==0.0)
+ lmm_update_variable_weight(maxmin_system,
+ ((surf_action_workstation_KCCFLN05_t)
+ action)->variable, 1.0);
+ else
+ lmm_update_variable_weight(maxmin_system,
+ ((surf_action_workstation_KCCFLN05_t) action)->variable,
+ ((surf_action_workstation_KCCFLN05_t) action)->lat_current);
+
+ ((surf_action_workstation_KCCFLN05_t) action)->suspended = 0;
+ }
XBT_OUT;
}
static int action_is_suspended(surf_action_t action)
{
- return (((surf_action_workstation_KCCFLN05_t) action)->suspended);
+ return (((surf_action_workstation_KCCFLN05_t) action)->suspended==1);
}
static void action_set_max_duration(surf_action_t action, double duration)
xbt_swag_foreach(action, running_actions) {
if(action->latency>0) {
- if(min<0) min = action->latency;
- else if (action->latency<min) min = action->latency;
+ if(min<0) {
+ min = action->latency;
+ DEBUG3("Updating min (value) with %p (start %f): %f",action,
+ action->generic_action.start, min);
+ }
+ else if (action->latency<min) {
+ min = action->latency;
+ DEBUG3("Updating min (latency) with %p (start %f): %f",action,
+ action->generic_action.start, min);
+ }
}
}
+ DEBUG1("min value : %f",min);
+
return min;
-/* return generic_maxmin_share_resources(surf_workstation_resource->common_public-> */
-/* states.running_action_set, */
-/* xbt_swag_offset(action, variable)); */
}
static void update_actions_state(double now, double delta)
double_update(&(deltap), action->latency);
action->latency = 0.0;
}
- if ((action->latency == 0.0) && !(action->suspended)) {
+ if ((action->latency == 0.0) && (action->suspended==0)) {
if((action)->lat_current==0.0)
lmm_update_variable_weight(maxmin_system,action->variable, 1.0);
else
action->lat_current);
}
}
+ DEBUG3("Action (%p) : remains (%g) updated by %g.",
+ action, action->generic_action.remains,
+ lmm_variable_getvalue(action->variable) * deltap);
double_update(&(action->generic_action.remains),
lmm_variable_getvalue(action->variable) * deltap);
+
if (action->generic_action.max_duration != NO_MAX_DURATION)
double_update(&(action->generic_action.max_duration), delta);
else
lmm_update_variable_bound(maxmin_system, action->variable,
min(action->rate,SG_TCP_CTE_GAMMA / (2.0 * action->lat_current)));
- if(!(action->suspended))
+ if(action->suspended==0)
lmm_update_variable_weight(maxmin_system, action->variable,
action->lat_current);
+ lmm_update_variable_latency(maxmin_system, action->variable, delta);
+
+
}
} else if (event_type == nw_link->state_event) {
if (value > 0)
action = (surf_action_workstation_KCCFLN05_t) execute(cpu, 1.0);
action->generic_action.max_duration = duration;
+ action->suspended = 2;
lmm_update_variable_weight(maxmin_system, action->variable, 0.0);
XBT_OUT;
return ((cpu_KCCFLN05_t) cpu)->power_current;
}
+
static surf_action_t communicate(void *src, void *dst, double size, double rate)
{
surf_action_workstation_KCCFLN05_t action = NULL;
lmm_update_variable_bound(maxmin_system, action->variable, action->rate);
}
+ lmm_update_variable_latency(maxmin_system, action->variable, action->latency);
+
for (i = 0; i < route_size; i++)
lmm_expand(maxmin_system, route->links[i]->constraint, action->variable, 1.0);
if (card_src->bus)
if (parallel_task_network_link_set == NULL) {
parallel_task_network_link_set = xbt_dict_new_ext(workstation_nb * workstation_nb * 10);
}
-
+
/* Compute the number of affected resources... */
for(i=0; i< workstation_nb; i++) {
for(j=0; j< workstation_nb; j++) {
}
}
}
-
nb_link = xbt_dict_length(parallel_task_network_link_set);
xbt_dict_reset(parallel_task_network_link_set);
+
for (i = 0; i<workstation_nb; i++)
if(computation_amount[i]>0) nb_host++;
- if(nb_link + workstation_nb == 0)
+
+ if(nb_link + nb_host == 0) /* was workstation_nb... */
return NULL;
action = xbt_new0(s_surf_action_workstation_KCCFLN05_t, 1);
+ DEBUG3("Creating a parallel task (%p) with %d cpus and %d links.",
+ action, nb_host, nb_link);
action->generic_action.using = 1;
action->generic_action.cost = amount;
action->generic_action.remains = amount;
static void parse_route_elem(void)
{
+ xbt_ex_t e;
if (nb_link == link_list_capacity) {
link_list_capacity *= 2;
link_list = xbt_realloc(link_list, (link_list_capacity) * sizeof(network_link_KCCFLN05_t));
}
- link_list[nb_link++] = xbt_dict_get_or_null(network_link_set, A_surfxml_route_element_name);
+ TRY {
+ link_list[nb_link++] = xbt_dict_get(network_link_set, A_surfxml_route_element_name);
+ } CATCH(e) {
+ RETHROW1("Link %s not found (dict raised this exception: %s)",A_surfxml_route_element_name);
+ }
}
static void parse_route_set_route(void)
xbt_dynar_push(resource_list, &surf_workstation_resource);
}
+
+void surf_workstation_resource_init_KCCFLN05_proportional(const char *filename)
+{
+ xbt_assert0(!surf_cpu_resource, "CPU resource type already defined");
+ xbt_assert0(!surf_network_resource, "network resource type already defined");
+ resource_init_internal();
+ parse_file(filename);
+
+ surf_workstation_resource->common_public->name = "Workstation KCCFLN05 (proportional)";
+ use_sdp_solver=1;
+ xbt_dynar_push(resource_list, &surf_workstation_resource);
+}
+
+void surf_workstation_resource_init_KCCFLN05_Vegas(const char *filename)
+{
+ xbt_assert0(!surf_cpu_resource, "CPU resource type already defined");
+ xbt_assert0(!surf_network_resource, "network resource type already defined");
+ resource_init_internal();
+ parse_file(filename);
+
+ lmm_set_default_protocol_functions(func_vegas_fpi);
+
+ surf_workstation_resource->common_public->name = "Workstation KCCFLN05 (Vegas)";
+ use_lagrange_solver=1;
+ xbt_dynar_push(resource_list, &surf_workstation_resource);
+}
+
+void surf_workstation_resource_init_KCCFLN05_Reno(const char *filename)
+{
+ xbt_assert0(!surf_cpu_resource, "CPU resource type already defined");
+ xbt_assert0(!surf_network_resource, "network resource type already defined");
+ resource_init_internal();
+ parse_file(filename);
+
+ lmm_set_default_protocol_functions(func_reno_fpi);
+
+ surf_workstation_resource->common_public->name = "Workstation KCCFLN05 (Reno)";
+ use_lagrange_solver=1;
+ xbt_dynar_push(resource_list, &surf_workstation_resource);
+}
+
+
+
