[trace] arrows to indicate msg send/recv when tracing/msg/task:1

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@9220 48e7efb5-ca39-0410-a469-dd3cf9ba447f

diff --git a/src/instr/instr_msg_task.c b/src/instr/instr_msg_task.c
index 59ca7c0..9796fbc 100644 (file)
--- a/src/instr/instr_msg_task.c
+++ b/src/instr/instr_msg_task.c
@@ -153,7 +153,10 @@ void TRACE_msg_task_get_end(double start_time, m_task_t task)
   type = getType ("MSG_TASK_STATE");
   pajePushState (MSG_get_clock(), type->id, msg->id, "created");
 
-  //FIXME: pajeEndLink
+  type = getType ("MSG_TASK_LINK");
+  char key[INSTR_DEFAULT_STR_SIZE];
+  snprintf (key, INSTR_DEFAULT_STR_SIZE, "%lld", task->counter);
+  pajeEndLink(MSG_get_clock(), type->id, "0", "SR", msg->id, key);
 }
 
 /* MSG_task_put related functions */
@@ -169,7 +172,10 @@ int TRACE_msg_task_put_start(m_task_t task)
   type_t type = getType ("MSG_TASK_STATE");
   pajePopState (MSG_get_clock(), type->id, msg->id);
 
-  //FIXME: pajeStartLink
+  type = getType ("MSG_TASK_LINK");
+  char key[INSTR_DEFAULT_STR_SIZE];
+  snprintf (key, INSTR_DEFAULT_STR_SIZE, "%lld", task->counter);
+  pajeStartLink(MSG_get_clock(), type->id, "0", "SR", msg->id, key);
 
   destroyContainer (msg);
 

diff --git a/src/instr/instr_routing.c b/src/instr/instr_routing.c
index 2e27c8e..725f6f5 100644 (file)
--- a/src/instr/instr_routing.c
+++ b/src/instr/instr_routing.c
@@ -521,6 +521,7 @@ static void instr_routing_parse_start_host ()
   if (TRACE_msg_task_is_enabled()) {
     type_t msg_task = getContainerType ("MSG_TASK", new->type);
     getStateType ("MSG_TASK_STATE", msg_task);
+    getLinkType ("MSG_TASK_LINK", rootType, msg_task, msg_task);
   }
 }