Added a new function CCTK_RunTime which returns the number of seconds since

the simulation started.


git-svn-id: http://svn.cactuscode.org/flesh/trunk@1846 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 33 insertions, 0 deletions

diff --git a/src/main/InitialiseCactus.c b/src/main/InitialiseCactus.c
index ab07baea..7e4584de 100644
--- a/src/main/InitialiseCactus.c
+++ b/src/main/InitialiseCactus.c
@@ -8,6 +8,7 @@
  @@*/
 
 #include <stdio.h>
+#include <time.h>
 
 #include "cctk_Flesh.h"
 #include "cctk_Parameter.h"
@@ -33,6 +34,8 @@ CCTK_FILEVERSION(main_InitialiseCactus_c)
 int ProcessCommandLine(int *inargc, char ***inargv, tFleshConfig *ConfigData);
 int ProcessEnvironment(int *argc, char ***argv,tFleshConfig *ConfigData);
 
+static time_t startuptime;
+  
 
  /*@@
    @routine    CCTKi_InitialiseCactus
@@ -71,6 +74,7 @@ int ProcessEnvironment(int *argc, char ***argv,tFleshConfig *ConfigData);
 @@*/
 int CCTKi_InitialiseCactus(int *argc, char ***argv, tFleshConfig *ConfigData)
 {
+  startuptime = time(NULL);
 
   CCTKi_InitialiseSubsystemDefaults();
 
@@ -136,3 +140,32 @@ int CCTKi_InitialiseScheduler(tFleshConfig *ConfigData)
 
 
 
+ /*@@
+   @routine    CCTK_RunTime
+   @date       Tue Oct 3 2000
+   @author     Gabrielle Allen
+   @desc 
+   Seconds since startup
+   @enddesc 
+   @calls     
+   @calledby   
+   @history 
+ 
+   @endhistory 
+
+@@*/
+
+int CCTK_RunTime()
+{
+  int retval;
+  time_t currenttime;
+
+  currenttime = time(NULL);
+  
+  retval = (int)(currenttime-startuptime);
+
+  return retval;
+}
+
+
+