- instr_destroy_platform();
-}
-
-static void TRACE_surf_set_resource_variable(double date,
- const char *variable,
- const char *resource,
- double value)
-{
- char aux[100], key[100];
- char *last_value = NULL;
- if (!TRACE_is_active())
- return;
- snprintf(aux, 100, "%f", value);
- snprintf(key, 100, "%s#%s", resource, variable);
-
- last_value = xbt_dict_get_or_null(resource_variables, key);
- if (last_value) {
- if (atof(last_value) == value) {
- return;
- }
- }
- pajeSetVariable(date, variable, resource, aux);
- xbt_dict_set(resource_variables, xbt_strdup(key), xbt_strdup(aux),
- xbt_free);
-}
-
-void TRACE_surf_host_set_power(double date, const char *resource,
- double power)
-{
- if (!TRACE_is_active())
- return;
- TRACE_surf_set_resource_variable(date, "power", resource, power);
-}
-
-void TRACE_surf_link_set_bandwidth(double date, void *link,
- double bandwidth)
-{
- if (!TRACE_is_active())
- return;
- if (!TRACE_surf_link_is_traced(link))
- return;
-
- char resource[100];
- snprintf(resource, 100, "%p", link);
- TRACE_surf_set_resource_variable(date, "bandwidth", resource, bandwidth);
-}
-
-void TRACE_surf_link_set_latency(double date, void *link, double latency)
-{
- if (!TRACE_is_active())
- return;
- if (!TRACE_surf_link_is_traced(link))
- return;
-
- char resource[100];
- snprintf(resource, 100, "%p", link);
- TRACE_surf_set_resource_variable(date, "latency", resource, latency);
-}
-
-/* to trace gtnets */
-void TRACE_surf_gtnets_communicate(void *action, int src, int dst)
-{
- char key[100], aux[100];
- if (!TRACE_is_active())
- return;
- snprintf(key, 100, "%p", action);
-
- snprintf(aux, 100, "%d", src);
- xbt_dict_set(gtnets_src, key, xbt_strdup(aux), xbt_free);
- snprintf(aux, 100, "%d", dst);
- xbt_dict_set(gtnets_dst, key, xbt_strdup(aux), xbt_free);