PWG3/vertexingHF/LoadLibraries.C

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