X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/f8882c1f57daedb063da98d3ad27f6c377e0da44..8f6f26fc3ac216805fde5f359d0eded5f4c229cc:/src/instr/instr_paje_header.c

diff --git a/src/instr/instr_paje_header.c b/src/instr/instr_paje_header.c
new file mode 100644
index 0000000000..f7a62db2c7
--- /dev/null
+++ b/src/instr/instr_paje_header.c
@@ -0,0 +1,257 @@
+/* Copyright (c) 2010. The SimGrid Team.
+ * All rights reserved.                                                     */
+
+/* This program is free software; you can redistribute it and/or modify it
+  * under the terms of the license (GNU LGPL) which comes with this package. */
+
+#include "instr/instr_private.h"
+
+#ifdef HAVE_TRACING
+
+XBT_LOG_NEW_DEFAULT_SUBCATEGORY(instr_paje_header, instr, "Paje tracing event system (header)");
+
+extern FILE *tracing_file;
+
+static void TRACE_header_PajeDefineContainerType (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeDefineContainerType %d\n", PAJE_DefineContainerType);
+  fprintf(tracing_file, "%%       Alias string\n");
+  if (basic){
+    fprintf(tracing_file, "%%       ContainerType string\n");
+  }else{
+    fprintf(tracing_file, "%%       Type string\n");
+  }
+  fprintf(tracing_file, "%%       Name string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeDefineVariableType (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeDefineVariableType %d\n", PAJE_DefineVariableType);
+  fprintf(tracing_file, "%%       Alias string\n");
+  if (basic){
+    fprintf(tracing_file, "%%       ContainerType string\n");
+  }else{
+    fprintf(tracing_file, "%%       Type string\n");
+  }
+  fprintf(tracing_file, "%%       Name string\n");
+  fprintf(tracing_file, "%%       Color string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeDefineStateType (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeDefineStateType %d\n", PAJE_DefineStateType);
+  fprintf(tracing_file, "%%       Alias string\n");
+  if (basic){
+    fprintf(tracing_file, "%%       ContainerType string\n");
+  }else{
+    fprintf(tracing_file, "%%       Type string\n");
+  }
+  fprintf(tracing_file, "%%       Name string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeDefineEventType (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeDefineEventType %d\n", PAJE_DefineEventType);
+  fprintf(tracing_file, "%%       Alias string\n");
+  if (basic){
+    fprintf(tracing_file, "%%       ContainerType string\n");
+  }else{
+    fprintf(tracing_file, "%%       Type string\n");
+  }
+  fprintf(tracing_file, "%%       Name string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeDefineLinkType (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeDefineLinkType %d\n", PAJE_DefineLinkType);
+  fprintf(tracing_file, "%%       Alias string\n");
+  if (basic){
+    fprintf(tracing_file, "%%       ContainerType string\n");
+    fprintf(tracing_file, "%%       SourceContainerType string\n");
+    fprintf(tracing_file, "%%       DestContainerType string\n");
+  }else{
+    fprintf(tracing_file, "%%       Type string\n");
+    fprintf(tracing_file, "%%       StartContainerType string\n");
+    fprintf(tracing_file, "%%       EndContainerType string\n");
+  }
+  fprintf(tracing_file, "%%       Name string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeDefineEntityValue (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeDefineEntityValue %d\n", PAJE_DefineEntityValue);
+  fprintf(tracing_file, "%%       Alias string\n");
+  if (basic){
+    fprintf(tracing_file, "%%       EntityType string\n");
+  }else{
+    fprintf(tracing_file, "%%       Type string\n");
+  }
+  fprintf(tracing_file, "%%       Name string\n");
+  fprintf(tracing_file, "%%       Color string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeCreateContainer (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeCreateContainer %d\n", PAJE_CreateContainer);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Alias string\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%       Name string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeDestroyContainer (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeDestroyContainer %d\n", PAJE_DestroyContainer);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Name string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeSetVariable (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeSetVariable %d\n", PAJE_SetVariable);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%       Value double\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeAddVariable (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeAddVariable %d\n", PAJE_AddVariable);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%       Value double\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeSubVariable (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeSubVariable %d\n", PAJE_SubVariable);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%       Value double\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+
+static void TRACE_header_PajeSetState (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeSetState %d\n", PAJE_SetState);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%       Value string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajePushState (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajePushState %d\n", PAJE_PushState);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%       Value string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajePopState (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajePopState %d\n", PAJE_PopState);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeResetState (int basic)
+{
+  if (basic) return;
+
+  fprintf(tracing_file, "%%EventDef PajeResetState %d\n", PAJE_ResetState);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeStartLink (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeStartLink %d\n", PAJE_StartLink);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%       Value string\n");
+  if (basic){
+    fprintf(tracing_file, "%%       SourceContainer string\n");
+  }else{
+    fprintf(tracing_file, "%%       StartContainer string\n");
+  }
+  fprintf(tracing_file, "%%       Key string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeEndLink (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeEndLink %d\n", PAJE_EndLink);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%       Value string\n");
+  if (basic){
+    fprintf(tracing_file, "%%       DestContainer string\n");
+  }else{
+    fprintf(tracing_file, "%%       EndContainer string\n");
+  }
+  fprintf(tracing_file, "%%       Key string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+static void TRACE_header_PajeNewEvent (int basic)
+{
+  fprintf(tracing_file, "%%EventDef PajeNewEvent %d\n", PAJE_NewEvent);
+  fprintf(tracing_file, "%%       Time date\n");
+  fprintf(tracing_file, "%%       Type string\n");
+  fprintf(tracing_file, "%%       Container string\n");
+  fprintf(tracing_file, "%%       Value string\n");
+  fprintf(tracing_file, "%%EndEventDef\n");
+}
+
+void TRACE_header(int basic)
+{
+  XBT_DEBUG ("Define paje header");
+  TRACE_header_PajeDefineContainerType (basic);
+  TRACE_header_PajeDefineVariableType (basic);
+  TRACE_header_PajeDefineStateType (basic);
+  TRACE_header_PajeDefineEventType (basic);
+  TRACE_header_PajeDefineLinkType (basic);
+  TRACE_header_PajeDefineEntityValue (basic);
+  TRACE_header_PajeCreateContainer (basic);
+  TRACE_header_PajeDestroyContainer (basic);
+  TRACE_header_PajeSetVariable (basic);
+  TRACE_header_PajeAddVariable (basic);
+  TRACE_header_PajeSubVariable (basic);
+  TRACE_header_PajeSetState (basic);
+  TRACE_header_PajePushState (basic);
+  TRACE_header_PajePopState (basic);
+  TRACE_header_PajeResetState (basic);
+  TRACE_header_PajeStartLink (basic);
+  TRACE_header_PajeEndLink (basic);
+  TRACE_header_PajeNewEvent (basic);
+}
+
+#endif
+
+