Ignore:
Timestamp:
11/22/22 14:25:20 (17 months ago)
Author:
jderouillat
Message:

Backport the XIOS3 system to log the memory consumption (commit ID [2418-2420,2425-2426])

File:
1 edited

Legend:

Unmodified
Added
Removed

  • XIOS2/trunk/src/interface/c/icdata.cpp

    r2131 r2428  
    2525#include "mpi.hpp" 
    2626#include "timer.hpp" 
     27#include "mem_checker.hpp" 
    2728#include "array_new.hpp" 
    2829 
    … …  
    117118   TRY 
    118119   { 
     120     CMemChecker::get("XIOS close definition").resume(); 
    119121     CTimer::get("XIOS").resume(); 
    120122     CTimer::get("XIOS close definition").resume(); 
    … …  
    123125     CTimer::get("XIOS close definition").suspend(); 
    124126     CTimer::get("XIOS").suspend(); 
     127     CMemChecker::get("XIOS close definition").suspend(); 
    125128   } 
    126129   CATCH_DUMP_STACK 
    … …  
    414417   TRY 
    415418   { 
     419      CMemChecker::get("XIOS send field").resume(); 
    416420      CTimer::get("XIOS").resume(); 
    417421      CTimer::get("XIOS send field").resume(); 
    … …  
    423427      CTimer::get("XIOS send field").suspend(); 
    424428      CTimer::get("XIOS").suspend(); 
     429      CMemChecker::get("XIOS send field").suspend(); 
    425430   } 
    426431   CATCH_DUMP_STACK 
    … …  
    441446   TRY 
    442447   { 
     448      CMemChecker::get("XIOS send field").resume(); 
    443449      CTimer::get("XIOS").resume(); 
    444450      CTimer::get("XIOS send field").resume(); 
    … …  
    453459      CTimer::get("XIOS send field").suspend(); 
    454460      CTimer::get("XIOS").suspend(); 
     461      CMemChecker::get("XIOS send field").suspend(); 
    455462   } 
    456463   CATCH_DUMP_STACK 
    … …  
    471478   TRY 
    472479   { 
     480      CMemChecker::get("XIOS send field").resume(); 
    473481      CTimer::get("XIOS").resume(); 
    474482      CTimer::get("XIOS send field").resume(); 
    … …  
    483491      CTimer::get("XIOS send field").suspend(); 
    484492      CTimer::get("XIOS").suspend(); 
     493      CMemChecker::get("XIOS send field").suspend(); 
    485494   } 
    486495   CATCH_DUMP_STACK 
    … …  
    503512   TRY 
    504513   { 
     514      CMemChecker::get("XIOS send field").resume(); 
    505515      CTimer::get("XIOS").resume(); 
    506516      CTimer::get("XIOS send field").resume(); 
    … …  
    515525      CTimer::get("XIOS send field").suspend(); 
    516526      CTimer::get("XIOS").suspend(); 
     527      CMemChecker::get("XIOS send field").suspend(); 
    517528   } 
    518529   CATCH_DUMP_STACK 
    … …  
    537548   TRY 
    538549   { 
     550      CMemChecker::get("XIOS send field").resume(); 
    539551      CTimer::get("XIOS").resume(); 
    540552      CTimer::get("XIOS send field").resume(); 
    … …  
    549561      CTimer::get("XIOS send field").suspend(); 
    550562      CTimer::get("XIOS").suspend(); 
     563      CMemChecker::get("XIOS send field").suspend(); 
    551564   } 
    552565   CATCH_DUMP_STACK 
    … …  
    575588   TRY 
    576589   { 
     590      CMemChecker::get("XIOS send field").resume(); 
    577591      CTimer::get("XIOS").resume(); 
    578592      CTimer::get("XIOS send field").resume(); 
    … …  
    587601      CTimer::get("XIOS send field").suspend(); 
    588602      CTimer::get("XIOS").suspend(); 
    589    } 
     603      CMemChecker::get("XIOS send field").suspend(); 
     604  } 
    590605   CATCH_DUMP_STACK 
    591606 
    … …  
    610625   { 
    611626  
     627      CMemChecker::get("XIOS send field").resume(); 
    612628      CTimer::get("XIOS").resume(); 
    613629      CTimer::get("XIOS send field").resume(); 
    … …  
    622638      CTimer::get("XIOS send field").suspend(); 
    623639      CTimer::get("XIOS").suspend(); 
     640      CMemChecker::get("XIOS send field").suspend(); 
    624641   } 
    625642   CATCH_DUMP_STACK 
    … …  
    646663   TRY 
    647664   { 
     665      CMemChecker::get("XIOS send field").resume(); 
    648666      CTimer::get("XIOS").resume(); 
    649667      CTimer::get("XIOS send field").resume(); 
    … …  
    658676      CTimer::get("XIOS send field").suspend(); 
    659677      CTimer::get("XIOS").suspend(); 
     678      CMemChecker::get("XIOS send field").suspend(); 
    660679   } 
    661680   CATCH_DUMP_STACK 
    … …  
    681700   TRY 
    682701   { 
     702      CMemChecker::get("XIOS send field").resume(); 
    683703      CTimer::get("XIOS").resume(); 
    684704      CTimer::get("XIOS send field").resume(); 
    … …  
    693713      CTimer::get("XIOS send field").suspend(); 
    694714      CTimer::get("XIOS").suspend(); 
     715      CMemChecker::get("XIOS send field").suspend(); 
    695716   } 
    696717   CATCH_DUMP_STACK 
    … …  
    710731   TRY 
    711732   { 
     733      CMemChecker::get("XIOS send field").resume(); 
    712734      CTimer::get("XIOS").resume(); 
    713735      CTimer::get("XIOS send field").resume(); 
    … …  
    724746      CTimer::get("XIOS send field").suspend(); 
    725747      CTimer::get("XIOS").suspend(); 
     748      CMemChecker::get("XIOS send field").suspend(); 
    726749   } 
    727750   CATCH_DUMP_STACK 
    … …  
    740763   TRY 
    741764   { 
     765      CMemChecker::get("XIOS send field").resume(); 
    742766      CTimer::get("XIOS").resume(); 
    743767      CTimer::get("XIOS send field").resume(); 
    … …  
    754778      CTimer::get("XIOS send field").suspend(); 
    755779      CTimer::get("XIOS").suspend(); 
     780      CMemChecker::get("XIOS send field").suspend(); 
    756781   } 
    757782   CATCH_DUMP_STACK 
    … …  
    772797   TRY 
    773798   { 
     799      CMemChecker::get("XIOS send field").resume(); 
    774800      CTimer::get("XIOS").resume(); 
    775801      CTimer::get("XIOS send field").resume(); 
    … …  
    786812      CTimer::get("XIOS send field").suspend(); 
    787813      CTimer::get("XIOS").suspend(); 
     814      CMemChecker::get("XIOS send field").suspend(); 
    788815    } 
    789816   CATCH_DUMP_STACK 
    … …  
    805832   TRY 
    806833   { 
     834      CMemChecker::get("XIOS send field").resume(); 
    807835      CTimer::get("XIOS").resume(); 
    808836      CTimer::get("XIOS send field").resume(); 
    … …  
    819847      CTimer::get("XIOS send field").suspend(); 
    820848      CTimer::get("XIOS").suspend(); 
     849      CMemChecker::get("XIOS send field").suspend(); 
    821850    } 
    822851   CATCH_DUMP_STACK 
    … …  
    841870   TRY 
    842871   { 
     872      CMemChecker::get("XIOS send field").resume(); 
    843873      CTimer::get("XIOS").resume(); 
    844874      CTimer::get("XIOS send field").resume(); 
    … …  
    855885      CTimer::get("XIOS send field").suspend(); 
    856886      CTimer::get("XIOS").suspend(); 
     887      CMemChecker::get("XIOS send field").suspend(); 
    857888    } 
    858889   CATCH_DUMP_STACK 
    … …  
    876907   TRY 
    877908   { 
     909      CMemChecker::get("XIOS send field").resume(); 
    878910      CTimer::get("XIOS").resume(); 
    879911      CTimer::get("XIOS send field").resume(); 
    … …  
    890922      CTimer::get("XIOS send field").suspend(); 
    891923      CTimer::get("XIOS").suspend(); 
     924      CMemChecker::get("XIOS send field").suspend(); 
    892925    } 
    893926   CATCH_DUMP_STACK 
    … …  
    911944   TRY 
    912945   { 
     946      CMemChecker::get("XIOS send field").resume(); 
    913947      CTimer::get("XIOS").resume(); 
    914948      CTimer::get("XIOS send field").resume(); 
    … …  
    925959      CTimer::get("XIOS send field").suspend(); 
    926960      CTimer::get("XIOS").suspend(); 
     961      CMemChecker::get("XIOS send field").suspend(); 
    927962    } 
    928963   CATCH_DUMP_STACK 
    … …  
    947982   TRY 
    948983   { 
     984      CMemChecker::get("XIOS send field").resume(); 
    949985      CTimer::get("XIOS").resume(); 
    950986      CTimer::get("XIOS recv field").resume(); 
    … …  
    959995      CTimer::get("XIOS recv field").suspend(); 
    960996      CTimer::get("XIOS").suspend(); 
    961    } 
     997       CMemChecker::get("XIOS send field").suspend(); 
     998  } 
    962999   CATCH_DUMP_STACK 
    9631000 
    … …  
    9751012   TRY 
    9761013   { 
     1014      CMemChecker::get("XIOS send field").resume(); 
    9771015      CTimer::get("XIOS").resume(); 
    9781016      CTimer::get("XIOS recv field").resume(); 
    … …  
    9871025      CTimer::get("XIOS recv field").suspend(); 
    9881026      CTimer::get("XIOS").suspend(); 
     1027      CMemChecker::get("XIOS send field").suspend(); 
    9891028   } 
    9901029   CATCH_DUMP_STACK 
    … …  
    10021041   TRY 
    10031042   { 
     1043      CMemChecker::get("XIOS send field").resume(); 
    10041044      CTimer::get("XIOS").resume(); 
    10051045      CTimer::get("XIOS recv field").resume(); 
    … …  
    10141054      CTimer::get("XIOS recv field").suspend(); 
    10151055      CTimer::get("XIOS").suspend(); 
     1056      CMemChecker::get("XIOS send field").suspend(); 
    10161057   } 
    10171058   CATCH_DUMP_STACK 
    … …  
    10301071   TRY 
    10311072   { 
     1073      CMemChecker::get("XIOS send field").resume(); 
    10321074      CTimer::get("XIOS").resume(); 
    10331075      CTimer::get("XIOS recv field").resume(); 
    … …  
    10421084      CTimer::get("XIOS recv field").suspend(); 
    10431085      CTimer::get("XIOS").suspend(); 
     1086      CMemChecker::get("XIOS send field").suspend(); 
    10441087   } 
    10451088   CATCH_DUMP_STACK 
    … …  
    10601103   TRY 
    10611104   { 
     1105      CMemChecker::get("XIOS send field").resume(); 
    10621106      CTimer::get("XIOS").resume(); 
    10631107      CTimer::get("XIOS recv field").resume(); 
    … …  
    10721116      CTimer::get("XIOS recv field").suspend(); 
    10731117      CTimer::get("XIOS").suspend(); 
     1118      CMemChecker::get("XIOS send field").suspend(); 
    10741119   } 
    10751120   CATCH_DUMP_STACK 
    … …  
    10911136   TRY 
    10921137   { 
     1138      CMemChecker::get("XIOS send field").resume(); 
    10931139      CTimer::get("XIOS").resume(); 
    10941140      CTimer::get("XIOS recv field").resume(); 
    … …  
    11031149      CTimer::get("XIOS recv field").suspend(); 
    11041150      CTimer::get("XIOS").suspend(); 
     1151      CMemChecker::get("XIOS send field").suspend(); 
    11051152   } 
    11061153   CATCH_DUMP_STACK 
    … …  
    11221169   TRY 
    11231170   { 
     1171      CMemChecker::get("XIOS send field").resume(); 
    11241172      CTimer::get("XIOS").resume(); 
    11251173      CTimer::get("XIOS recv field").resume(); 
    … …  
    11341182      CTimer::get("XIOS recv field").suspend(); 
    11351183      CTimer::get("XIOS").suspend(); 
     1184      CMemChecker::get("XIOS send field").suspend(); 
    11361185   } 
    11371186   CATCH_DUMP_STACK 
    … …  
    11541203   TRY 
    11551204   { 
     1205      CMemChecker::get("XIOS send field").resume(); 
    11561206      CTimer::get("XIOS").resume(); 
    11571207      CTimer::get("XIOS recv field").resume(); 
    … …  
    11661216      CTimer::get("XIOS recv field").suspend(); 
    11671217      CTimer::get("XIOS").suspend(); 
     1218      CMemChecker::get("XIOS send field").suspend(); 
    11681219   } 
    11691220   CATCH_DUMP_STACK 
    … …  
    11891240   TRY 
    11901241   { 
     1242      CMemChecker::get("XIOS send field").resume(); 
    11911243      CTimer::get("XIOS").resume(); 
    11921244      CTimer::get("XIOS recv field").resume(); 
    … …  
    12031255      CTimer::get("XIOS recv field").suspend(); 
    12041256      CTimer::get("XIOS").suspend(); 
     1257      CMemChecker::get("XIOS send field").suspend(); 
    12051258   } 
    12061259   CATCH_DUMP_STACK 
    … …  
    12201273   TRY 
    12211274   { 
     1275      CMemChecker::get("XIOS send field").resume(); 
    12221276      CTimer::get("XIOS").resume(); 
    12231277      CTimer::get("XIOS recv field").resume(); 
    … …  
    12341288      CTimer::get("XIOS recv field").suspend(); 
    12351289      CTimer::get("XIOS").suspend(); 
     1290      CMemChecker::get("XIOS send field").suspend(); 
    12361291   } 
    12371292   CATCH_DUMP_STACK 
    … …  
    12521307   TRY 
    12531308   { 
     1309      CMemChecker::get("XIOS send field").resume(); 
    12541310      CTimer::get("XIOS").resume(); 
    12551311      CTimer::get("XIOS recv field").resume(); 
    … …  
    12661322      CTimer::get("XIOS recv field").suspend(); 
    12671323      CTimer::get("XIOS").suspend(); 
     1324      CMemChecker::get("XIOS send field").suspend(); 
    12681325   } 
    12691326   CATCH_DUMP_STACK 
    … …  
    12831340   TRY 
    12841341   { 
     1342      CMemChecker::get("XIOS send field").resume(); 
    12851343      CTimer::get("XIOS").resume(); 
    12861344      CTimer::get("XIOS recv field").resume(); 
    … …  
    12971355      CTimer::get("XIOS recv field").suspend(); 
    12981356      CTimer::get("XIOS").suspend(); 
    1299     } 
     1357      CMemChecker::get("XIOS send field").suspend(); 
     1358   } 
    13001359   CATCH_DUMP_STACK 
    13011360 
    … …  
    13151374   TRY 
    13161375   { 
     1376      CMemChecker::get("XIOS send field").resume(); 
    13171377      CTimer::get("XIOS").resume(); 
    13181378      CTimer::get("XIOS recv field").resume(); 
    … …  
    13291389      CTimer::get("XIOS recv field").suspend(); 
    13301390      CTimer::get("XIOS").suspend(); 
     1391      CMemChecker::get("XIOS send field").suspend(); 
    13311392    } 
    13321393   CATCH_DUMP_STACK 
    … …  
    13501411   TRY 
    13511412   { 
     1413      CMemChecker::get("XIOS send field").resume(); 
    13521414      CTimer::get("XIOS").resume(); 
    13531415      CTimer::get("XIOS recv field").resume(); 
    … …  
    13641426      CTimer::get("XIOS recv field").suspend(); 
    13651427      CTimer::get("XIOS").suspend(); 
     1428      CMemChecker::get("XIOS send field").suspend(); 
    13661429    } 
    13671430   CATCH_DUMP_STACK 
    … …  
    13841447   TRY 
    13851448   { 
     1449      CMemChecker::get("XIOS send field").resume(); 
    13861450      CTimer::get("XIOS").resume(); 
    13871451      CTimer::get("XIOS recv field").resume(); 
    … …  
    13981462      CTimer::get("XIOS recv field").suspend(); 
    13991463      CTimer::get("XIOS").suspend(); 
     1464      CMemChecker::get("XIOS send field").suspend(); 
    14001465    } 
    14011466   CATCH_DUMP_STACK 
    … …  
    14201485   TRY 
    14211486   { 
     1487      CMemChecker::get("XIOS send field").resume(); 
    14221488      CTimer::get("XIOS").resume(); 
    14231489      CTimer::get("XIOS recv field").resume(); 
    … …  
    14341500      CTimer::get("XIOS recv field").suspend(); 
    14351501      CTimer::get("XIOS").suspend(); 
    1436     } 
     1502      CMemChecker::get("XIOS send field").suspend(); 
     1503   } 
    14371504   CATCH_DUMP_STACK 
    14381505  
Note: See TracChangeset for help on using the changeset viewer.