StorageSerializer.cc

/**************************************************************************
 * basf2 (Belle II Analysis Software Framework)                           *
 * Author: The Belle II Collaboration                                     *
 *                                                                        *
 * See git log for contributors and copyright holders.                    *
 * This file is licensed under LGPL-3.0, see LICENSE.md.                  *
 **************************************************************************/
 
#include <daq/storage/modules/StorageSerializer.h>
 
#include <framework/datastore/DataStore.h>
#include <framework/datastore/StoreObjPtr.h>
#include <framework/dataobjects/EventMetaData.h>
 
#include <iostream>
#include <TList.h>
#include <TClass.h>
 
using namespace std;
using namespace Belle2;
 
//-----------------------------------------------------------------
//                 Register the Module
//-----------------------------------------------------------------
REG_MODULE(StorageSerializer)
 
//-----------------------------------------------------------------
//                 Implementation
//-----------------------------------------------------------------
 
StorageSerializerModule::StorageSerializerModule() : Module()
{
  //Set module properties
  setDescription("Storage serializer module");
 
  //Parameter definition
  addParam("compressionLevel", m_compressionLevel, "Compression Level", 0);
  addParam("OutputBufferName", m_obuf_name, "Output buffer name", string(""));
  addParam("OutputBufferSize", m_obuf_size, "Output buffer size", 10);
  addParam("NodeID", m_nodeid, "Node(subsystem) ID", 0);
  B2DEBUG(100, "StorageSerializer: Constructor done.");
}
 
 
StorageSerializerModule::~StorageSerializerModule() { }
 
void StorageSerializerModule::initialize()
{
  m_msghandler = new MsgHandler(m_compressionLevel);
  m_streamer = new DataStoreStreamer(m_compressionLevel);
  m_expno = m_runno = -1;
  m_count = m_count_0 = 0;
  if (m_obuf_name.size() > 0 && m_obuf_size > 0) {
    m_obuf.open(m_obuf_name.c_str(), m_obuf_size * 1000000);
  } else {
    B2FATAL("Failed to load arguments for shared buffer (" <<
            m_obuf_name.c_str() << ":" << m_obuf_size << ")");
  }
  std::cout << "[DEBUG] StorageSerializer: initialized." << std::endl;
}
 
 
void StorageSerializerModule::beginRun()
{
  B2INFO("StorageSerializer: beginRun called.");
}
 
int StorageSerializerModule::writeStreamerInfos()
{
  TList* minilist = 0 ;
  for (int durability = 0; durability < DataStore::c_NDurabilityTypes; durability++) {
    DataStore::StoreEntryMap& map = DataStore::Instance().getStoreEntryMap(DataStore::EDurability(durability));
    for (DataStore::StoreEntryIter iter = map.begin(); iter != map.end(); ++iter) {
      const TClass* entryClass = iter->second.objClass;
      std::cout << "Recording StreamerInfo : durability " << durability
                << " : Class Name " << entryClass->GetName() << std::endl;
      TVirtualStreamerInfo* vinfo = entryClass->GetStreamerInfo();
      if (!minilist) minilist  =  new TList();
      minilist->Add(reinterpret_cast<TObject*>(vinfo));
    }
  }
  if (minilist) {
    m_msghandler->add(minilist, "StreamerInfo");
    EvtMessage* msg = m_msghandler->encode_msg(MSG_STREAMERINFO);
    (msg->header())->nObjects = 1;       // No. of objects
    (msg->header())->nArrays = 0;    // No. of arrays
    int nword = (msg->size() - 1) / 4 + 1;
    m_obuf.write((int*)msg->buffer(), nword, false, 0, true);
    int size = msg->size();
    B2INFO("Wrote StreamerInfo to a file : " << size << "bytes");
    delete msg;
    delete minilist;
    return size;
  } else {
    B2WARNING("No StreamerInfo in memory");
  }
  return 0;
}
 
void StorageSerializerModule::event()
{
  StoreObjPtr<EventMetaData> evtmetadata;
  unsigned int expno = evtmetadata->getExperiment();
  unsigned int runno = evtmetadata->getRun();
  unsigned int subno = 0;//evtmetadata->getRun() & 0xFF;
  m_obuf.lock();
  SharedEventBuffer::Header* header = m_obuf.getHeader();
  struct dataheader {
    int nword;
    int type;
    unsigned int expno;
    unsigned int runno;
  } hd;
  if (header->runno < runno || header->expno < expno) {
    m_count = 0;
    B2INFO("New run detected: expno = " << expno << " runno = "
           << runno << " subno = " << subno);
    header->expno = expno;
    header->runno = runno;
    header->subno = subno;
    hd.nword = 4;
    hd.type = MSG_STREAMERINFO;
    hd.expno = expno;
    hd.runno = runno;
    m_obuf.write((int*)&hd, hd.nword, false, 0, true);
    m_nbyte = writeStreamerInfos();
  }
  hd.nword = 4;
  hd.type = MSG_EVENT;
  hd.expno = expno;
  hd.runno = runno;
  m_obuf.write((int*)&hd, hd.nword, false, 0, true);
  EvtMessage* msg = m_streamer->streamDataStore(DataStore::c_Event);
  int nword = (msg->size() - 1) / 4 + 1;
  m_obuf.write((int*)msg->buffer(), nword, false, 0, true);
  m_obuf.unlock();
  m_nbyte += msg->size();
  delete msg;
  if (m_count < 10000 && (m_count < 10 || (m_count > 10 && m_count < 100 && m_count % 10 == 0) ||
                          (m_count > 100 && m_count < 1000 && m_count % 100 == 0) ||
                          (m_count > 1000 && m_count < 10000 && m_count % 1000 == 0))) {
    std::cout << "[DEBUG] Storage count = " << m_count << " nword = " << nword << std::endl;
  }
  m_count++;
}
 
void StorageSerializerModule::endRun()
{
  std::cout << "[DEBUG] StorageSerializer : endRun called" << std::endl;
}
 
 
void StorageSerializerModule::terminate()
{
  std::cout << "[DEBUG] terminate called" << std::endl;
}