HldInput.cxx

Go to the documentation of this file.

// $Id: HldInput.cxx 4480 2020-04-15 14:40:06Z linev $
 
/************************************************************
 * The Data Acquisition Backbone Core (DABC)                *
 ************************************************************
 * Copyright (C) 2009 -                                     *
 * GSI Helmholtzzentrum fuer Schwerionenforschung GmbH      *
 * Planckstr. 1, 64291 Darmstadt, Germany                   *
 * Contact:  http://dabc.gsi.de                             *
 ************************************************************
 * This software can be used under the GPL license          *
 * agreements as stated in LICENSE.txt file                 *
 * which is part of the distribution.                       *
 ************************************************************/
 
#include "hadaq/HldInput.h"
 
#include <cstring>
#include <cstdlib>
 
#include "dabc/Manager.h"
 
#include "hadaq/HadaqTypeDefs.h"
 
 
hadaq::HldInput::HldInput(const dabc::Url& url) :
   dabc::FileInput(url),
   fFile()
{
   if (url.HasOption("rfio"))
     fFile.SetIO((dabc::FileInterface*) dabc::mgr.CreateAny("rfio::FileInterface"), true);
   else if (url.HasOption("ltsm"))
     fFile.SetIO((dabc::FileInterface*) dabc::mgr.CreateAny("ltsm::FileInterface"), true);
}
 
hadaq::HldInput::~HldInput()
{
   CloseFile();
}
 
bool hadaq::HldInput::Read_Init(const dabc::WorkerRef& wrk, const dabc::Command& cmd)
{
   if (!dabc::FileInput::Read_Init(wrk, cmd)) return false;
 
   return OpenNextFile();
}
 
bool hadaq::HldInput::OpenNextFile()
{
   CloseFile();
 
   if (!TakeNextFileName()) return false;
 
   if (!fFile.OpenRead(CurrentFileName().c_str())) {
      EOUT("Cannot open file %s for reading", CurrentFileName().c_str());
      return false;
   }
 
   DOUT1("Open hld file %s for reading", CurrentFileName().c_str());
 
   return true;
}
 
 
bool hadaq::HldInput::CloseFile()
{
   fFile.Close();
   ClearCurrentFileName();
   return true;
}
 
unsigned hadaq::HldInput::Read_Size()
{
   if (!fFile.isReading()) return dabc::di_Error;
 
   if (fFile.eof())
      if (!OpenNextFile()) return dabc::di_EndOfStream;
 
   return dabc::di_DfltBufSize;
}
 
unsigned hadaq::HldInput::Read_Complete(dabc::Buffer& buf)
{
   if (fFile.eof()) {
      EOUT("EOF should not happen when buffer reading should be started");
      return dabc::di_Error;
   }
 
   // only first segment can be used for reading
   uint32_t bufsize = ((uint32_t) (buf.SegmentSize(0) * fReduce) / 4) * 4;
 
   if (!fFile.ReadBuffer(buf.SegmentPtr(0), &bufsize)) {
      // if by chance reading of buffer leads to eof, skip buffer and let switch file on the next turn
      if (fFile.eof()) return dabc::di_SkipBuffer;
      CloseFile();
      return dabc::di_Error;
   }
 
   buf.SetTypeId(hadaq::mbt_HadaqEvents);
   buf.SetTotalSize(bufsize);
   DOUT3("HLD file read %u bytes from %s file", (unsigned) bufsize, CurrentFileName().c_str());
 
   return dabc::di_Ok;
}