/*  $Id: logusr.c,v 1.2 2004/03/25 02:43:05 jmuelmen Exp $ */

#include <time.h>
#include "log.h"
#include "libsurf.h"
#include "log_int.h"

int log_anl_v (const char *mod_name)
{
     int ret;
     FILE *file;
     double val;
     static const char fname[] = "volta.log";
     
     val = surf_mod_get_anl_v(mod_name);
     /* now it's safe to acquire the log lock */
     log_lock();
     if (!(file = logfile_get_file(mod_name, fname))) {
	  fprintf(stderr, "Couldn't find mod %s file %s\n",
		  mod_name, fname);
	  log_unlock();
	  return -1;
     }
     ret = fprintf(file, "%ld\t%.3e\n", time(NULL), val);
     fflush(file);
     log_unlock();
     return ret;
}

int log_anl_i (const char *mod_name)
{
     int ret;
     FILE *file;
     double val;
     static const char fname[] = "curra.log";
     
     val = surf_mod_get_anl_i(mod_name);
     /* now it's safe to acquire the log lock */
     log_lock();
     if (!(file = logfile_get_file(mod_name, fname))) {
	  fprintf(stderr, "Couldn't find mod %s file %s\n",
		  mod_name, fname);
	  log_unlock();
	  return -1;
     }
     ret = fprintf(file, "%ld\t%.3e\n", time(NULL), val);
     fflush(file);
     log_unlock();
     return ret;
}

int log_dig_v (const char *mod_name)
{
     int ret;
     FILE *file;
     double val;
     static const char fname[] = "voltd.log";
     
     val = surf_mod_get_dig_v(mod_name);
     /* now it's safe to acquire the log lock */
     log_lock();
     if (!(file = logfile_get_file(mod_name, fname))) {
	  fprintf(stderr, "Couldn't find mod %s file %s\n",
		  mod_name, fname);
	  log_unlock();
	  return -1;
     }
     ret = fprintf(file, "%ld\t%.3e\n", time(NULL), val);
     fflush(file);
     log_unlock();
     return ret;
}

int log_dig_i (const char *mod_name)
{
     int ret;
     FILE *file;
     double val;
     static const char fname[] = "currd.log";
     
     val = surf_mod_get_dig_i(mod_name);
     /* now it's safe to acquire the log lock */
     log_lock();
     if (!(file = logfile_get_file(mod_name, fname))) {
	  fprintf(stderr, "Couldn't find mod %s file %s\n",
		  mod_name, fname);
	  log_unlock();
	  return -1;
     }
     ret = fprintf(file, "%ld\t%.3e\n", time(NULL), val);
     fflush(file);
     log_unlock();
     return ret;
}

int log_temp (const char *mod_name)
{
     int ret;
     FILE *file;
     double val;
     static const char fname[] = "temp.log";
     
     val = surf_mod_get_temp(mod_name);
     /* now it's safe to acquire the log lock */
     log_lock();
     if (!(file = logfile_get_file(mod_name, fname))) {
	  fprintf(stderr, "Couldn't find mod %s file %s\n",
		  mod_name, fname);
	  log_unlock();
	  return -1;
     }
     ret = fprintf(file, "%ld\t%.3e\n", time(NULL), val);
     fflush(file);
     log_unlock();
     return ret;
}