[trace] we need to close the file

[simgrid.git] / examples / msg / tracing / user_variables.c

diff --git a/examples/msg/tracing/user_variables.c b/examples/msg/tracing/user_variables.c
index 87a7fa0..ea2b959 100644 (file)
--- a/examples/msg/tracing/user_variables.c
+++ b/examples/msg/tracing/user_variables.c
@@ -100,6 +100,41 @@ int main(int argc, char *argv[])
     xbt_dynar_free (&link_variables);
   }
 
     xbt_dynar_free (&link_variables);
   }
 

+  //create a customized triva graph configuration file
+  FILE *fp;
+  fp = fopen ("triva_graph.plist", "w");
+  if (!fp){
+    MSG_clean();
+    return 1;
+  }
+  fprintf (fp, "{\n node = (");
+  xbt_dynar_t nodes_type = TRACE_get_node_types ();
+  if (nodes_type){
+    XBT_INFO ("Node types in the trace:");
+    char *node_type;
+    xbt_dynar_foreach (nodes_type, cursor, node_type){
+      XBT_INFO ("%s", node_type);
+      fprintf (fp, "%s, ", node_type);
+    }
+    xbt_dynar_free (&nodes_type);
+  }
+  fprintf (fp, ");\n edge = (");
+  xbt_dynar_t edges_type = TRACE_get_edge_types ();
+  if (edges_type){
+    XBT_INFO ("Node types in the trace:");
+    char *edge_type;
+    xbt_dynar_foreach (edges_type, cursor, edge_type){
+      XBT_INFO ("%s", edge_type);
+      fprintf (fp, "%s, ", edge_type);
+    }
+    xbt_dynar_free (&edges_type);
+  }
+  fprintf (fp, ");\n");
+  fprintf (fp, " host = {\n  type = square;\n  size = HDD_capacity; \n  values = (HDD_utilization);\n };\n");
+  fprintf (fp, " link = {\n  type = rhombus;\n  size = bandwidth;\n };\n");
+  fprintf (fp, "}\n");
+  fclose (fp);
+

   MSG_clean();
   return 0;
 }
   MSG_clean();
   return 0;
 }