new tracing mask TRACE_VOLUME to trace the msg tasks communication size and group...

[simgrid.git] / src / instr / msg_volume.c

diff --git a/src/instr/msg_volume.c b/src/instr/msg_volume.c
new file mode 100644 (file)
index 0000000..eafa26a
--- /dev/null
+++ b/src/instr/msg_volume.c
@@ -0,0 +1,61 @@
+/*
+ * msg_volume.c
+ *
+ *  Created on: April 23, 2010
+ *      Author: Lucas Schnorr
+ *     License: 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.
+ *
+ *     Copyright (c) 2009 The SimGrid team.
+ */
+
+#include "instr/private.h"
+
+#ifdef HAVE_TRACING
+
+void __TRACE_msg_volume_start (m_task_t task)
+{
+  if (!IS_TRACING_VOLUME) return;
+
+  /* check if task is traced */
+  if (!IS_TRACED(task)) return;
+
+  /* check if process is traced */
+  m_process_t process = MSG_process_self ();
+  if (!IS_TRACED(process)) return;
+
+  char process_name[200], process_alias[200];
+  m_host_t host = MSG_process_get_host (process);
+  TRACE_process_container (process, process_name, 200);
+  TRACE_process_alias_container (process, host, process_alias, 200);
+  char task_name[200];
+  TRACE_task_container (task, task_name, 200);
+
+  double volume = MSG_task_get_data_size (task);
+
+  pajeStartLinkWithVolume (MSG_get_clock(), "volume", "0", task->category, process_alias, task_name, volume);
+}
+
+void __TRACE_msg_volume_finish (m_task_t task)
+{
+  if (!IS_TRACING_VOLUME) return;
+
+  /* check if task is traced */
+  if (!IS_TRACED(task)) return;
+
+  /* check if process is traced */
+  m_process_t process = MSG_process_self ();
+  if (!IS_TRACED(process)) return;
+
+  char process_name[200], process_alias[200];
+  m_host_t host = MSG_process_get_host (process);
+  TRACE_process_container (process, process_name, 200);
+  TRACE_process_alias_container (process, host, process_alias, 200);
+  char task_name[200];
+  TRACE_task_container (task, task_name, 200);
+
+  pajeEndLink (MSG_get_clock(), "volume", "0", task->category, process_alias, task_name);
+}
+
+#endif