PWGHF/vertexingHF/macros/LoadLibraries.C

   1 Int_t setupPar(const char* pararchivename);
   2
   3 void LoadLibraries(Bool_t useParFiles=kFALSE) {
   4
   5   gSystem->Load("libTree.so");
   6   gSystem->Load("libGeom.so");
   7   gSystem->Load("libPhysics.so");
   8   gSystem->Load("libVMC.so");
   9   gSystem->Load("libMinuit.so");
  10   gSystem->Load("libSTEERBase.so");
  11   gSystem->Load("libESD.so");
  12   gSystem->Load("libAOD.so");
  13   gSystem->Load("libANALYSIS.so");
  14   gSystem->Load("libOADB.so");
  15   gSystem->Load("libANALYSISalice.so");
  16   gSystem->Load("libCORRFW.so");
  17   gSystem->Load("libPWGHFbase.so");
  18   gSystem->Load("libPWGHFvertexingHF.so");
  19   //gSystem->Load("libPWGmuon.so");
  20
  21
  22   if(useParFiles) {
  23     setupPar("STEERBase");
  24     setupPar("ESD");
  25     setupPar("AOD");
  26     setupPar("ANALYSIS");
  27     setupPar("OADB");
  28     setupPar("ANALYSISalice");
  29     setupPar("CORRFW");
  30     setupPar("PWG3base");
  31     setupPar("PWG3vertexingHF");
  32     //setupPar("PWG3muon");
  33   }
  34
  35   return;
  36 }
  37 //------------------------------------------------------------------------
  38 Int_t setupPar(const char* pararchivename) {
  39   ///////////////////
  40   // Setup PAR File//
  41   ///////////////////
  42
  43   if (pararchivename) {
  44     char processline[1024];
  45     TString base = gSystem->BaseName(pararchivename);
  46     TString dir  = gSystem->DirName(pararchivename);
  47     TString ocwd = gSystem->WorkingDirectory();
  48     // Move to dir where the par files are and unpack
  49     gSystem->ChangeDirectory(dir.Data());
  50     sprintf(processline,".! tar xvzf %s.par",base.Data());
  51     gROOT->ProcessLine(processline);
  52     // Move to par folder
  53     gSystem->ChangeDirectory(base.Data());
  54
  55     // check for BUILD.sh and execute
  56     if (!gSystem->AccessPathName("PROOF-INF/BUILD.sh")) {
  57       printf("*******************************\n");
  58       printf("*** Building PAR archive    ***\n");
  59       printf("*******************************\n");
  60
  61       if (gSystem->Exec("PROOF-INF/BUILD.sh")) {
  62         Error("runAnalysis","Cannot Build the PAR Archive! - Abort!");
  63         gSystem->ChangeDirectory(ocwd.Data());
  64         return -1;
  65       }
  66     }
  67     // check for SETUP.C and execute
  68     if (!gSystem->AccessPathName("PROOF-INF/SETUP.C")) {
  69       printf("*******************************\n");
  70       printf("*** Setup PAR archive       ***\n");
  71       printf("*******************************\n");
  72       // If dir not empty, set the full include path
  73       if (dir.Length()) {
  74         sprintf(processline, ".include %s", pararchivename);
  75         gROOT->ProcessLine(processline);
  76       }
  77       gROOT->Macro("PROOF-INF/SETUP.C");
  78     }
  79     gSystem->ChangeDirectory(ocwd.Data());
  80   }
  81   return 1;
  82 }