test/ppbench/monrec.C

   1 void monrec() {
   2   // MonaLisa monitoring
   3   gSystem->Load("libNet.so");
   4   gSystem->Load("libMonaLisa.so");
   5
   6   SysInfo_t info;
   7   gSystem->GetSysInfo(&info);
   8
   9   TString platform(info.fOS);
  10   platform += ".";
  11   platform += info.fCpuType;
  12   new TMonaLisaWriter(platform.Data(),"Reconstruction pp","aliendb3.cern.ch");
  13
  14
  15   gROOT->LoadMacro("rec.C");
  16   rec();
  17   gMonitoringWriter->SendProcessingProgress(1,1,kTRUE);
  18
  19   // Send the size of the AliESDs.root file
  20
  21   FileStat_t buf;
  22   gSystem->GetPathInfo("./AliESDs.root",buf);
  23
  24   TList *valuelist = new TList();
  25   valuelist->SetOwner(kTRUE);
  26
  27   TMonaLisaValue* valdouble = new TMonaLisaValue("AliESDs.root size",buf.fSize);
  28   valuelist->Add(valdouble);
  29
  30   gMonitoringWriter->SendParameters(valuelist);
  31   delete valuelist;
  32
  33 }