#include "o815.h"

#include "latlib/hypercache.h"
#include "latlib/progress.h"

#include "latlib/datread.h"

o815::sim::sim(o815 *_O815, const int& _confmemSize) {
  O815 = _O815;
  log = O815->out->log;
  hypercache::initC(O815->programid, O815->comargs.nequi, O815->comargs.nskip, O815->comargs.confcache.first, &confMem, _confmemSize, O815->comargs.confcache.second, log);
  nequi = O815->comargs.nequi;
  nskip = O815->comargs.nskip;
  confmemSize = _confmemSize;

  startConfiguration = NULL;
  
  if ( O815->comargs.startconfig != "" ) {
    *log << "SIM: Fetching startconfig from " << O815->comargs.startconfig << endl;
    
    datread dataReader(confmemSize);
    dataReader.openFile(O815->comargs.startconfig);
    
    if ( dataReader.fisopen() ) {
      startConfiguration = (char*)malloc(confmemSize);
      
      if ( dataReader.readFullBlock(startConfiguration) < 0 ) {
	*log << "SIM: Error while reading config from " << O815->comargs.startconfig << endl;
	delete[] startConfiguration;
	startConfiguration = NULL;
      }     
    }
    else {
      *log << "SIM: Could not open startconfigfile " << O815->comargs.startconfig << endl;
    }
  }
  
}

o815::sim::~sim ()
{
  if (startConfiguration != NULL)
    delete[] startConfiguration;
}

void o815::sim::nextConfig() {
  bool readAtLeastOneConfig = hypercache::readC();

  /* equilibrate if necessary */
  if (hypercache::getNEquiLeft() > 0) {
    *log << "SIM: Starting equilibration." << endl << flush;
    if (hypercache::getNEquiLeft() != nequi)
      *log << "SIM: " << hypercache::getNEquiLeft() << " of " << nequi << " equilibration steps left after virtual equilibration." << endl << flush;
    progress equiProg(hypercache::getNEquiLeft());
    for ( int iequi = 0; iequi < hypercache::getNEquiLeft(); iequi++ ) {
      _makeSweep();
      while( equiProg.madeStep(iequi) ) *log << "SIM: " << equiProg.done()*100 << "% of equilibration done." << endl << flush;
    }
  }

  /* make skip if no config could be read or one skip is left after equilibration */
  if ( (! readAtLeastOneConfig) || (hypercache::getNEquiLeft() >= 0) ) {
    for (int iskip=0; iskip<nskip; iskip++) {
      _makeSweep();
    }
    hypercache::writeC();
  }
}

void o815::sim::resetConfig() {
  if ( startConfiguration != NULL )
    memcpy(confMem, startConfiguration, confmemSize);
  else
    _resetConfig();
}