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