Coding conventions
[u/mrichter/AliRoot.git] / test / ppbench / monsim.C
CommitLineData
43664a84 1void monsim(Int_t nev=20){
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 pp","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}