From 21b9c5dd068c05fbac421c871f809616b9c6535b Mon Sep 17 00:00:00 2001
From: schnorr <schnorr@48e7efb5-ca39-0410-a469-dd3cf9ba447f>
Date: Fri, 6 Aug 2010 15:39:03 +0000
Subject: [PATCH] trace: functions to generate links, append a link type in the
 hierarchy of types

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@8128 48e7efb5-ca39-0410-a469-dd3cf9ba447f
---
 src/instr/interface.c  |  1 +
 src/instr/private.h    |  2 ++
 src/instr/smpi_instr.c | 15 +++++++++++++++
 3 files changed, 18 insertions(+)

diff --git a/src/instr/interface.c b/src/instr/interface.c
index fc0b886651..88a057681b 100644
--- a/src/instr/interface.c
+++ b/src/instr/interface.c
@@ -78,6 +78,7 @@ int TRACE_start ()
   if (IS_TRACING_SMPI){
     pajeDefineContainerType ("MPI_PROCESS", "HOST", "MPI_PROCESS");
     pajeDefineStateType ("MPI_STATE", "MPI_PROCESS", "MPI_STATE");
+    pajeDefineLinkType ("MPI_LINK", "0", "MPI_PROCESS", "MPI_PROCESS", "MPI_LINK");
   }
 
   /* creating the platform */
diff --git a/src/instr/private.h b/src/instr/private.h
index a5da3bb02a..107961e91a 100644
--- a/src/instr/private.h
+++ b/src/instr/private.h
@@ -137,6 +137,8 @@ void TRACE_smpi_start (void);
 void TRACE_smpi_end (void);
 void TRACE_smpi_collective_in (int rank, int root, const char *operation);
 void TRACE_smpi_collective_out (int rank, int root, const char *operation);
+void TRACE_smpi_send (int rank, int src, int dst);
+void TRACE_smpi_recv (int rank, int src, int dst);
 
 /* from instr_config.c */
 int _TRACE_configured (void);
diff --git a/src/instr/smpi_instr.c b/src/instr/smpi_instr.c
index 77008778a2..0d1f51091f 100644
--- a/src/instr/smpi_instr.c
+++ b/src/instr/smpi_instr.c
@@ -103,5 +103,20 @@ void TRACE_smpi_collective_out (int rank, int root, const char *operation)
       _TRACE_smpi_container (rank, str, 100));
 }
 
+void TRACE_smpi_send (int rank, int src, int dst)
+{
+  char key[100], str[100];
+  _TRACE_smpi_put_key (src, dst, key, 100);
+  pajeStartLink (SIMIX_get_clock(), "MPI_LINK", "0", "PTP",
+      _TRACE_smpi_container (src, str, 100), key);
+}
+
+void TRACE_smpi_recv (int rank, int src, int dst)
+{
+  char key[100], str[100];
+  _TRACE_smpi_get_key (src, dst, key, 100);
+  pajeEndLink (SIMIX_get_clock(), "MPI_LINK", "0", "PTP",
+      _TRACE_smpi_container (dst, str, 100), key);
+}
 #endif
 
-- 
2.20.1