30{
   33 
   35  
   40  char                  profile;
   41  bool                  overflow;
   42  string                format;
   43  string                option;
   45 
   46  try {
   47 
   48    JParser<> zap(
"Auxiliary program to profile 2D histograms.");
 
   49 
   50    zap[
'f'] = 
make_field(inputFile,  
"<input file>:<object name>");
 
   51    zap[
'P'] = 
make_field(profile,    
"profiling")                  = 
' ', 
'x', 
'X', 
'y', 
'Y';
 
   56    zap[
'F'] = 
make_field(format,     
"format, e.g. \"%s %i\" or \"%s %f %f\"") = 
"";
 
   57    zap[
'O'] = 
make_field(option,     
"option, see TH2::Profile(X|Y)")          = 
"", 
"s", 
"i", 
"g";
 
   59 
   60    zap(argc, argv);
   61  }
   62  catch(const exception &error) {
   63    FATAL(error.what() << endl);
 
   64  }
   65 
   66  const bool px = (profile == 'x' || profile == 'X' || !Y.empty());  
   67  const bool py = (profile == 'y' || profile == 'Y' || !X.empty());  
   68 
   69  if (px == py) {
   70    FATAL(
"Invalid operation: " 
   71          << (px ? "" : "no") << " X profiling " << " and " 
   72          << (py ? "" : "no") << " Y profiling " << endl);
   73  }
   74 
   75  if (format == "") {
   76 
   77    format = "%s_";
   78    
   79    if (px) { format += "px"; }
   80    if (py) { format += "py"; }
   81 
   82    if (X.empty() && Y.empty()) 
   83      format += "[%i]";
   84    else
   85      format += "[%f,%f]";
   86  }
   87  
   89 
   90  for (vector<JRootObjectID>::const_iterator input = inputFile.begin(); input != inputFile.end(); ++input) {
   91    
   92    DEBUG(
"Input: " << *input << endl);
 
   93    
   95 
   96    if (dir == NULL) {
   97      ERROR(
"File: " << input->getFullFilename() << 
" not opened." << endl);
 
   98      continue;
   99    }
  100 
  101    const TRegexp regexp(input->getObjectName());
  102 
  103    TIter iter(dir->GetListOfKeys());
  104 
  105    for (TKey* key; (
key = (TKey*) iter.Next()) != NULL; ) {
 
  106 
  107      const TString tag(
key->GetName());
 
  108      
  109      DEBUG(
"Key: " << tag << 
" match = " << tag.Contains(regexp) << endl);
 
  110 
  111      
  112 
  113      if (tag.Contains(regexp) && 
isTObject(key)) {
 
  114        
  115        TH2* h2 = 
dynamic_cast<TH2*
>(
key->ReadObj());
 
  116 
  117        if (h2 != NULL) {
  118          
  119          if        (px) {
  120 
  121            if (Y.empty()) {
  122              
  123              listOfObjects.push_back(h2->ProfileX(TString::Format(format.c_str(), h2->GetName()),
  124                                                   (overflow ? 0 : 1),
  125                                                   h2->GetYaxis()->GetNbins() + (overflow ? 1 : 0), option.c_str()));
  126              
  127            } else {
  128 
  129              for (Int_t i = 0; i != (Int_t) Y.size(); ++i) {
  130                listOfObjects.push_back(h2->ProfileX(TString::Format(format.c_str(), h2->GetName(),
  131                                                                     Y[i].getLowerLimit(),
  132                                                                     Y[i].getUpperLimit()),
  133                                                     h2->GetYaxis()->FindBin(Y[i].getLowerLimit()),
  134                                                     h2->GetYaxis()->FindBin(Y[i].getUpperLimit()) - 1, option.c_str()));
  135                
  136              }
  137            }
  138            
  139          } else if (py) {
  140 
  141            if (X.empty()) {
  142              
  143              listOfObjects.push_back(h2->ProfileY(TString::Format(format.c_str(), h2->GetName()),
  144                                                   (overflow ? 0 : 1),
  145                                                   h2->GetXaxis()->GetNbins() + (overflow ? 1 : 0), option.c_str()));
  146 
  147            }
  148          
  149          
  150          } else {
  151 
  152            for (Int_t i = 0; i != (Int_t) Y.size(); ++i) {
  153            
  154              listOfObjects.push_back(h2->ProfileY(TString::Format(format.c_str(), h2->GetName(),
  155                                                                   X[i].getLowerLimit(),
  156                                                                   X[i].getUpperLimit()),
  157                                                   h2->GetXaxis()->FindBin(X[i].getLowerLimit()),
  158                                                   h2->GetXaxis()->FindBin(X[i].getUpperLimit()) - 1, option.c_str()));
  159              
  160            }
  161          }
  162        }
  163      }
  164    }  
  165  }
  166 
  167  if (!listOfObjects.empty()) {
  168 
  170    
  171    for (vector<TObject*>::const_iterator i = listOfObjects.begin(); i != listOfObjects.end(); ++i) {
  172      (*i)->Write();
  173    }
  174      
  175    out.Write();
  176    out.Close();
  177  }
  178}
#define DEBUG(A)
Message macros.
 
#define make_field(A,...)
macro to convert parameter to JParserTemplateElement object
 
Utility class to parse command line options.
 
TDirectory * getDirectory(const JRootObjectID &id)
Get TDirectory pointer.
 
bool isTObject(const TKey *key)
Check if given key corresponds to a TObject.
 
This name space includes all other name spaces (except KM3NETDAQ, KM3NET and ANTARES).
 
Empty structure for specification of parser element that is initialised (i.e. does not require input)...