JStart.cc

Go to the documentation of this file.

#include <string>
#include <iostream>
#include <iomanip>
#include <vector>
#include <set>
#include <algorithm>
#include <memory>

#include "evt/Head.hh"
#include "evt/Evt.hh"
#include "JDAQ/JDAQEvent.hh"
#include "JDAQ/JDAQTimeslice.hh"
#include "JDAQ/JDAQSummaryslice.hh"

#include "JDetector/JDetector.hh"
#include "JDetector/JDetectorSubset.hh"
#include "JDetector/JDetectorToolkit.hh"
#include "JDetector/JModuleRouter.hh"
#include "JDetector/JK40Rates.hh"

#include "JTrigger/JHit.hh"
#include "JTrigger/JFrame.hh"
#include "JTrigger/JTimeslice.hh"
#include "JTrigger/JHitL0.hh"
#include "JTrigger/JHitR1.hh"
#include "JTrigger/JBuildL0.hh"
#include "JTrigger/JTriggerParameters.hh"

#include "JSupport/JMultipleFileScanner.hh"
#include "JSupport/JParallelFileScanner.hh"
#include "JSupport/JFileRecorder.hh"
#include "JSupport/JSupport.hh"
#include "JSupport/JMeta.hh"

#include "JFit/JLine1Z.hh"
#include "JFit/JEnergyRegressor.hh"
#include "JFit/JFitToolkit.hh"
#include "JFit/JFitParameters.hh"
#include "JFit/JEvt.hh"
#include "JFit/JEvtToolkit.hh"
#include "JFit/JNPEHit.hh"
#include "JFit/JStart.hh"
#include "JFit/JMEstimator.hh"
#include "JFit/JModel.hh"

#include "JTools/JConstants.hh"
#include "JTools/JFunction1D_t.hh"
#include "JTools/JFunctionalMap_t.hh"

#include "JPhysics/JPDFTable.hh"
#include "JPhysics/JPDFToolkit.hh"
#include "JPhysics/JNPETable.hh"

#include "JLang/JComparator.hh"

#include "Jeep/JPrint.hh"
#include "Jeep/JParser.hh"
#include "Jeep/JMessage.hh"


/**
 * \file
 *
 * Program to determine start position of muon trajectory.
 * \author mdejong
 */
int main(int argc, char **argv)
{
  using namespace std;
  using namespace JPP;
  using namespace KM3NETDAQ;

  typedef JParallelFileScanner< JTypeList<JDAQEvent, JEvt> >       JParallelFileScanner_t;
  typedef JParallelFileScanner_t::multi_pointer_type               multi_pointer_type;
  typedef JTYPELIST<JAllTypes_t, JEvt>::typelist                   typelist;

  JParallelFileScanner_t  inputFile;
  JFileRecorder<typelist> outputFile;
  JLimit_t&        numberOfEvents = inputFile.getLimit();
  string           detectorFile;
  string           pdfFile;
  double           roadWidth_m;
  JK40Rates        rates_Hz;
  JTimeRange       T_ns;
  size_t           numberOfPrefits;
  JStart           start;
  bool             reprocess;
  int              debug;

  try { 

    JParser<> zap("Program to perform PDF fit of muon trajectory to data.");
    
    zap['f'] = make_field(inputFile);
    zap['o'] = make_field(outputFile)          = "start.root";
    zap['a'] = make_field(detectorFile);
    zap['n'] = make_field(numberOfEvents)      = JLimit::max();
    zap['P'] = make_field(pdfFile);
    zap['R'] = make_field(roadWidth_m)         = numeric_limits<double>::max();
    zap['B'] = make_field(rates_Hz)            = JK40Rates::getInstance();
    zap['T'] = make_field(T_ns)                = JTimeRange(-25.0, +50.0);
    zap['N'] = make_field(numberOfPrefits)     = 1;
    zap['s'] = make_field(start)               = JStart(1.0e-3, 1.0e-2);
    zap['r'] = make_field(reprocess);
    zap['d'] = make_field(debug)               = 1;
    
    zap(argc, argv);
  }
  catch(const exception& error) {
    FATAL(error.what() << endl);
  }



  cout.tie(&cerr);


  JDetector detector;

  try {
    load(detectorFile, detector);
  }
  catch(const JException& error) {
    FATAL(error);
  }

  const JModuleRouter moduleRouter(detector);

  typedef vector<JHitL0>  JDataL0_t;
  const JBuildL0<JHitL0>  buildL0;
  

  typedef JRegressor<JEnergy>  JRegressor_t;

  JRegressor_t::debug = debug;
  JRegressor_t::T_ns  = T_ns;

  
  JRegressor_t fit(pdfFile);

  if (fit.getRmax() < roadWidth_m) {
    roadWidth_m = fit.getRmax();
  }


  outputFile.open();

  outputFile.put(JMeta(argc, argv));

  while (inputFile.hasNext()) {

    STATUS("event: " << setw(10) << inputFile.getCounter() << '\r'); DEBUG(endl);

    multi_pointer_type ps = inputFile.next();

    JDAQEvent* tev = ps;
    JEvt*      evt = ps;
    JEvt       out;

    JEvt::iterator __end = evt->end();

    if (reprocess) {
      __end = partition(evt->begin(), __end, JHistory::is_not_event(JMUONSTART));
    }

    if (evt->begin() != __end) {

      copy(evt->begin(), __end, back_inserter(out));
    
      if (numberOfPrefits > 0) {
        advance(__end = evt->begin(), min(numberOfPrefits, out.size()));
      }

      partial_sort(evt->begin(), __end, evt->end(), qualitySorter);
      
      __end = partition(evt->begin(), __end, JHistory::is_event(evt->begin()->getHistory()));


      JDataL0_t dataL0;

      buildL0(*tev, moduleRouter, true, back_inserter(dataL0));
      

      for (JEvt::iterator track = evt->begin(); track != __end; ++track) {

        const JRotation3D     R (getDirection(*track));
        const JLine1Z         tz(getPosition (*track).rotate(R), track->getT());
        const JModel<JLine1Z> match(tz, roadWidth_m, T_ns);

        
        multiset<JDAQModuleIdentifier> top;
          
        for (JDataL0_t::const_iterator i = dataL0.begin(); i != dataL0.end(); ++i) {
            
          JHitR1 hit(*i);

          hit.rotate(R);

          if (match(hit)) {
            top.insert(hit.getModuleIdentifier());
          }
        }

        
        vector<JNPEHit> data;

        const JDetectorSubset_t subdetector(detector, getAxis(*track), roadWidth_m);
        
        for (JDetector::const_iterator module = subdetector.begin(); module != subdetector.end(); ++module) {

          size_t count = top.count(module->getID());

          if (count != 0) {
            data.push_back(JNPEHit(fit.getNPE(*module, rates_Hz), count));
          }
        }


        double Zmin      = 0.0;     // relative start position [m]
        double Zmax      = 0.0;     // relative end   position [m]
        double npe       = 0.0;     // npe due to mip up to barycenter of hits
        double npe_total = 0.0;     // npe due to mip up to end of track

        
        if (!data.empty()) {
        
          sort(data.begin(), data.end(), make_comparator(&JNPEHit::getZ));

          vector<JNPEHit>::const_iterator         track_start = start.find(data. begin(), data. end());
          vector<JNPEHit>::const_reverse_iterator track_end   = start.find(data.rbegin(), data.rend());

          if (track_start == data. end()) { track_start = data. begin(); }
          if (track_end   == data.rend()) { track_end   = data.rbegin(); }

          Zmin = track_start->getZ();
          Zmax = track_end  ->getZ();
                
          for (vector<JNPEHit>::const_iterator i = track_start; i != track_end.base(); ++i) {
            
            if (i->getZ() <= 0.0) {
              npe += i->getYA();
            }
            
            npe_total += i->getYA();
          }

          DEBUG("vertex " << FIXED(6,1) << track->getW(JCOPY_Z_M, 0.0) << endl); 

          for (vector<JNPEHit>::const_iterator i = data.begin(); i != data.end(); ++i) {
            DEBUG(FIXED(6,1) << i->getZ()  << ' ' <<
                  FIXED(6,4) << i->getY0() << ' ' <<
                  FIXED(6,4) << i->getYA() << ' ' <<
                  setw(1)    << i->getN()  << ' ' <<
                  FIXED(6,4) << i->getP()  << endl);
          }

          DEBUG(" -->   " << FIXED(6,1) << Zmin << ' ' << FIXED(6,1) << Zmax << endl);
        }
        
        // move track
        
        track->move(Zmin, getSpeedOfLight());
        
        out.push_back(JFit(*track).add(JMUONSTART));
        
        out.rbegin()->setW(JSTART_NPE_MIP,       npe);
        out.rbegin()->setW(JSTART_NPE_MIP_TOTAL, npe_total);
        out.rbegin()->setW(JSTART_LENGTH_METRES, Zmax - Zmin);
      }
 
      // apply default sorter
      
      sort(out.begin(), out.end(), qualitySorter);
    }

    outputFile.put(out);
  }
  STATUS(endl);

  JSingleFileScanner<JRemove<typelist, JEvt>::typelist> io(inputFile);

  io >> outputFile;

  outputFile.close();
}