Changeset 1137 for XIOS/trunk/src/memtrack.cpp

Timestamp:

05/18/17 17:26:56 (7 years ago)

Author:

ymipsl

Message:

Add "light" memory tracking which must be activated at compile time : make_xios --memtrack light

• report at info level 10 : max memory consumption and the current memory consumption at the end of exection
• info at info level 50 : at each timestep, the current memory consumption is printed

YM

File:

• XIOS/trunk/src/memtrack.cpp (modified) (5 diffs)

XIOS/trunk/src/memtrack.cpp

@@ -44 +44 @@
 #include <sstream>
 #include <string>
+
 #include <execinfo.h>
 
@@ -52 +53 @@
 {
   void addr2line(const char *file_name, char** addr, int naddr) ;
+#ifdef XIOS_MEMTRACK_LIGHT
+  void addr2line(const char *file_name, char** addr, int naddr) {} 
+#endif
 }
 /* ------------------------------------------------------------ */
@@ -59 +63 @@
 namespace MemTrack
 {
+    size_t currentMemorySize=0 ;
+    size_t maxMemorySize=0 ; 
+
+    size_t getCurrentMemorySize(void) {return currentMemorySize; }
+    size_t getMaxMemorySize(void) {return maxMemorySize ; }
 
     /* ------------------------------------------------------------ */
@@ -375 +384 @@
         // Get the offset to the user chunk and return it.
         UserChunk *pUser = GetUserAddress(pProlog);
+
+        currentMemorySize += size ;
+        if (currentMemorySize>maxMemorySize) maxMemorySize=currentMemorySize ;
         
         return pUser;
@@ -400 +412 @@
         // Unlink the block header from the list and destroy it.
         BlockHeader *pBlockHeader = GetHeaderAddress(pProlog);
+        currentMemorySize-=pBlockHeader->GetRequestedSize();
         BlockHeader::RemoveNode(pBlockHeader);
         pBlockHeader->~BlockHeader();