MonaLisa monitoring in BITS
[u/mrichter/AliRoot.git] / test / PbPbbench / monsim.C
1 void monsim(Int_t nev=1){ 
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(),"Simulation PbPb","aliendb3.cern.ch");
13
14   gROOT->LoadMacro("sim.C");
15   sim(nev);
16   gMonitoringWriter->SendProcessingProgress(1,1,kTRUE);  
17
18   // Send the size of the raw.root file
19
20   FileStat_t buf;
21   gSystem->GetPathInfo("./raw.root",buf);
22
23   TList *valuelist = new TList();
24   valuelist->SetOwner(kTRUE);
25
26   TMonaLisaValue* valdouble = new TMonaLisaValue("raw.root size",buf.fSize);
27   valuelist->Add(valdouble);
28
29   gMonitoringWriter->SendParameters(valuelist);
30   delete valuelist;
31
32