HMPID/Hshuttle.C

   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("CALIBRATION");
  12   pShuttle->SetInputRunType("PHYSICS");
  13   SimPed();
  14   for(Int_t ldc=51;ldc<=52;ldc++)
  15   {
  16    if(ldc==51) {for(Int_t iddl=0;iddl<=7;iddl++)  pShuttle->AddInputFile(AliTestShuttle::kDAQ,"HMP",Form("HmpidPedDdl%02i.txt",iddl),Form("LDC%i",ldc),Form("HmpidPedDdl%02i.txt",iddl));}
  17    if(ldc==52) {for(Int_t iddl=8;iddl<=13;iddl++) pShuttle->AddInputFile(AliTestShuttle::kDAQ,"HMP",Form("HmpidPedDdl%02i.txt",iddl),Form("LDC%i",ldc),Form("HmpidPedDdl%02i.txt",iddl));}
  18   }
  19   SimMap(pDcsMap,runTime); pShuttle->SetDCSInput(pDcsMap);                                    //DCS map
  20
  21   AliPreprocessor* pp = new AliHMPIDPreprocessor(pShuttle); pShuttle->Process();  delete pp;  //here goes preprocessor
  22
  23   DrawInput(pDcsMap); DrawOutput();
  24   gSystem->Exec("rm -rf HmpidPedDdl*.txt");
  25
  26 }//Hshuttle()
  27 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  28 void SimPed()
  29 {
  30   Int_t iDDLmin=0,iDDLmax=13;
  31   Int_t nSigmas = 3;                                            // value stored in the ddl files of pedestals
  32   ofstream out;
  33   for(Int_t ddl=iDDLmin;ddl<=iDDLmax;ddl++){
  34     out.open(Form("HmpidPedDdl%02i.txt",ddl));
  35     out << Form("%8s %2d\n","RunNumber",      999);             //read run number
  36     out << Form("%8s %2d\n","LdcId" ,         999);             //read LDC Id
  37     out << Form("%8s %2d\n","TimeStamp",      999);             //read time stamp
  38     out << Form("%8s %2d\n","TotNumEvt",      999);             //read number of total events processed
  39     out << Form("%8s %2d\n","TotDDLEvt",      999);             //read number of bad events for DDL # nDDL processed
  40     out << Form("%8s %2d\n","NumBadEvt",      999);             //read number of bad events for DDL # nDDL processed
  41     out << Form("%8s %2f\n","NBadE(%)",       999.9);           //read number of bad events (in %) for DDL # nDDL processed
  42     out << Form("%8s %2.2d\n","SigCut",      nSigmas);          //# of sigma cuts
  43     for(Int_t row=1;row<=24;row++)
  44       for(Int_t dil=1;dil<=10;dil++)
  45         for(Int_t adr=0;adr<=47;adr++){
  46           Float_t mean  = 150+200*gRandom->Rndm();
  47           Float_t sigma = 1+0.3*gRandom->Gaus();
  48           Int_t inhard=((Int_t(mean+nSigmas*sigma))<<9)+Int_t(mean); //right calculation, xchecked with Paolo 8/4/2008
  49           out << Form("%2i %2i %2i %5.3f %5.3f %4.4x \n",row,dil,adr,mean,sigma,inhard);
  50         }
  51
  52     out.close();
  53   }
  54   Printf("HMPID - All %i DDL pedestal files created successfully",iDDLmax-iDDLmin+1);
  55 }
  56 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  57 void SimMap(TMap *pDcsMap,Int_t runTime=1500)
  58 {
  59   Int_t stepTime=100; //time interval between measurements
  60   Int_t startTime=0;
  61
  62   TObjArray *pHV[7];
  63   for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
  64     TObjArray *pPCH4=new TObjArray;  pPCH4->SetOwner(1);
  65     TObjArray *pPenv=new TObjArray;  pPenv->SetOwner(1);
  66     pHV[iCh]=new TObjArray; pHV[iCh]->SetOwner(1);
  67     for(Int_t time=0;time<runTime;time+=stepTime) {
  68        pPCH4->Add(new AliDCSValue((Float_t)4.0,time));               //sample CH4 pressure [mBar] differential respect to atm
  69        pPenv->Add(new AliDCSValue((Float_t)1000.0 ,time));               //also atm. pressure set to the same value
  70 //       pHV[iCh]->Add(new AliDCSValue((Float_t)(1930+iCh*20),time));   //sample chamber HV [V]
  71        pHV[iCh]->Add(new AliDCSValue((Float_t)(2050),time));   //sample chamber HV [V]
  72     }
  73     pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_GAS/HMP_MP%i_GAS_PMWPC.actual.value"           ,iCh,iCh,iCh    )),pPCH4);         //CH4 pressure wrt atm
  74     pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_ENV/HMP_ENV_PENV.actual.value"                                               )),pPenv);         //atm pressure
  75     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,iCh)),pHV[iCh]);      //HV SEC0
  76     pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_PW/HMP_MP%i_SEC1/HMP_MP%i_SEC1_HV.actual.vMon",iCh,iCh,iCh,iCh)),pHV[iCh]);      //HV SEC1
  77     pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_PW/HMP_MP%i_SEC2/HMP_MP%i_SEC2_HV.actual.vMon",iCh,iCh,iCh,iCh)),pHV[iCh]);      //HV SEC2
  78     pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_PW/HMP_MP%i_SEC3/HMP_MP%i_SEC3_HV.actual.vMon",iCh,iCh,iCh,iCh)),pHV[iCh]);      //HV SEC3
  79     pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_PW/HMP_MP%i_SEC4/HMP_MP%i_SEC4_HV.actual.vMon",iCh,iCh,iCh,iCh)),pHV[iCh]);      //HV SEC4
  80     pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_PW/HMP_MP%i_SEC5/HMP_MP%i_SEC5_HV.actual.vMon",iCh,iCh,iCh,iCh)),pHV[iCh]);      //HV SEC5
  81
  82     for(Int_t iRad=0;iRad<3;iRad++){//radiators loop
  83       TObjArray *pT1=new TObjArray; pT1->SetOwner(1);
  84       TObjArray *pT2=new TObjArray; pT2->SetOwner(1);
  85       for (Int_t time=0;time<runTime;time+=stepTime)  pT1->Add(new AliDCSValue((Float_t)(13.0+gRandom->Rndm()),time));  //sample inlet temperature                    Nmean=1.292 @ 13 degrees
  86       for (Int_t time=0;time<runTime;time+=stepTime)  pT2->Add(new AliDCSValue((Float_t)(18.0+gRandom->Rndm()),time));  //sample outlet temperature
  87       pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iIn_Temp",iCh,iCh,iRad)) ,pT1);               //Temperature in  Rad
  88       pDcsMap->Add(new TObjString(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iOut_Temp",iCh,iCh,iRad)),pT2);               //Temperature out Rad
  89     }//radiators loop
  90   }//chambers loop
  91 }//SimMap()
  92 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  93 void DrawInput(TMap *pDcsMap)
  94 {
  95
  96   TCanvas *c=new TCanvas("cc","Input data",600,600);    c->Divide(3,3);
  97
  98   AliDCSValue *pVal; Int_t cnt;
  99
 100   for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
 101     if(iCh==6) c->cd(1);  if(iCh==5) c->cd(2);
 102     if(iCh==4) c->cd(4);  if(iCh==3) c->cd(5);  if(iCh==2) c->cd(6);
 103                           if(iCh==1) c->cd(8);  if(iCh==0) c->cd(9);
 104
 105     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
 106     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
 107     TGraph *pGrHV=new TGraph; pGrHV->SetMarkerStyle(5); TIter nextHV(pHV);
 108     TGraph *pGrP =new TGraph; pGrP ->SetMarkerStyle(5); TIter nextP (pP );
 109
 110     for(Int_t iRad=0;iRad<3;iRad++){
 111       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);
 112       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);
 113       TGraph *pGrT1=new TGraph; pGrT1->SetMarkerStyle(5);
 114       TGraph *pGrT2=new TGraph; pGrT2->SetMarkerStyle(5);
 115       pGrT1->SetMaximum(40);
 116       pGrT2->SetMaximum(40);
 117       cnt=0; while((pVal=(AliDCSValue*)nextT1())) pGrT1->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());
 118       cnt=0; while((pVal=(AliDCSValue*)nextT2())) pGrT2->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());
 119       if(iRad==0) pGrT1->Draw("AP"); else pGrT1->Draw("same");
 120       pGrT2->Draw("same");
 121     }//radiators loop
 122   }//chambers loop
 123 }//DrawInput()
 124 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 125 void DrawOutput()
 126 {
 127 //  AliCDBManager::Instance()->SetDefaultStorage("local://$HOME/CDB"); AliCDBManager::Instance()->SetRun(0);
 128   AliCDBManager::Instance()->SetDefaultStorage("local://$HOME"); AliCDBManager::Instance()->SetRun(0);
 129   AliCDBEntry *pQthreEnt =AliCDBManager::Instance()->Get("HMPID/Calib/Qthre");
 130   AliCDBEntry *pNmeanEnt =AliCDBManager::Instance()->Get("HMPID/Calib/Nmean");
 131   AliCDBEntry *pDaqSigEnt=AliCDBManager::Instance()->Get("HMPID/Calib/DaqSig");
 132
 133   if(!pQthreEnt || !pNmeanEnt || !pDaqSigEnt) return;
 134
 135   TObjArray *pNmean =(TObjArray*)pNmeanEnt ->GetObject();
 136   TObjArray *pQthre =(TObjArray*)pQthreEnt ->GetObject();
 137   TObjArray *pDaqSig=(TObjArray*)pDaqSigEnt->GetObject();
 138
 139   TF1 *pRad0,*pRad1,*pRad2;
 140   TCanvas *c2=new TCanvas("c2","Output"); c2->Divide(3,3);
 141
 142   TH1F *pSig[7];
 143
 144   for(Int_t iCh=0;iCh<7;iCh++){//chambers loop
 145     TMatrix *pM=(TMatrix*)pDaqSig->At(iCh);
 146
 147     pSig[iCh]=new TH1F(Form("sig%i",iCh),"Sigma;[QDC]",100,-5,20); //pSig[iCh]->SetLineColor(iCh+kRed);
 148     for(Int_t padx=0;padx<160;padx++) for(Int_t pady=0;pady<144;pady++) pSig[iCh]->Fill((*pM)(padx,pady));
 149
 150     c2->cd(7);    if(iCh==0) pSig[iCh]->Draw(); else pSig[iCh]->Draw("same");
 151
 152     if(iCh==6) c2->cd(1);  if(iCh==5) c2->cd(2);
 153     if(iCh==4) c2->cd(4);  if(iCh==3) c2->cd(5);  if(iCh==2) c2->cd(6);
 154                            if(iCh==1) c2->cd(8);  if(iCh==0) c2->cd(9);
 155
 156     TF1 *pRad0=(TF1*)pNmean->At(iCh*3+0); pRad0->Draw();  pRad0->GetXaxis()->SetTimeDisplay(kTRUE); pRad0->GetYaxis()->SetRangeUser(1.28,1.3);
 157     TF1 *pRad1=(TF1*)pNmean->At(iCh*3+1); pRad1->Draw("same");
 158     TF1 *pRad2=(TF1*)pNmean->At(iCh*3+2); pRad2->Draw("same");
 159   }//chambers loop
 160 }//DrawOutput()
 161 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++