JZoom3D.cc

Go to the documentation of this file.

 
#include <string>
#include <iostream>
#include <iomanip>
#include <vector>
#include <algorithm>
 
#include "TROOT.h"
#include "TFile.h"
#include "TKey.h"
#include "TH3D.h"
#include "TString.h"
#include "TRegexp.h"
 
#include "JTools/JRange.hh"
 
#include "JGizmo/JRootObjectID.hh"
#include "JGizmo/JGizmoToolkit.hh"
 
#include "Jeep/JParser.hh"
#include "Jeep/JMessage.hh"
 
 
/**
 * \file
 * Auxiliary program to zoom 3D histograms.
 * \author mdejong
 */
int main(int argc, char **argv)
{
  using namespace std;
  using namespace JPP;
 
  typedef JRange<double>  JRange_t;
  
  vector<JRootObjectID> inputFile;
  string                outputFile;
  JRange_t              X;
  JRange_t              Y;
  JRange_t              Z;
  double                precision;
  int                   debug;
 
  try {
 
    JParser<> zap("Auxiliary program to zoom 3D histograms.");
 
    zap['f'] = make_field(inputFile,  "<input file>:<object name>");
    zap['o'] = make_field(outputFile, "ROOT file with histogram(s)") = "zoom.root";
    zap['x'] = make_field(X,          "x-abscissa range")            = JPARSER::initialised();
    zap['y'] = make_field(Y,          "y-abscissa range")            = JPARSER::initialised();
    zap['z'] = make_field(Z,          "z-abscissa range")            = JPARSER::initialised();
    zap['p'] = make_field(precision)  = 1.0e-16;
    zap['d'] = make_field(debug)      = 1;
 
    zap(argc, argv);
  }
  catch(const exception &error) {
    FATAL(error.what() << endl);
  }
 
  vector<TObject*> listOfObjects;
 
  for (vector<JRootObjectID>::const_iterator input = inputFile.begin(); input != inputFile.end(); ++input) {
    
    DEBUG("Input: " << *input << endl);
    
    TDirectory* dir = getDirectory(*input);
 
    if (dir == NULL) {
      ERROR("File: " << input->getFullFilename() << " not opened." << endl);
      continue;
    }
 
    const TRegexp regexp(input->getObjectName());
 
    TIter iter(dir->GetListOfKeys());
 
    for (TKey* key; (key = (TKey*) iter.Next()) != NULL; ) {
 
      const TString tag(key->GetName());
      
      DEBUG("Key: " << tag << " match = " << tag.Contains(regexp) << endl);
 
      // option match
 
      if (tag.Contains(regexp) && isTObject(key)) {
        
        TH3D* ha = dynamic_cast<TH3D*>(key->ReadObj());
 
        if (ha != NULL) {
 
          const Int_t ix1 = max(ha->GetXaxis()->FindBin(X.getLowerLimit()), 1);
          const Int_t ix2 = min(ha->GetXaxis()->FindBin(X.getUpperLimit()), ha->GetXaxis()->GetNbins());
          const Int_t iy1 = max(ha->GetYaxis()->FindBin(Y.getLowerLimit()), 1);
          const Int_t iy2 = min(ha->GetYaxis()->FindBin(Y.getUpperLimit()), ha->GetYaxis()->GetNbins());
          const Int_t iz1 = max(ha->GetZaxis()->FindBin(Z.getLowerLimit()), 1);
          const Int_t iz2 = min(ha->GetZaxis()->FindBin(Z.getUpperLimit()), ha->GetZaxis()->GetNbins());
 
          DEBUG("zoom: "
                << "[" << ix1 << "," << ix2 << "]" << " x "
                << "[" << iy1 << "," << iy2 << "]" << " x "
                << "[" << iz1 << "," << iz2 << "]" << endl);
 
          TH3D* hb = new TH3D(MAKE_CSTRING(ha->GetName() << ".zoom"), NULL,
                              ix2 - ix1 + 1, ha->GetXaxis()->GetBinLowEdge(ix1), ha->GetXaxis()->GetBinUpEdge(ix2), 
                              iy2 - iy1 + 1, ha->GetYaxis()->GetBinLowEdge(iy1), ha->GetYaxis()->GetBinUpEdge(iy2), 
                              iz2 - iz1 + 1, ha->GetZaxis()->GetBinLowEdge(iz1), ha->GetZaxis()->GetBinUpEdge(iz2)); 
 
          if (fabs(ha->GetXaxis()->GetBinWidth(1) - hb->GetXaxis()->GetBinWidth(1)) > precision) {
            FATAL("Binwidth x " << FIXED(9,5) << ha->GetXaxis()->GetBinWidth(1) << " != " << FIXED(9,5) << hb->GetXaxis()->GetBinWidth(1) << endl);
          }
          if (fabs(ha->GetYaxis()->GetBinWidth(1) - hb->GetYaxis()->GetBinWidth(1)) > precision) {
            FATAL("Binwidth y " << FIXED(9,5) << ha->GetYaxis()->GetBinWidth(1) << " != " << FIXED(9,5) << hb->GetYaxis()->GetBinWidth(1) << endl);
          }
          if (fabs(ha->GetZaxis()->GetBinWidth(1) - hb->GetZaxis()->GetBinWidth(1)) > precision) {
            FATAL("Binwidth z " << FIXED(9,5) << ha->GetZaxis()->GetBinWidth(1) << " != " << FIXED(9,5) << hb->GetZaxis()->GetBinWidth(1) << endl);
          }
 
          for (Int_t ix = ix1; ix <= ix2; ++ix) {
            for (Int_t iy = iy1; iy <= iy2; ++iy) {
              for (Int_t iz = iz1; iz <= iz2; ++iz) {
 
                hb->SetBinContent(ix - ix1 + 1, iy - iy1 + 1, iz - iz1 + 1, ha->GetBinContent(ix, iy, iz));
 
                if (ha->GetSumw2N()) {
                  hb->SetBinError(ix - ix1 + 1, iy - iy1 + 1, iz - iz1 + 1, ha->GetBinError(ix, iy, iz));
                }
              }
            }
          }
 
          listOfObjects.push_back(hb);
        }
      }
    }
  }
 
  if (!listOfObjects.empty()) {
 
    TFile out(outputFile.c_str(), "recreate");
    
    for (vector<TObject*>::const_iterator i = listOfObjects.begin(); i != listOfObjects.end(); ++i) {
      (*i)->Write();
    }
      
    out.Write();
    out.Close();
  }
}