1 void Hshuttle(Int_t runTime=1500)
2 {// this macro is to simulate the functionality of SHUTTLE.
3 gSystem->Load("$ALICE_ROOT/SHUTTLE/TestShuttle/libTestShuttle.so");
4 // AliTestShuttle::SetMainCDB(TString("local://$HOME/CDB"));
5 AliTestShuttle::SetMainCDB(TString("local://$HOME"));
7 TMap *pDcsMap = new TMap; pDcsMap->SetOwner(1); //DCS archive map
9 AliTestShuttle* pShuttle = new AliTestShuttle(0,0,1000000);
10 pShuttle->SetInputRunType("PHYSICS");
11 SimPed(); for(Int_t ldc=1;ldc<=4;ldc++) pShuttle->AddInputFile(AliTestShuttle::kDAQ,"HMP","pedestals",Form("LDC%i",ldc),Form("HmpidPeds%i.tar",ldc));
12 SimMap(pDcsMap,runTime); pShuttle->SetDCSInput(pDcsMap); //DCS map
14 AliPreprocessor* pp = new AliHMPIDPreprocessor(pShuttle); pShuttle->Process(); delete pp; //here goes preprocessor
16 DrawInput(pDcsMap); DrawOutput();
17 gSystem->Exec("rm -rf HmpidPedDdl*.txt");
18 gSystem->Exec("rm -rf HmpidPeds*.tar");
20 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
23 Int_t nSigmas = 1; // value stored in the ddl files of pedestals
25 for(Int_t ddl=0;ddl<=13;ddl++){
26 out.open(Form("HmpidPedDdl%02i.txt",ddl));
27 out << nSigmas <<endl;
28 for(Int_t row=1;row<=24;row++)
29 for(Int_t dil=1;dil<=10;dil++)
30 for(Int_t adr=0;adr<=47;adr++){
31 Float_t mean = 150+200*gRandom->Rndm();
32 Float_t sigma = 1+0.3*gRandom->Gaus();
33 Int_t inhard=((Int_t(mean))<<9)+Int_t(mean+nSigmas*sigma);
34 out << Form("%2i %2i %2i %5.2f %5.2f %x\n",row,dil,adr,mean,sigma,inhard);
37 Printf("file ped %02i created",ddl);
40 gSystem->Exec("tar cf HmpidPeds1.tar HmpidPedDdl00.txt HmpidPedDdl01.txt HmpidPedDdl02.txt HmpidPedDdl03.txt");
41 gSystem->Exec("tar cf HmpidPeds2.tar HmpidPedDdl04.txt HmpidPedDdl05.txt HmpidPedDdl06.txt HmpidPedDdl07.txt");
42 gSystem->Exec("tar cf HmpidPeds3.tar HmpidPedDdl08.txt HmpidPedDdl09.txt HmpidPedDdl10.txt HmpidPedDdl11.txt");
43 gSystem->Exec("tar cf HmpidPeds4.tar HmpidPedDdl12.txt HmpidPedDdl13.txt");
45 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
46 void SimMap(TMap *pDcsMap,Int_t runTime=1500)
48 Int_t stepTime=100; //time interval between mesuraments
52 for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
53 TObjArray *pP=new TObjArray; pP->SetOwner(1);
54 TObjArray *pHV=new TObjArray; pHV->SetOwner(1);
55 TObjArray *pUserCut=new TObjArray; pUserCut->SetOwner(1);
56 TObjArray *pDaqSigCut=new TObjArray; pDaqSigCut->SetOwner(1);
57 for(Int_t time=0;time<runTime;time+=stepTime) {
58 pP->Add(new AliDCSValue((Float_t)1005.0 ,time)); //sample CH4 pressure [mBar]
59 pHV->Add(new AliDCSValue((Float_t)2010.0,time)); //sample chamber HV [V]
60 pUserCut->Add(new AliDCSValue(3,time)); //User Cut in number of sigmas
61 pDaqSigCut->Add(new AliDCSValue(1,time)); //Cut in sigmas applied to electronics
63 pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_GAS/HMP_MP%i_GAS_PMWC.actual.value" ,iCh,iCh,iCh)),pP);
64 pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_PW/HMP_MP%i_SEC0/HMP_MP%i_SEC0_HV.actual.vMon",iCh,iCh,iCh)),pHV);
65 pDcsMap->Add(new TObjString(Form("HMP_%i.UserCut",iCh)),pUserCut);
66 pDcsMap->Add(new TObjString(Form("HMP_%i.DaqSigCut",iCh)),pDaqSigCut);
68 for(Int_t iRad=0;iRad<3;iRad++){//radiators loop
69 TObjArray *pT1=new TObjArray; pT1->SetOwner(1);
70 TObjArray *pT2=new TObjArray; pT2->SetOwner(1);
71 for (Int_t time=0;time<runTime;time+=stepTime) pT1->Add(new AliDCSValue(13,time)); //sample inlet temperature Nmean=1.292 @ 13 degrees
72 for (Int_t time=0;time<runTime;time+=stepTime) pT2->Add(new AliDCSValue(14,time)); //sample outlet temperature
73 pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iIn_Temp",iCh,iCh,iRad)) ,pT1);
74 pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iOut_Temp",iCh,iCh,iRad)),pT2);
78 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
79 void DrawInput(TMap *pDcsMap)
81 TCanvas *c=new TCanvas("cc","Input data",600,600); c->Divide(3,3);
83 AliDCSValue *pVal; Int_t cnt;
85 for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
86 if(iCh==6) c->cd(1); if(iCh==5) c->cd(2);
87 if(iCh==4) c->cd(4); if(iCh==3) c->cd(5); if(iCh==2) c->cd(6);
88 if(iCh==1) c->cd(8); if(iCh==0) c->cd(9);
90 TObjArray *pHV=(TObjArray*)pDcsMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_PW/HMP_MP%i_SEC0/HMP_MP%i_SEC0_HV.actual.vMon",iCh,iCh,iCh,iCh)); //HV
91 TObjArray *pP =(TObjArray*)pDcsMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_GAS/HMP_MP%i_GAS_PMWC.actual.value",iCh,iCh,iCh)); //P
92 TGraph *pGrHV=new TGraph; pGrHV->SetMarkerStyle(5); TIter nextHV(pHV);
93 TGraph *pGrP =new TGraph; pGrP ->SetMarkerStyle(5); TIter nextP (pP );
95 for(Int_t iRad=0;iRad<3;iRad++){
96 TObjArray *pT1=(TObjArray*)pDcsMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iIn_Temp",iCh,iCh,iRad)); TIter nextT1(pT1);
97 TObjArray *pT2=(TObjArray*)pDcsMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iOut_Temp",iCh,iCh,iRad)); TIter nextT2(pT2);
98 TGraph *pGrT1=new TGraph; pGrT1->SetMarkerStyle(5);
99 TGraph *pGrT2=new TGraph; pGrT2->SetMarkerStyle(5);
100 cnt=0; while((pVal=(AliDCSValue*)nextT1())) pGrT1->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());
101 cnt=0; while((pVal=(AliDCSValue*)nextT2())) pGrT2->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());
102 pGrT1->Draw("AP"); pGrT2->Draw("same");
106 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
109 // AliCDBManager::Instance()->SetDefaultStorage("local://$HOME/CDB"); AliCDBManager::Instance()->SetRun(0);
110 AliCDBManager::Instance()->SetDefaultStorage("local://$HOME"); AliCDBManager::Instance()->SetRun(0);
111 AliCDBEntry *pQthreEnt =AliCDBManager::Instance()->Get("HMPID/Calib/Qthre");
112 AliCDBEntry *pNmeanEnt =AliCDBManager::Instance()->Get("HMPID/Calib/Nmean");
113 AliCDBEntry *pDaqSigEnt=AliCDBManager::Instance()->Get("HMPID/Calib/DaqSig");
115 if(!pQthreEnt || !pNmeanEnt || !pDaqSigEnt) return;
117 TObjArray *pNmean =(TObjArray*)pNmeanEnt ->GetObject();
118 TObjArray *pQthre =(TObjArray*)pQthreEnt ->GetObject();
119 TObjArray *pDaqSig=(TObjArray*)pDaqSigEnt->GetObject();
121 TF1 *pRad0,*pRad1,*pRad2;
122 TCanvas *c2=new TCanvas("c2","Output"); c2->Divide(3,3);
126 for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
127 TMatrix *pM=(TMatrix*)pDaqSig->At(iCh);
129 pSig[iCh]=new TH1F(Form("sig%i",iCh),"Sigma;[QDC]",100,-5,20); //pSig[iCh]->SetLineColor(iCh+kRed);
130 for(Int_t padx=0;padx<160;padx++) for(Int_t pady=0;pady<144;pady++) pSig[iCh]->Fill((*pM)(padx,pady));
132 c2->cd(7); if(iCh==0) pSig[iCh]->Draw(); else pSig[iCh]->Draw("same");
134 if(iCh==6) c2->cd(1); if(iCh==5) c2->cd(2);
135 if(iCh==4) c2->cd(4); if(iCh==3) c2->cd(5); if(iCh==2) c2->cd(6);
136 if(iCh==1) c2->cd(8); if(iCh==0) c2->cd(9);
138 TF1 *pRad0=(TF1*)pNmean->At(iCh*3+0); pRad0->Draw(); pRad0->GetXaxis()->SetTimeDisplay(kTRUE); pRad0->GetYaxis()->SetRangeUser(1.28,1.3);
139 TF1 *pRad1=(TF1*)pNmean->At(iCh*3+1); pRad1->Draw("same");
140 TF1 *pRad2=(TF1*)pNmean->At(iCh*3+2); pRad2->Draw("same");
143 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++