/** @file TofTestFee
 ** @author Pierre-Alain Loizeau <p.-a.loizeau@gsi.de>
 ** @date 13.05.2019
 **
 ** ROOT macro to test TOF FEE with pulser
 */

// In order to call later Finish, we make this global
FairRunOnline *run = NULL;

void TofFeeThr(TString inFile = "", TString sHostname = "localhost",
                 TString sHistoFile = "data/TofFeeThrHistos.root",
                 Int_t iServerRefreshRate = 100, Int_t iServerHttpPort = 8080,
                 TString sFileTag = ""   )
{
  TString srcDir = gSystem->Getenv("VMCWORKDIR");

  // --- Specify number of events to be produced.
  // --- -1 means run until the end of the input file.
  Int_t nEvents = -1;

  // --- Specify output file name (this is just an example)
  TString outFile = "data/tof_test_fee" + sFileTag + ".root";
  TString parFile = "data/tof_test_fee_param" + sFileTag + ".root";

  // --- Set log output levels
  FairLogger::GetLogger();
  gLogger->SetLogScreenLevel("INFO");
//  gLogger->SetLogScreenLevel("DEBUG");
//  gLogger->SetLogScreenLevel("DEBUG2"); // Print raw messages
  gLogger->SetLogVerbosityLevel("LOW");

  // --- Define parameter files
  TList *parFileList = new TList();
  TString paramDir = "./";

  TString paramFileTof = paramDir + "mTofPar.par";
  TObjString* tutDetDigiFileTof = new TObjString(paramFileTof);
  parFileList->Add(tutDetDigiFileTof);

  // --- Set debug level
  gDebug = 0;

  std::cout << std::endl;
  std::cout << ">>> TofFeeThr: output file is " << outFile << std::endl;

  // ========================================================================
  // ========================================================================

  std::cout << std::endl;
  std::cout << ">>> TofFeeThr: Initialising..." << std::endl;

  // Get4 Unpacker
  CbmMcbm2018TofFeeThr* test_monitor_tof = new CbmMcbm2018TofFeeThr();
/*
  test_monitor_tof->SetMsOverlap();
*/
  test_monitor_tof->SetIgnoreMsOverlap();
  test_monitor_tof->SetHistoFileName( sHistoFile );

  // --- Source task
  CbmMcbm2018Source* source = new CbmMcbm2018Source();
  if( "" != inFile )
  {
    source->SetFileName(inFile);
  } // if( "" != inFile )
      else
      {
         source->SetHostName( sHostname );
      }

  source->AddUnpacker(test_monitor_tof,  0x60, 6); //gDPBs TOF
  source->AddUnpacker(test_monitor_tof,  0x90, 6); //gDPBs T0

  source->SetSubscriberHwm( 1000 );

  // --- Run
  run = new FairRunOnline(source);
  run->ActivateHttpServer( iServerRefreshRate, iServerHttpPort ); // refresh each 100 events
  /// To avoid the server sucking all Histos from gROOT when no output file is used
  /// ===> Need to explicitely add the canvases to the server in the task!
  run->GetHttpServer()->GetSniffer()->SetScanGlobalDir(kFALSE);
  run->SetAutoFinish(kFALSE);

  // -----   Runtime database   ---------------------------------------------
  FairRuntimeDb* rtdb = run->GetRuntimeDb();
  FairParAsciiFileIo* parIn = new FairParAsciiFileIo();
  parIn->open(parFileList, "in");
  rtdb->setFirstInput(parIn);

  run->Init();

  // --- Start run
  TStopwatch timer;
  timer.Start();
  std::cout << ">>> TofFeeThr: Starting run..." << std::endl;
  run->Run(nEvents, 0); // run until end of input file
  timer.Stop();

  std::cout << "Processed " << std::dec << source->GetTsCount() << " timeslices" << std::endl;

  run->Finish();

  // --- End-of-run info
  Double_t rtime = timer.RealTime();
  Double_t ctime = timer.CpuTime();
  std::cout << std::endl << std::endl;
  std::cout << ">>> TofFeeThr: Macro finished successfully." << std::endl;
  std::cout << ">>> TofFeeThr: Output file is " << outFile << std::endl;
  std::cout << ">>> TofFeeThr: Real time " << rtime << " s, CPU time "
	    << ctime << " s" << std::endl;
  std::cout << std::endl;
}