dst.cc

Go to the documentation of this file.

#include <string>
#include <iostream>
#include <iomanip>
#include <set>
#include <algorithm>
 
#include "TROOT.h"
#include "TFile.h"
 
#include "km3net-dataformat/offline/Head.hh"
#include "km3net-dataformat/offline/MultiHead.hh"
#include "km3net-dataformat/offline/Evt.hh"
#include "km3net-dataformat/online/JDAQEvent.hh"
#include "km3net-dataformat/definitions/reconstruction.hh"
 
#include "JLang/JStatus.hh"
 
#include "JReconstruction/JEvt.hh"
#include "JReconstruction/JEvtToolkit.hh"
 
#include "JDAQ/JDAQEventIO.hh"
 
#include "JAAnet/JAAnetToolkit.hh"
 
#include "JSupport/JTriggeredFileScanner.hh"
#include "JSupport/JMonteCarloFileSupportkit.hh"
#include "JSupport/JFileRecorder.hh"
#include "JSupport/JSupport.hh"
#include "JSupport/JMeta.hh"
 
#include "Jeep/JParser.hh"
#include "Jeep/JMessage.hh"
 
namespace {
 
  enum bits_t {
    CLEAR_MC_HITS,              //!< remove Monte Carlo hits
    CLEAR_MC_TRKS,              //!< remove Monte Carlo final state tracks except outgoig lepton
    CLEAR_DAQ_HITS,             //!< remove DAQ hits
    CLEAR_INTERMEDIATE_FITS,    //!< remove intermediate fits
    CLEAR_ALL_BUT_BEST_FITS     //!< remove all but best fits
  };
 
  /**
   * Write bits to output stream.
   *
   * \param  out              output stream
   * \param  object           bits
   * \return                  output stream
   */
  inline std::ostream& operator<<(std::ostream& out, const bits_t& object)
  {
#define PRINT_BIT(OUT, A) OUT << (int) A << " -> " << #A << std::endl;
 
    PRINT_BIT(out, CLEAR_MC_HITS);
    PRINT_BIT(out, CLEAR_MC_TRKS);
    PRINT_BIT(out, CLEAR_DAQ_HITS);
    PRINT_BIT(out, CLEAR_INTERMEDIATE_FITS);
    PRINT_BIT(out, CLEAR_ALL_BUT_BEST_FITS);
 
#undef PRINT_BIT
 
    return out;
  }
}
 
/**
 * \file
 * Application for writing DST.
 *
 * \author mdejong
 */
int main(int argc, char **argv)
{
  using namespace std;
  using namespace JPP;
  using namespace KM3NETDAQ;
 
  typedef JTYPELIST<JMeta, Head, MultiHead, Evt, JDAQEvent, JEvt>::typelist  typelist;
  
  typedef JTriggeredFileScanner<JEvt, JMultipleFileScanner>  JTriggeredFileScanner_t;
  typedef JTriggeredFileScanner_t::multi_pointer_type        multi_pointer_type;
 
  JTriggeredFileScanner_t   inputFile;
  JLimit_t&                 numberOfEvents = inputFile.getLimit();
  JFileRecorder<typelist>   outputFile;
  JStatus                   option;
  set<int>                  keep;
  int                       debug;
 
  try {
 
    JParser<> zap("Application for writing DST.");
 
    zap['f'] = make_field(inputFile);
    zap['o'] = make_field(outputFile);
    zap['n'] = make_field(numberOfEvents)        = JLimit::max();
    zap['O'] = make_field(option,  "bit pattern: " << endl << bits_t())     = 0xFF;
    zap['k'] = make_field(keep,    "keep results of selected applications") = JPARSER::initialised();
    zap['d'] = make_field(debug)                 = 2;
 
    zap(argc, argv);
  }
  catch(const exception& error) {
    FATAL(error.what() << endl);
  }
 
 
  outputFile.open();
 
  outputFile.put(JMeta(argc, argv));
 
  for (JTriggerCounter_t counter = 0; inputFile.hasNext(); counter += 1) {
 
    STATUS("event: " << setw(10) << inputFile.getCounter() << '\r'); DEBUG(endl);
 
    multi_pointer_type ps = inputFile.next();
 
    JEvt*      evt   = ps;
    JDAQEvent* tev   = ps;
    Evt*       event = ps;
 
    if (option.has(CLEAR_MC_HITS)) {
      event->mc_hits.clear();
    }
 
    if (option.has(CLEAR_MC_TRKS)) {
 
      vector<Trk>::iterator __end = partition(event->mc_trks.begin(), event->mc_trks.end(), [](const Trk& trk) { return is_initialstate(trk) || is_muonbundle(trk); });
 
      if (has_neutrino(*event)) {
 
        const int id = get_neutrino(*event).id;
 
        __end = partition(__end, event->mc_trks.end(), [id](const Trk& trk) { return is_lepton(trk) && trk.mother_id == id; });
      }
 
      event->mc_trks.erase(__end, event->mc_trks.end());
    }
 
    if (option.has(CLEAR_DAQ_HITS)) {
      *tev = JDAQEvent(tev->getDAQEventHeader());
    }
 
    if (option.has(CLEAR_INTERMEDIATE_FITS) ||
        option.has(CLEAR_ALL_BUT_BEST_FITS)) {
 
      JEvt::iterator __end = partition(evt->begin(), evt->end(), make_predicate(&JFit::getStatus, (int) COMPLETE_CHAIN, JComparison::eq()));
 
      if (option.has(CLEAR_ALL_BUT_BEST_FITS) && evt->begin() != __end) {
        __end = next(evt->begin());
      }
 
      if (!keep.empty()) {
        for (JEvt::iterator i = evt->begin(), __q = __end; i != __q; ++i) {
          __end = partition(__end, evt->end(), [i, keep](const JFit& fit) { return i->getHistory().match(fit.getHistory()) && keep.count(fit.getHistory().rbegin()->type) != 0; });
        }
      }
 
      evt->erase(__end, evt->end());
    }
 
    // Set the event counter to the index of the Monte Carlo event in the output.
 
    tev->setCounter(counter);
 
    outputFile.put(*event);
    outputFile.put(*tev);
    outputFile.put(*evt);
  }
  STATUS(endl);
 
  JMultipleFileScanner<JRemove<typelist, JTYPELIST<Evt, JDAQEvent, JEvt>::typelist>::typelist> io(inputFile);
 
  io >> outputFile;
 
  outputFile.close();
}