1 /* Copyright (c) 2010. The SimGrid Team.
2 * All rights reserved. */
4 /* This program is free software; you can redistribute it and/or modify it
5 * under the terms of the license (GNU LGPL) which comes with this package. */
7 #include "instr/private.h"
8 #include "surf/surf_private.h"
9 #include "surf/network_private.h"
13 extern routing_global_t global_routing;
15 void __TRACE_link_variable (double time, const char *src, const char *dst, const char *variable, double value, const char *what)
18 xbt_dynar_t route = NULL;
22 if (!IS_TRACING || !IS_TRACING_PLATFORM) return;
24 snprintf (valuestr, 100, "%g", value);
26 if (strcmp (what, "declare") == 0){
27 pajeDefineVariableType (variable, "LINK", variable);
31 if (!global_routing) return;
32 route = global_routing->get_route(src, dst);
34 xbt_dynar_foreach(route, i, link_ptr) {
35 link = (*(link_CM02_t)link_ptr).lmm_resource.generic_resource.name;
37 if (strcmp (what, "set") == 0){
38 pajeSetVariable (time, variable, link, valuestr);
39 }else if (strcmp (what, "add") == 0){
40 pajeAddVariable (time, variable, link, valuestr);
41 }else if (strcmp (what, "sub") == 0){
42 pajeSubVariable (time, variable, link, valuestr);
47 void __TRACE_host_variable (double time, const char *variable, double value, const char *what)
50 if (!IS_TRACING || !IS_TRACING_PLATFORM) return;
52 snprintf (valuestr, 100, "%g", value);
54 if (strcmp (what, "declare") == 0){
55 pajeDefineVariableType (variable, "HOST", variable);
56 }else if (strcmp (what, "set") == 0){
57 pajeSetVariable (time, variable, MSG_host_self()->name, valuestr);
58 }else if (strcmp (what, "add") == 0){
59 pajeAddVariable (time, variable, MSG_host_self()->name, valuestr);
60 }else if (strcmp (what, "sub") == 0){
61 pajeSubVariable (time, variable, MSG_host_self()->name, valuestr);
65 #endif /* HAVE_TRACING */