-static void TRACE_header_PajeSubVariable (int basic, int size)
-{
- 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, int size)
-{
- 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, int size)
-{
- 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");
- if (size) fprintf(tracing_file, "%% Size int\n");
- if (xbt_cfg_get_boolean("smpi/trace-call-location")) {
- fprintf(tracing_file, "%% Filename string\n");
- fprintf(tracing_file, "%% Linenumber int\n");
- }
- fprintf(tracing_file, "%%EndEventDef\n");
-}
-
-static void TRACE_header_PajePopState (int basic, int size)
-{
- 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, int size)
-{
- 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, int size)
-{
- 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");
- if (size) fprintf(tracing_file, "%% Size int\n");
- fprintf(tracing_file, "%%EndEventDef\n");
-}
-
-static void TRACE_header_PajeEndLink (int basic, int size)
-{
- 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, int size)
-{
- 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, int size)
-{
- XBT_DEBUG ("Define paje header");
- TRACE_header_PajeDefineContainerType (basic, size);
- TRACE_header_PajeDefineVariableType (basic, size);
- TRACE_header_PajeDefineStateType (basic, size);
- TRACE_header_PajeDefineEventType (basic, size);
- TRACE_header_PajeDefineLinkType (basic, size);
- TRACE_header_PajeDefineEntityValue (basic, size);
- TRACE_header_PajeCreateContainer (basic, size);
- TRACE_header_PajeDestroyContainer (basic, size);
- TRACE_header_PajeSetVariable (basic, size);
- TRACE_header_PajeAddVariable (basic, size);
- TRACE_header_PajeSubVariable (basic, size);
- TRACE_header_PajeSetState (basic, size);
- TRACE_header_PajePushState (basic, size);
- TRACE_header_PajePopState (basic, size);
- TRACE_header_PajeResetState (basic, size);
- TRACE_header_PajeStartLink (basic, size);
- TRACE_header_PajeEndLink (basic, size);
- TRACE_header_PajeNewEvent (basic, size);
-}
+ // Link
+ tracing_file << "%EventDef PajeStartLink " << PajeEventType::StartLink << '\n';
+ tracing_file << "% Time date\n";
+ tracing_file << "% Type string\n";
+ tracing_file << "% Container string\n";
+ tracing_file << "% Value string\n";
+ tracing_file << "% " << (basic ? "Source" : "Start") << "Container string\n";
+ tracing_file << "% Key string\n";
+ if (display_sizes)
+ tracing_file << "% Size int\n";
+ tracing_file << "%EndEventDef\n";
+
+ tracing_file << "%EventDef PajeEndLink " << PajeEventType::EndLink << '\n';
+ tracing_file << "% Time date\n";
+ tracing_file << "% Type string\n";
+ tracing_file << "% Container string\n";
+ tracing_file << "% Value string\n";
+ tracing_file << "% " << (basic ? "Dest" : "End") << "Container string\n";
+ tracing_file << "% Key string\n";
+ tracing_file << "%EndEventDef\n";
+
+ // Event
+ tracing_file << "%EventDef PajeNewEvent " << PajeEventType::NewEvent << '\n';
+ tracing_file << "% Time date\n";
+ tracing_file << "% Type string\n";
+ tracing_file << "% Container string\n";
+ tracing_file << "% Value string\n";
+ tracing_file << "%EndEventDef\n";
+}
+} // namespace simgrid::instr::paje