[u/mrichter/AliRoot.git] / HMPID / Hshuttle.C

  void Hshuttle(Int_t runTime=1500)
{// this macro is to simulate the functionality of SHUTTLE.
  gSystem->Load("$ALICE_ROOT/SHUTTLE/TestShuttle/libTestShuttle.so");
//  AliTestShuttle::SetMainCDB(TString("local://$HOME/CDB"));
  AliTestShuttle::SetMainCDB(TString("local://$HOME"));
  
  TMap *pDcsMap = new TMap;       pDcsMap->SetOwner(1);          //DCS archive map
  
  AliTestShuttle* pShuttle = new AliTestShuttle(0,0,1000000);   
  pShuttle->SetInputRunType("PHYSICS");
//  pShuttle->SetInputRunType("PEDESTAL_RUN");
  SimPed();   for(Int_t ldc=1;ldc<=2;ldc++) pShuttle->AddInputFile(AliTestShuttle::kDAQ,"HMP","pedestals",Form("LDC%i",ldc),Form("HmpidPeds%i.tar",ldc));
  SimMap(pDcsMap,runTime); pShuttle->SetDCSInput(pDcsMap);                                    //DCS map
  
  AliPreprocessor* pp = new AliHMPIDPreprocessor(pShuttle); pShuttle->Process();  delete pp;  //here goes preprocessor 

  DrawInput(pDcsMap); DrawOutput();
  gSystem->Exec("rm -rf HmpidPedDdl*.txt");
  gSystem->Exec("rm -rf HmpidPeds*.tar");
}//Hshuttle()
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
void SimPed()
{
  Int_t iDDLmin=0,iDDLmax=13;
  Int_t nSigmas = 3;             // value stored in the ddl files of pedestals
  ofstream out;
  for(Int_t ddl=iDDLmin;ddl<=iDDLmax;ddl++){
    out.open(Form("HmpidPedDdl%02i.txt",ddl));
    out << nSigmas <<endl;
    for(Int_t row=1;row<=24;row++)
      for(Int_t dil=1;dil<=10;dil++)
        for(Int_t adr=0;adr<=47;adr++){
          Float_t mean  = 150+200*gRandom->Rndm();
          Float_t sigma = 1+0.3*gRandom->Gaus();
          Int_t inhard=((Int_t(mean))<<9)+Int_t(mean+nSigmas*sigma);
          out << Form("%2i %2i %2i %5.2f %5.2f %x\n",row,dil,adr,mean,sigma,inhard);
        }

    out.close();
  }
  Printf("HMPID - All %i DDL pedestal files created successfully",iDDLmax-iDDLmin+1);
  gSystem->Exec("tar cf HmpidPeds1.tar HmpidPedDdl00.txt HmpidPedDdl01.txt HmpidPedDdl02.txt HmpidPedDdl03.txt HmpidPedDdl04.txt HmpidPedDdl05.txt HmpidPedDdl06.txt");
  gSystem->Exec("tar cf HmpidPeds2.tar HmpidPedDdl07.txt HmpidPedDdl08.txt HmpidPedDdl09.txt HmpidPedDdl10.txt HmpidPedDdl11.txt HmpidPedDdl12.txt HmpidPedDdl13.txt");
  Printf("HMPID - 2 tar files (HmpidPeds1-2) created (size 2273280 bytes)");
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
void SimMap(TMap *pDcsMap,Int_t runTime=1500)
{
  Int_t stepTime=100; //time interval between measurements
  Int_t startTime=0;
  
  for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
    TObjArray *pP=new TObjArray;  pP->SetOwner(1);
    TObjArray *pHV=new TObjArray; pHV->SetOwner(1);
    for(Int_t time=0;time<runTime;time+=stepTime) {
       pP->Add(new AliDCSValue((Float_t)1005.0 ,time));   //sample CH4 pressure [mBar]
       pHV->Add(new AliDCSValue((Float_t)2050.0,time));   //sample chamber HV [V]
    }
    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); 
    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); 

    for(Int_t iRad=0;iRad<3;iRad++){//radiators loop
      TObjArray *pT1=new TObjArray; pT1->SetOwner(1);
      TObjArray *pT2=new TObjArray; pT2->SetOwner(1);
      for (Int_t time=0;time<runTime;time+=stepTime)  pT1->Add(new AliDCSValue(13,time));  //sample inlet temperature    Nmean=1.292 @ 13 degrees
      for (Int_t time=0;time<runTime;time+=stepTime)  pT2->Add(new AliDCSValue(14,time));  //sample outlet temperature
      pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iIn_Temp",iCh,iCh,iRad)) ,pT1); 
      pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iOut_Temp",iCh,iCh,iRad)),pT2);
    }//radiators loop
  }//chambers loop
}//SimMap()
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
void DrawInput(TMap *pDcsMap)
{
  TCanvas *c=new TCanvas("cc","Input data",600,600);    c->Divide(3,3);
  
  AliDCSValue *pVal; Int_t cnt;
  
  for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
    if(iCh==6) c->cd(1);  if(iCh==5) c->cd(2);                          
    if(iCh==4) c->cd(4);  if(iCh==3) c->cd(5);  if(iCh==2) c->cd(6);
                          if(iCh==1) c->cd(8);  if(iCh==0) c->cd(9); 
                          
    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
    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
    TGraph *pGrHV=new TGraph; pGrHV->SetMarkerStyle(5); TIter nextHV(pHV);
    TGraph *pGrP =new TGraph; pGrP ->SetMarkerStyle(5); TIter nextP (pP );
    
    for(Int_t iRad=0;iRad<3;iRad++){
      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);
      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);
      TGraph *pGrT1=new TGraph; pGrT1->SetMarkerStyle(5); 
      TGraph *pGrT2=new TGraph; pGrT2->SetMarkerStyle(5); 
      cnt=0; while((pVal=(AliDCSValue*)nextT1())) pGrT1->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());
      cnt=0; while((pVal=(AliDCSValue*)nextT2())) pGrT2->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());
      pGrT1->Draw("AP");  pGrT2->Draw("same");
    }//radiators loop
  }//chambers loop  
}//DrawInput()
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
void DrawOutput()
{
//  AliCDBManager::Instance()->SetDefaultStorage("local://$HOME/CDB"); AliCDBManager::Instance()->SetRun(0);
  AliCDBManager::Instance()->SetDefaultStorage("local://$HOME"); AliCDBManager::Instance()->SetRun(0);
  AliCDBEntry *pQthreEnt =AliCDBManager::Instance()->Get("HMPID/Calib/Qthre");
  AliCDBEntry *pNmeanEnt =AliCDBManager::Instance()->Get("HMPID/Calib/Nmean");
  AliCDBEntry *pDaqSigEnt=AliCDBManager::Instance()->Get("HMPID/Calib/DaqSig");
  
  if(!pQthreEnt || !pNmeanEnt || !pDaqSigEnt) return;
  
  TObjArray *pNmean =(TObjArray*)pNmeanEnt ->GetObject(); 
  TObjArray *pQthre =(TObjArray*)pQthreEnt ->GetObject(); 
  TObjArray *pDaqSig=(TObjArray*)pDaqSigEnt->GetObject();
   
  TF1 *pRad0,*pRad1,*pRad2;  
  TCanvas *c2=new TCanvas("c2","Output"); c2->Divide(3,3);
  
  TH1F *pSig[7];
  
  for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
    TMatrix *pM=(TMatrix*)pDaqSig->At(iCh);
    
    pSig[iCh]=new TH1F(Form("sig%i",iCh),"Sigma;[QDC]",100,-5,20); //pSig[iCh]->SetLineColor(iCh+kRed);
    for(Int_t padx=0;padx<160;padx++) for(Int_t pady=0;pady<144;pady++) pSig[iCh]->Fill((*pM)(padx,pady));
    
    c2->cd(7);    if(iCh==0) pSig[iCh]->Draw(); else pSig[iCh]->Draw("same");
    
    if(iCh==6) c2->cd(1);  if(iCh==5) c2->cd(2);                          
    if(iCh==4) c2->cd(4);  if(iCh==3) c2->cd(5);  if(iCh==2) c2->cd(6);
                           if(iCh==1) c2->cd(8);  if(iCh==0) c2->cd(9); 
                          
    TF1 *pRad0=(TF1*)pNmean->At(iCh*3+0); pRad0->Draw();  pRad0->GetXaxis()->SetTimeDisplay(kTRUE); pRad0->GetYaxis()->SetRangeUser(1.28,1.3);
    TF1 *pRad1=(TF1*)pNmean->At(iCh*3+1); pRad1->Draw("same");
    TF1 *pRad2=(TF1*)pNmean->At(iCh*3+2); pRad2->Draw("same");
  }//chambers loop    
}//DrawOutput()
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Commit	Line	Data
	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"));
	6
	7	TMap *pDcsMap = new TMap; pDcsMap->SetOwner(1); //DCS archive map
	8
	9	AliTestShuttle* pShuttle = new AliTestShuttle(0,0,1000000);
	10	pShuttle->SetInputRunType("PHYSICS");
	11	// pShuttle->SetInputRunType("PEDESTAL_RUN");
	12	SimPed(); for(Int_t ldc=1;ldc<=2;ldc++) pShuttle->AddInputFile(AliTestShuttle::kDAQ,"HMP","pedestals",Form("LDC%i",ldc),Form("HmpidPeds%i.tar",ldc));
	13	SimMap(pDcsMap,runTime); pShuttle->SetDCSInput(pDcsMap); //DCS map
	14
	15	AliPreprocessor* pp = new AliHMPIDPreprocessor(pShuttle); pShuttle->Process(); delete pp; //here goes preprocessor
	16
	17	DrawInput(pDcsMap); DrawOutput();
	18	gSystem->Exec("rm -rf HmpidPedDdl*.txt");
	19	gSystem->Exec("rm -rf HmpidPeds*.tar");
	20	}//Hshuttle()
	21	//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
	22	void SimPed()
	23	{
	24	Int_t iDDLmin=0,iDDLmax=13;
	25	Int_t nSigmas = 3; // value stored in the ddl files of pedestals
	26	ofstream out;
	27	for(Int_t ddl=iDDLmin;ddl<=iDDLmax;ddl++){
	28	out.open(Form("HmpidPedDdl%02i.txt",ddl));
	29	out << nSigmas <<endl;
	30	for(Int_t row=1;row<=24;row++)
	31	for(Int_t dil=1;dil<=10;dil++)
	32	for(Int_t adr=0;adr<=47;adr++){
	33	Float_t mean = 150+200*gRandom->Rndm();
	34	Float_t sigma = 1+0.3*gRandom->Gaus();
	35	Int_t inhard=((Int_t(mean))<<9)+Int_t(mean+nSigmas*sigma);
	36	out << Form("%2i %2i %2i %5.2f %5.2f %x\n",row,dil,adr,mean,sigma,inhard);
	37	}
	38
	39	out.close();
	40	}
	41	Printf("HMPID - All %i DDL pedestal files created successfully",iDDLmax-iDDLmin+1);
	42	gSystem->Exec("tar cf HmpidPeds1.tar HmpidPedDdl00.txt HmpidPedDdl01.txt HmpidPedDdl02.txt HmpidPedDdl03.txt HmpidPedDdl04.txt HmpidPedDdl05.txt HmpidPedDdl06.txt");
	43	gSystem->Exec("tar cf HmpidPeds2.tar HmpidPedDdl07.txt HmpidPedDdl08.txt HmpidPedDdl09.txt HmpidPedDdl10.txt HmpidPedDdl11.txt HmpidPedDdl12.txt HmpidPedDdl13.txt");
	44	Printf("HMPID - 2 tar files (HmpidPeds1-2) created (size 2273280 bytes)");
	45	}
	46	//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
	47	void SimMap(TMap *pDcsMap,Int_t runTime=1500)
	48	{
	49	Int_t stepTime=100; //time interval between measurements
	50	Int_t startTime=0;
	51
	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	for(Int_t time=0;time<runTime;time+=stepTime) {
	56	pP->Add(new AliDCSValue((Float_t)1005.0 ,time)); //sample CH4 pressure [mBar]
	57	pHV->Add(new AliDCSValue((Float_t)2050.0,time)); //sample chamber HV [V]
	58	}
	59	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);
	60	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);
	61
	62	for(Int_t iRad=0;iRad<3;iRad++){//radiators loop
	63	TObjArray *pT1=new TObjArray; pT1->SetOwner(1);
	64	TObjArray *pT2=new TObjArray; pT2->SetOwner(1);
	65	for (Int_t time=0;time<runTime;time+=stepTime) pT1->Add(new AliDCSValue(13,time)); //sample inlet temperature Nmean=1.292 @ 13 degrees
	66	for (Int_t time=0;time<runTime;time+=stepTime) pT2->Add(new AliDCSValue(14,time)); //sample outlet temperature
	67	pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iIn_Temp",iCh,iCh,iRad)) ,pT1);
	68	pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iOut_Temp",iCh,iCh,iRad)),pT2);
	69	}//radiators loop
	70	}//chambers loop
	71	}//SimMap()
	72	//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
	73	void DrawInput(TMap *pDcsMap)
	74	{
	75	TCanvas *c=new TCanvas("cc","Input data",600,600); c->Divide(3,3);
	76
	77	AliDCSValue *pVal; Int_t cnt;
	78
	79	for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
	80	if(iCh==6) c->cd(1); if(iCh==5) c->cd(2);
	81	if(iCh==4) c->cd(4); if(iCh==3) c->cd(5); if(iCh==2) c->cd(6);
	82	if(iCh==1) c->cd(8); if(iCh==0) c->cd(9);
	83
	84	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
	85	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
	86	TGraph *pGrHV=new TGraph; pGrHV->SetMarkerStyle(5); TIter nextHV(pHV);
	87	TGraph *pGrP =new TGraph; pGrP ->SetMarkerStyle(5); TIter nextP (pP );
	88
	89	for(Int_t iRad=0;iRad<3;iRad++){
	90	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);
	91	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);
	92	TGraph *pGrT1=new TGraph; pGrT1->SetMarkerStyle(5);
	93	TGraph *pGrT2=new TGraph; pGrT2->SetMarkerStyle(5);
	94	cnt=0; while((pVal=(AliDCSValue*)nextT1())) pGrT1->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());
	95	cnt=0; while((pVal=(AliDCSValue*)nextT2())) pGrT2->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());
	96	pGrT1->Draw("AP"); pGrT2->Draw("same");
	97	}//radiators loop
	98	}//chambers loop
	99	}//DrawInput()
	100	//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
	101	void DrawOutput()
	102	{
	103	// AliCDBManager::Instance()->SetDefaultStorage("local://$HOME/CDB"); AliCDBManager::Instance()->SetRun(0);
	104	AliCDBManager::Instance()->SetDefaultStorage("local://$HOME"); AliCDBManager::Instance()->SetRun(0);
	105	AliCDBEntry *pQthreEnt =AliCDBManager::Instance()->Get("HMPID/Calib/Qthre");
	106	AliCDBEntry *pNmeanEnt =AliCDBManager::Instance()->Get("HMPID/Calib/Nmean");
	107	AliCDBEntry *pDaqSigEnt=AliCDBManager::Instance()->Get("HMPID/Calib/DaqSig");
	108
	109	if(!pQthreEnt \|\| !pNmeanEnt \|\| !pDaqSigEnt) return;
	110
	111	TObjArray pNmean =(TObjArray)pNmeanEnt ->GetObject();
	112	TObjArray pQthre =(TObjArray)pQthreEnt ->GetObject();
	113	TObjArray pDaqSig=(TObjArray)pDaqSigEnt->GetObject();
	114
	115	TF1 pRad0,pRad1,*pRad2;
	116	TCanvas *c2=new TCanvas("c2","Output"); c2->Divide(3,3);
	117
	118	TH1F *pSig[7];
	119
	120	for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
	121	TMatrix pM=(TMatrix)pDaqSig->At(iCh);
	122
	123	pSig[iCh]=new TH1F(Form("sig%i",iCh),"Sigma;[QDC]",100,-5,20); //pSig[iCh]->SetLineColor(iCh+kRed);
	124	for(Int_t padx=0;padx<160;padx++) for(Int_t pady=0;pady<144;pady++) pSig[iCh]->Fill((*pM)(padx,pady));
	125
	126	c2->cd(7); if(iCh==0) pSig[iCh]->Draw(); else pSig[iCh]->Draw("same");
	127
	128	if(iCh==6) c2->cd(1); if(iCh==5) c2->cd(2);
	129	if(iCh==4) c2->cd(4); if(iCh==3) c2->cd(5); if(iCh==2) c2->cd(6);
	130	if(iCh==1) c2->cd(8); if(iCh==0) c2->cd(9);
	131
	132	TF1 pRad0=(TF1)pNmean->At(iCh*3+0); pRad0->Draw(); pRad0->GetXaxis()->SetTimeDisplay(kTRUE); pRad0->GetYaxis()->SetRangeUser(1.28,1.3);
	133	TF1 pRad1=(TF1)pNmean->At(iCh*3+1); pRad1->Draw("same");
	134	TF1 pRad2=(TF1)pNmean->At(iCh*3+2); pRad2->Draw("same");
	135	}//chambers loop
	136	}//DrawOutput()
	137	//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++