1 /**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
7 * Permission to use, copy, modify and distribute this software and its *
8 * documentation strictly for non-commercial purposes is hereby granted *
9 * without fee, provided that the above copyright notice appears in all *
10 * copies and that both the copyright notice and this permission notice *
11 * appear in the supporting documentation. The authors make no claims *
12 * about the suitability of this software for any purpose. It is *
13 * provided "as is" without express or implied warranty. *
14 **************************************************************************/
17 // --- ROOT system ---
19 #include <TIterator.h>
21 #include <TPaveText.h>
22 #include <TObjArray.h>
23 #include <TParameter.h>
26 // --- AliRoot header files ---
28 #include "AliCDBManager.h"
29 #include "AliCDBEntry.h"
30 #include "AliQAThresholds.h"
31 #include "AliZDCQAChecker.h"
33 ClassImp(AliZDCQAChecker)
35 //_________________________________________________________________
36 AliZDCQAChecker::AliZDCQAChecker() :
37 AliQACheckerBase("ZDC","ZDC Quality Assurance Data Maker"),
39 fZDCQAThr_ZNCTDCRefThr(-322.7),
40 fZDCQAThr_ZPCTDCRefThr(-321.4),
41 fZDCQAThr_ZNATDCRefThr(-321.6),
42 fZDCQAThr_ZPATDCRefThr(-321.7),
43 fZDCQAThr_ZEM1TDCRefThr(-316.2),
44 fZDCQAThr_ZEM2TDCRefThr(-315.4)
49 //____________________________________________________________________________
50 void AliZDCQAChecker::Check(Double_t * test, AliQAv1::ALITASK_t index, TObjArray ** list,
51 const AliDetectorRecoParam * /*recoParam*/)
53 // Checks the QA histograms on the input list:
55 const char* taskName = AliQAv1::GetAliTaskName(index);
56 //printf("\n\tAliZDCQAChecker -> checking QA histos for task %s\n",taskName);
58 Int_t ihitHisto=0, idigHisto=0;
59 Int_t irecHisto=0, irawHisto=0, esdInd=0;
62 messages.SetOwner(kTRUE);
66 for(Int_t specie = 0; specie<AliRecoParam::kNSpecies; specie++){
68 if(!AliQAv1::Instance(AliQAv1::GetDetIndex(GetName()))->IsEventSpecieSet(AliRecoParam::ConvertIndex(specie)))
70 //printf("\tAliZDCQAChecker -> specie %d, AliRecoParam::ConvertIndex(specie) %d, AliRecoParam::kLowMult %d, IsEventSpecieSet(specie) %d\n",
71 // specie, AliRecoParam::ConvertIndex(specie) ,AliRecoParam::kLowMult,
72 // AliQAv1::Instance(AliQAv1::GetDetIndex(GetName()))->IsEventSpecieSet(AliRecoParam::ConvertIndex(specie)));
74 // ====================================================================
75 // Checks for p-p events
76 // ====================================================================
77 if(AliRecoParam::ConvertIndex(specie) == AliRecoParam::kLowMult){
78 if(list[specie]->GetEntries()==0){
79 AliWarning("\t The list to be checked is empty!"); // nothing to check
82 //AliDebug(AliQAv1::GetQADebugLevel(), Form("\n\tAliZDCQAChecker-> checking QA histograms for task %s\n\n",taskName));
83 TIter next(list[specie]);
87 Float_t res=0., percentageDiff=0.30;
88 Float_t meanZNA=0., meanZNC=0., meanZPA=0., meanZPC=0.;
89 Float_t pmCZNA=0., pmCZNC=0., pmCZPA=0., pmCZPC=0.;
90 Float_t pmQZNA=0., pmQZNC=0., pmQZPA=0., pmQZPC=0.;
91 Float_t sumADCZNA=0., sumADCZNC=0., sumADCZPA=0., sumADCZPC=0.;
92 Float_t adcCZNA=0., adcCZNC=0., adcCZPA=0., adcCZPC=0.;
93 Float_t adcQZNA=0., adcQZNC=0., adcQZPA=0., adcQZPC=0.;
96 while((hdata = dynamic_cast<TH1 *>(next()))){
98 // -------------------------------------------------------------------
99 if(index == AliQAv1::kSIM){
100 //AliDebug(AliQAv1::GetQADebugLevel(), Form("\tAliZDCQAChecker-> checking histo %s",hdata->GetName()));
103 if(!(strncmp(hdata->GetName(),"hHits",5))){
104 if(hdata->GetEntries()>0){
105 if(ihitHisto==0) meanZNC = hdata->GetMean();
106 else if(ihitHisto==1) meanZNA = hdata->GetMean();
107 else if(ihitHisto==2) meanZPC = hdata->GetMean();
108 else if(ihitHisto==3) meanZPA = hdata->GetMean();
109 else if(ihitHisto==4) pmQZNC = hdata->GetMean();
110 else if(ihitHisto==5) pmQZNA = hdata->GetMean();
111 else if(ihitHisto==6) pmQZPC = hdata->GetMean();
112 else if(ihitHisto==7) pmQZPA = hdata->GetMean();
113 else if(ihitHisto==8) pmCZNC = hdata->GetMean();
114 else if(ihitHisto==9) pmCZNA = hdata->GetMean();
115 else if(ihitHisto==10) pmCZPC = hdata->GetMean();
116 else if(ihitHisto==11) pmCZPA = hdata->GetMean();
119 // --- Check whether (sum PMQi - PMC)/PMC < percentageDiff
121 if(TMath::Abs(meanZNC)>1.e-10){
122 if((TMath::Abs(pmQZNC-pmCZNC)/pmCZNC)<percentageDiff)
129 if(TMath::Abs(meanZNA)>1.e-10){
130 if((TMath::Abs(pmQZNA-pmCZNA)/pmCZNA)<percentageDiff)
137 if(TMath::Abs(meanZPC)>1.e-10){
138 if((TMath::Abs(pmQZPC-pmCZPC)/pmCZPC)<percentageDiff)
145 if(TMath::Abs(meanZPA)>1.e-10){
146 if((TMath::Abs(pmQZPA-pmCZPA)/pmCZPA)<percentageDiff)
156 // Check DIGIT HIGH GAIN CHAIN histos
157 else if(!(strncmp(hdata->GetName(),"hDig",4))){
158 if(hdata->GetEntries()>0){
159 if(idigHisto==0) sumADCZNC = hdata->GetMean();
160 else if(idigHisto==1) sumADCZNA = hdata->GetMean();
161 else if(idigHisto==2) sumADCZPC = hdata->GetMean();
162 else if(idigHisto==3) sumADCZPA = hdata->GetMean();
163 else if(idigHisto==4) pmQZNC = hdata->GetMean();
164 else if(idigHisto==5) pmQZNA = hdata->GetMean();
165 else if(idigHisto==6) pmQZPC = hdata->GetMean();
166 else if(idigHisto==7) pmQZPA = hdata->GetMean();
167 else if(idigHisto==8) pmCZNC = hdata->GetMean();
168 else if(idigHisto==9) pmCZNA = hdata->GetMean();
169 else if(idigHisto==10) pmCZPC = hdata->GetMean();
170 else if(idigHisto==11) pmCZPA = hdata->GetMean();
173 // --- Check whether (sum PMQi - PMC)/PMC < percentageDiff
175 if(TMath::Abs(sumADCZNC)>1.e-10){
176 if((TMath::Abs(adcQZNC-adcCZNC)/adcCZNC)<percentageDiff)
183 if(TMath::Abs(sumADCZNA)>1.e-10){
184 if((TMath::Abs(adcQZNA-adcCZNA)/adcCZNA)<percentageDiff)
191 if(TMath::Abs(sumADCZPC)>1.e-10){
192 if((TMath::Abs(adcQZPC-adcCZPC)/adcCZPC)<percentageDiff)
199 if(TMath::Abs(sumADCZPA)>1.e-10){
200 if((TMath::Abs(adcQZPA-adcCZPA)/adcCZPA)<percentageDiff)
211 // -------------------------------------------------------------------
212 else if(index == AliQAv1::kRAW) {
214 // Check RAW HIGH GAIN CHAIN histos
218 Bool_t iDetPM = kTRUE;
220 if(irawHisto==20) nentries = Int_t (hdata->GetEntries());
223 for(int ibin=1; ibin<=hdata->GetNbinsX(); ibin++){
224 if((hdata->GetBinContent(ibin))>10.){
227 else if((hdata->GetBinContent(ibin))<10.){
229 if(ibin==1 || ibin==6 || ibin==11 || ibin==12 || ibin==13 || ibin==18){
238 if(nentries != -99) messages.Add(new TObjString(Form("#entries %d",nentries)));
239 else messages.Add(new TObjString("#entries not known"));
242 if(hdata->GetNbinsX() != 0) rv = resADC/hdata->GetNbinsX();
243 if(rv == 1.) messages.Add(new TObjString("ADCs are OK!"));
244 else if(iDetPM==kFALSE){
245 messages.Add(new TObjString("Problem with some ADC!"));
246 messages.Add(new TObjString("IF THIS IS A PHYSICS RUN"));
248 else if(iDetPM==kTRUE) messages.Add(new TObjString("Minor problem with ADCs"));
249 SetupHisto(messages, *hdata, rv);
251 else if(irawHisto==23){
252 // Reference values must be inserted in the order:
253 // ZNC, ZPC, ZNA, ZPA, ZEM1, ZEM2
254 // 2012 -> Reference values from RUN 177399
255 //Double_t refTDCs[6] = {-322.7,-321.4,-321.6,-321.7,-316.2,-315.4};
256 // 11/2012 -> QA threshold values x TDCs are read from configuration file
258 refTDCs[0] = fZDCQAThr_ZNCTDCRefThr;
259 refTDCs[1] = fZDCQAThr_ZPCTDCRefThr;
260 refTDCs[2] = fZDCQAThr_ZNATDCRefThr;
261 refTDCs[3] = fZDCQAThr_ZPATDCRefThr;
262 refTDCs[4] = fZDCQAThr_ZEM1TDCRefThr;
263 refTDCs[5] = fZDCQAThr_ZEM2TDCRefThr;
266 for(int ibin=1; ibin<=hdata->GetNbinsX(); ibin++){
267 if(TMath::Abs((hdata->GetBinContent(ibin))-refTDCs[ibin-1])<3.){
270 else if(TMath::Abs((hdata->GetBinContent(ibin))-refTDCs[ibin-1])<5.){
280 if(hdata->GetNbinsX() != 0) rv = resTDC/hdata->GetNbinsX();
281 if(rv == 1.) messages.Add(new TObjString("TDCs are OK!"));
282 else if(rv<1. && rv>0.75) messages.Add(new TObjString("Minor problem with TDCs"));
284 messages.Add(new TObjString("Serious problem in ZDC timing"));
285 messages.Add(new TObjString("IF THIS IS A PHYSICS RUN"));
287 SetupHisto(messages, *hdata, rv);
292 // -------------------------------------------------------------------
293 else if(index == AliQAv1::kREC) {
295 // Check REC HIGH GAIN CHAIN histos
296 if(hdata->GetEntries()>0){
297 if(irecHisto==0) meanZNC = hdata->GetMean();
298 else if(irecHisto==1) meanZNA = hdata->GetMean();
299 else if(irecHisto==2) meanZPC = hdata->GetMean();
300 else if(irecHisto==3) meanZPA = hdata->GetMean();
301 else if(irecHisto==4) pmQZNC = hdata->GetMean();
302 else if(irecHisto==5) pmQZNA = hdata->GetMean();
303 else if(irecHisto==6) pmQZPC = hdata->GetMean();
304 else if(irecHisto==7) pmQZPA = hdata->GetMean();
305 else if(irecHisto==8) pmCZNC = hdata->GetMean();
306 else if(irecHisto==9) pmCZNA = hdata->GetMean();
307 else if(irecHisto==10) pmCZPC = hdata->GetMean();
308 else if(irecHisto==11) pmCZPA = hdata->GetMean();
311 // --- Check whether (sum PMQi - PMC)/PMC < percentageDiff
313 if(TMath::Abs(meanZNC)>1.e-10){
314 if((TMath::Abs(pmQZNC-pmCZNC)/pmCZNC)<percentageDiff)
321 if(TMath::Abs(meanZNA)>1.e-10){
322 if((TMath::Abs(pmQZNA-pmCZNA)/pmCZNA)<percentageDiff)
329 if(TMath::Abs(meanZPC)>1.e-10){
330 if((TMath::Abs(pmQZPC-pmCZPC)/pmCZPC)<percentageDiff)
337 if(TMath::Abs(meanZPA)>1.e-10){
338 if((TMath::Abs(pmQZPA-pmCZPA)/pmCZPA)<percentageDiff)
348 // -------------------------------------------------------------------
349 else if(index == AliQAv1::kESD) {
351 // Check ESD HIGH GAIN CHAIN histos
352 if(hdata->GetEntries()>0){
353 if(esdInd==0) sumADCZNC = hdata->GetMean();
354 else if(esdInd==1) sumADCZNA = hdata->GetMean();
355 else if(esdInd==2) sumADCZPC = hdata->GetMean();
356 else if(esdInd==3) sumADCZPA = hdata->GetMean();
357 else if(esdInd==6) pmQZNC = hdata->GetMean();
358 else if(esdInd==7) pmQZNA = hdata->GetMean();
359 else if(esdInd==8) pmQZPC = hdata->GetMean();
360 else if(esdInd==9) pmQZPA = hdata->GetMean();
361 else if(esdInd==10) pmCZNC = hdata->GetMean();
362 else if(esdInd==11) pmCZNA = hdata->GetMean();
363 else if(esdInd==12) pmCZPC = hdata->GetMean();
364 else if(esdInd==13) pmCZPA = hdata->GetMean();
367 // --- Check whether (sum PMQi - PMC)/PMC < percentageDiff
369 if(TMath::Abs(sumADCZNC)>1.e-10){
370 if((TMath::Abs(pmQZNC-pmCZNC)/pmCZNC)<percentageDiff)
377 if(TMath::Abs(sumADCZNA)>1.e-10){
378 if((TMath::Abs(pmQZNA-pmCZNA)/pmCZNA)<percentageDiff)
385 if(TMath::Abs(sumADCZPC)>1.e-10){
386 if((TMath::Abs(pmQZPC-pmCZPC)/pmCZPC)<percentageDiff)
393 if(TMath::Abs(sumADCZPA)>1.e-10){
394 if((TMath::Abs(pmQZPA-pmCZPA)/pmCZPA)<percentageDiff)
405 AliWarning(Form("\n\t No ZDC QA for %s task\n",taskName));
409 else AliError("AliZDCQAChecker-> No histos!!!\n");
412 // ====================================================================
413 // Checks for A-A events
414 // ====================================================================
415 if (AliRecoParam::ConvertIndex(specie) == AliRecoParam::kHighMult) {
416 if(list[specie]->GetEntries()==0){
417 AliWarning("\t The list to be checked is empty!");
420 //AliDebug(AliQAv1::GetQADebugLevel(), Form("\n\tAliZDCQAChecker-> checking QA histograms for task %s\n\n",taskName));
422 TIter next(list[specie]);
426 Float_t res=0., percentageDiff=0.10;
427 Float_t meanZNA=0., meanZNC=0., meanZPA=0., meanZPC=0.;
428 Float_t pmCZNA=0., pmCZNC=0., pmCZPA=0., pmCZPC=0.;
429 Float_t pmQZNA=0., pmQZNC=0., pmQZPA=0., pmQZPC=0.;
430 Float_t sumADCZNA=0., sumADCZNC=0., sumADCZPA=0., sumADCZPC=0.;
431 Float_t adcCZNA=0., adcCZNC=0., adcCZPA=0., adcCZPC=0.;
432 Float_t adcQZNA=0., adcQZNC=0., adcQZPA=0., adcQZPC=0.;
435 while((hdata = dynamic_cast<TH1 *>(next()))){
437 //AliDebug(AliQAv1::GetQADebugLevel(), Form("\tAliZDCQAChecker-> checking histo %s",hdata->GetName()));
438 // -------------------------------------------------------------------
439 if(index == AliQAv1::kSIM){
441 if (!(strncmp(hdata->GetName(),"hHits",5))){
442 if(hdata->GetEntries()>0){
443 if(ihitHisto==0) meanZNC = hdata->GetMean();
444 else if(ihitHisto==1) meanZNA = hdata->GetMean();
445 else if(ihitHisto==2) meanZPC = hdata->GetMean();
446 else if(ihitHisto==3) meanZPA = hdata->GetMean();
447 else if(ihitHisto==4) pmQZNC = hdata->GetMean();
448 else if(ihitHisto==5) pmQZNA = hdata->GetMean();
449 else if(ihitHisto==6) pmQZPC = hdata->GetMean();
450 else if(ihitHisto==7) pmQZPA = hdata->GetMean();
451 else if(ihitHisto==8) pmCZNC = hdata->GetMean();
452 else if(ihitHisto==9) pmCZNA = hdata->GetMean();
453 else if(ihitHisto==10) pmCZPC = hdata->GetMean();
454 else if(ihitHisto==11) pmCZPA = hdata->GetMean();
457 // --- Check whether 2*|Mean ZNA - Mean ZNC|/(Mean ZNA + Mean ZNC) < percentageDiff
458 // --- and 2*|Mean ZPA - Mean ZPC|/(Mean ZPA + Mean ZPC) < 2*percentageDiff
460 if(TMath::Abs(meanZNC)>1.e-10 && TMath::Abs(meanZNA)>1.e-10){
461 if((2*TMath::Abs(meanZNC-meanZNA)/(meanZNA+meanZNC))<percentageDiff)
468 if(TMath::Abs(meanZPC)>1.e-10 && TMath::Abs(meanZPA)>1.e-10){
469 if((TMath::Abs(meanZPC-meanZPA)/(meanZPA+meanZPC))<percentageDiff)
477 // --- Check whether (mean PMQi - PMC)/PMC < percentageDiff
479 if(TMath::Abs(meanZNC)>1.e-10){
480 if((TMath::Abs(pmQZNC-pmCZNC)/pmCZNC)<percentageDiff)
487 if(TMath::Abs(meanZNA)>1.e-10){
488 if((TMath::Abs(pmQZNA-pmCZNA)/pmCZNA)<percentageDiff)
495 if(TMath::Abs(meanZPC)>1.e-10){
496 if((TMath::Abs(pmQZPC-pmCZPC)/pmCZPC)<percentageDiff)
503 if(TMath::Abs(meanZPA)>1.e-10){
504 if((TMath::Abs(pmQZPA-pmCZPA)/pmCZPA)<percentageDiff)
514 // Check DIGITS histos
515 else if (!(strncmp(hdata->GetName(),"hDig",4))){
516 if(hdata->GetEntries()>0){
517 if(idigHisto==0) sumADCZNC = hdata->GetMean();
518 else if(idigHisto==1) sumADCZNA = hdata->GetMean();
519 else if(idigHisto==2) sumADCZPC = hdata->GetMean();
520 else if(idigHisto==3) sumADCZPA = hdata->GetMean();
521 else if(idigHisto==4) adcQZNC = hdata->GetMean();
522 else if(idigHisto==5) adcQZNA = hdata->GetMean();
523 else if(idigHisto==6) adcQZPC = hdata->GetMean();
524 else if(idigHisto==7) adcQZPA = hdata->GetMean();
525 else if(idigHisto==8) adcCZNC = hdata->GetMean();
526 else if(idigHisto==9) adcCZNA = hdata->GetMean();
527 else if(idigHisto==10) adcCZPC = hdata->GetMean();
528 else if(idigHisto==11) adcCZPA = hdata->GetMean();
531 // --- Check whether 2*|Mean ZNA - Mean ZNC|/(Mean ZNA + Mean ZNC) < percentageDiff
532 // --- and 2*|Mean ZPA - Mean ZPC|/(Mean ZPA + Mean ZPC) < 2*percentageDiff
534 if(TMath::Abs(sumADCZNC)>1.e-10 && TMath::Abs(sumADCZNA)>1.e-10){
535 if((2*TMath::Abs(sumADCZNC-sumADCZNA)/(sumADCZNA+sumADCZNC))<percentageDiff)
542 if(TMath::Abs(sumADCZPC)>1.e-10 && TMath::Abs(sumADCZPA)>1.e-10){
543 if((TMath::Abs(sumADCZPC-sumADCZPA)/(sumADCZPA+sumADCZPC))<percentageDiff)
551 // --- Check whether (sumADC PMQi - PMC)/PMC < percentageDiff
553 if(TMath::Abs(sumADCZNC)>1.e-10){
554 if((TMath::Abs(adcQZNC-adcCZNC)/adcCZNC)<percentageDiff)
561 if(TMath::Abs(sumADCZNA)>1.e-10){
562 if((TMath::Abs(adcQZNA-adcCZNA)/adcCZNA)<percentageDiff)
569 if(TMath::Abs(sumADCZPC)>1.e-10){
570 if((TMath::Abs(adcQZPC-adcCZPC)/adcCZPC)<percentageDiff)
577 if(TMath::Abs(sumADCZPA)>1.e-10){
578 if((TMath::Abs(adcQZPA-adcCZPA)/adcCZPA)<percentageDiff)
589 // -------------------------------------------------------------------
590 else if(index == AliQAv1::kRAW){
592 // Check RAW HIGH GAIN CHAIN histos
596 Bool_t iDetPM = kTRUE;
598 if(irawHisto==20) nentries = Int_t (hdata->GetEntries());
601 for(int ibin=1; ibin<=hdata->GetNbinsX(); ibin++){
602 if((hdata->GetBinContent(ibin))>10.){
605 else if((hdata->GetBinContent(ibin))<10. &&
606 (ibin==1 || ibin==6 || ibin==11 || ibin==12 || ibin==13 || ibin==18)){
615 if(nentries != -99) messages.Add(new TObjString(Form("#entries %d",nentries)));
616 else messages.Add(new TObjString("#entries not known"));
619 if(hdata->GetNbinsX() != 0) rv = resADC/hdata->GetNbinsX();
620 if(rv > 0.98) messages.Add(new TObjString("ADCs are OK!"));
621 else if(iDetPM==kFALSE){
622 messages.Add(new TObjString("Problem with ADCs!"));
623 messages.Add(new TObjString("IF THIS IS A PHYSICS RUN"));
625 else if(iDetPM==kTRUE) messages.Add(new TObjString("Minor problem with ADCs"));
626 SetupHisto(messages, *hdata, rv);
628 else if(irawHisto==23){
629 // Reference values from RUN 137161
630 //Double_t refTDCs[6] = {-320.7,-319.0,-318.6,-319.9,-321.3,-320.8};
631 // 11/2012 -> QA threshold values x TDCs are read from configuration file
633 refTDCs[0] = fZDCQAThr_ZNCTDCRefThr;
634 refTDCs[1] = fZDCQAThr_ZPCTDCRefThr;
635 refTDCs[2] = fZDCQAThr_ZNATDCRefThr;
636 refTDCs[3] = fZDCQAThr_ZPATDCRefThr;
637 refTDCs[4] = fZDCQAThr_ZEM1TDCRefThr;
638 refTDCs[5] = fZDCQAThr_ZEM2TDCRefThr;
641 for(int ibin=1; ibin<=hdata->GetNbinsX(); ibin++){
642 if(TMath::Abs((hdata->GetBinContent(ibin))-refTDCs[ibin-1])<3.){
645 else if(TMath::Abs((hdata->GetBinContent(ibin))-refTDCs[ibin-1])<4.){
655 if(hdata->GetNbinsX() != 0) rv = resTDC/hdata->GetNbinsX();
656 if(rv == 1.) messages.Add(new TObjString("TDCs are OK!"));
657 else if(rv<1 && rv>0.75) messages.Add(new TObjString("Minor problem with TDCs"));
659 messages.Add(new TObjString("Serious problem in ZDC timing"));
660 messages.Add(new TObjString("IF THIS IS A PHYSICS RUN"));
662 SetupHisto(messages, *hdata, rv);
667 // -------------------------------------------------------------------
668 else if(index == AliQAv1::kREC){
670 // Check RAW HIGH GAIN CHAIN histos
671 if(hdata->GetEntries()>0){
672 if(irecHisto==0) meanZNC = hdata->GetMean();
673 else if(irecHisto==1) meanZNA = hdata->GetMean();
674 else if(irecHisto==2) meanZPC = hdata->GetMean();
675 else if(irecHisto==3) meanZPA = hdata->GetMean();
676 else if(irecHisto==4) pmQZNC = hdata->GetMean();
677 else if(irecHisto==5) pmQZNA = hdata->GetMean();
678 else if(irecHisto==6) pmQZPC = hdata->GetMean();
679 else if(irecHisto==7) pmQZPA = hdata->GetMean();
680 else if(irecHisto==8) pmCZNC = hdata->GetMean();
681 else if(irecHisto==9) pmCZNA = hdata->GetMean();
682 else if(irecHisto==10) pmCZPC = hdata->GetMean();
683 else if(irecHisto==11) pmCZPA = hdata->GetMean();
686 // --- Check whether 2*|Mean ZNA - Mean ZNC|/(Mean ZNA + Mean ZNC) < percentageDiff
687 // --- and 2*|Mean ZPA - Mean ZPC|/(Mean ZPA + Mean ZPC) < 2*percentageDiff
689 if(TMath::Abs(meanZNC)>1.e-10 && TMath::Abs(meanZNA)>1.e-10){
690 if((2*TMath::Abs(meanZNC-meanZNA)/(meanZNA+meanZNC))<percentageDiff)
697 if(TMath::Abs(meanZPC)>1.e-10 && TMath::Abs(meanZPA)>1.e-10){
698 if((TMath::Abs(meanZPC-meanZPA)/(meanZPA+meanZPC))<percentageDiff)
706 // --- Check whether (sum PMQi - PMC)/PMC < percentageDiff
708 if((TMath::Abs(meanZNC)>1.e-10) && (pmCZNC>1.e-10)){
709 if((TMath::Abs(pmQZNC-pmCZNC)/pmCZNC)<percentageDiff)
716 if((TMath::Abs(meanZNA)>1.e-10) && (pmCZNA>1.e-10)){
717 if((TMath::Abs(pmQZNA-pmCZNA)/pmCZNA)<percentageDiff)
724 if((TMath::Abs(meanZPC)>1.e-10) && (pmCZPC>1.e-10)){
725 if((TMath::Abs(pmQZPC-pmCZPC)/pmCZPC)<percentageDiff)
732 if((TMath::Abs(meanZPA)>1.e-10) && (pmCZPA>1.e-10)){
733 if((TMath::Abs(pmQZPA-pmCZPA)/pmCZPA)<percentageDiff)
743 // -------------------------------------------------------------------
744 else if(index == AliQAv1::kESD){
746 // Check ESD HIGH GAIN CHAIN histos
747 if(hdata->GetEntries()>0){
748 if(esdInd==0) sumADCZNC = hdata->GetMean();
749 else if(esdInd==1) sumADCZNA = hdata->GetMean();
750 else if(esdInd==2) sumADCZPC = hdata->GetMean();
751 else if(esdInd==3) sumADCZPA = hdata->GetMean();
752 else if(esdInd==6) pmQZNC = hdata->GetMean();
753 else if(esdInd==7) pmQZNA = hdata->GetMean();
754 else if(esdInd==8) pmQZPC = hdata->GetMean();
755 else if(esdInd==9) pmQZPA = hdata->GetMean();
756 else if(esdInd==10) pmCZNC = hdata->GetMean();
757 else if(esdInd==11) pmCZNA = hdata->GetMean();
758 else if(esdInd==12) pmCZPC = hdata->GetMean();
759 else if(esdInd==13) pmCZPA = hdata->GetMean();
762 // --- Check whether 2*|Mean ZNA - Mean ZNC|/(Mean ZNA + Mean ZNC) < percentageDiff
763 // --- and 2*|Mean ZPA - Mean ZPC|/(Mean ZPA + Mean ZPC) < 2*percentageDiff
765 if(TMath::Abs(sumADCZNC)>1.e-10 && TMath::Abs(sumADCZNA)>1.e-10){
766 if((2*TMath::Abs(sumADCZNC-sumADCZNA)/(sumADCZNA+sumADCZNC))<percentageDiff)
773 if(TMath::Abs(sumADCZPC)>1.e-10 && TMath::Abs(sumADCZPA)>1.e-10){
774 if((TMath::Abs(sumADCZPC-sumADCZPA)/(sumADCZPA+sumADCZPC))<percentageDiff)
782 // --- Check whether (sum PMQi - PMC)/PMC < percentageDiff
784 if(TMath::Abs(sumADCZNC)>1.e-10){
785 if((TMath::Abs(pmQZNC-pmCZNC)/pmCZNC)<percentageDiff)
792 if(TMath::Abs(sumADCZNA)>1.e-10){
793 if((TMath::Abs(pmQZNA-pmCZNA)/pmCZNA)<percentageDiff)
800 /* if(TMath::Abs(sumADCZPC)>1.e-10){
801 if((TMath::Abs(pmQZPC-pmCZPC)/pmCZPC)<percentageDiff)
808 if(TMath::Abs(sumADCZPA)>1.e-10){
809 if((TMath::Abs(pmQZPA-pmCZPA)/pmCZPA)<percentageDiff)
821 AliWarning(Form("\n\t No ZDC QA for %s task\n",taskName));
825 else AliError("\t No histos found for ZDC!!!\n");
827 } // HighMult (Pb-Pb)
828 // ====================================================================
829 // Checks for Calibration events
830 // ====================================================================
831 if (AliRecoParam::ConvertIndex(specie) == AliRecoParam::kCalib) {
832 AliWarning(Form("\n\t No check implemented in ZDC QA for %s task in CALIBRATION events\n",taskName));
835 // ====================================================================
836 // Checks for cosmic events
837 // ====================================================================
838 else if (AliRecoParam::ConvertIndex(specie) == AliRecoParam::kCosmic) {
839 AliWarning(Form("\n\t No check needed in ZDC QA for %s task in COSMIC events\n",taskName));
842 if(TMath::Abs(count)>1.e-10) test[specie] = test[specie]/count;
843 AliDebug(AliQAv1::GetQADebugLevel(), Form("\n\t ZDC QA check result = %1.2f\n",test[specie]));
847 //___________________________________________________________________
848 void AliZDCQAChecker::SetupHisto(const TObjArray& messages, TH1& histo, Float_t& code)
851 /// Add text to histos
854 TPaveText* text = new TPaveText(0.70,0.70,0.99,0.99,"NDC");
856 TIter next(&messages);
859 while ( ( str = static_cast<TObjString*>(next()) ) ){
860 text->AddText(str->String());
863 TString defaultText = "";
868 defaultText = "Everything is fine!";
870 else if(code<1. && code>=0.85){
872 defaultText = "To be monitored in next runs";
874 else if(code<0.85 && code>=0.6){
876 defaultText = "notify the expert DURING THE DAY!";
880 defaultText = "PLEASE CALL THE EXPERT!!!!";
884 text->AddText(defaultText.Data());
885 text->SetFillColor(color);
887 //histo.SetFillStyle(1001);
888 //histo.SetFillColor(color);
890 histo.SetStats(kFALSE);
892 TList* lst = histo.GetListOfFunctions();
894 printf(" No list found\n");
897 TObject *stats = lst->FindObject("stats");
900 while ((obj = lst->First())) {
901 while(lst->Remove(obj)) { }
904 if(stats) lst->Add(stats);
909 //______________________________________________________________
910 void AliZDCQAChecker::GetThresholds()
913 // Init the online thresholds from GRP generated by AMORE
915 AliCDBManager* man = AliCDBManager::Instance();
917 AliWarning("No CDB -> ZDC TDC thresholds not read from OCDB");
921 AliCDBEntry* entry = man->Get("GRP/Calib/QAThresholds");
923 AliWarning("No ZDC TDC thresholds object");
927 TObjArray* obj = (TObjArray*) entry->GetObject();
929 AliWarning("No object inside OCDB entry GRP/Calib/QAThresholds");
933 AliQAThresholds* thresholds = (AliQAThresholds*) obj->FindObject("ZDC");
935 AliWarning("No object for ZDC thresholds inside OCDB object");
939 TParameter<double>* myParam0 = (TParameter<double>*) thresholds->GetThreshold(0);
940 fZDCQAThr_ZNCTDCRefThr = myParam0->GetVal();
942 TParameter<double>* myParam1 = (TParameter<double>*) thresholds->GetThreshold(1);
943 fZDCQAThr_ZPCTDCRefThr = myParam1->GetVal();
945 TParameter<double>* myParam2 = (TParameter<double>*) thresholds->GetThreshold(2);
946 fZDCQAThr_ZNATDCRefThr = myParam2->GetVal();
948 TParameter<double>* myParam3 = (TParameter<double>*) thresholds->GetThreshold(3);
949 fZDCQAThr_ZPATDCRefThr = myParam3->GetVal();
951 TParameter<double>* myParam4 = (TParameter<double>*) thresholds->GetThreshold(4);
952 fZDCQAThr_ZEM1TDCRefThr = myParam4->GetVal();
954 TParameter<double>* myParam5 = (TParameter<double>*) thresholds->GetThreshold(5);
955 fZDCQAThr_ZEM2TDCRefThr = myParam5->GetVal();
960 //_______________________________________________________________________________
961 void AliZDCQAChecker::PrintThresholds()
963 printf("\n #### ZDC QA Thresholds read from configuration file: \n");
964 printf(" \t fZDCQAThr_ZNCTDCRefThr %f \n",fZDCQAThr_ZNCTDCRefThr);
965 printf(" \t fZDCQAThr_ZPCTDCRefThr %f \n",fZDCQAThr_ZPCTDCRefThr);
966 printf(" \t fZDCQAThr_ZNATDCRefThr %f \n",fZDCQAThr_ZNATDCRefThr);
967 printf(" \t fZDCQAThr_ZPATDCRefThr %f \n",fZDCQAThr_ZPATDCRefThr);
968 printf(" \t fZDCQAThr_ZEM1TDCRefThr %f \n",fZDCQAThr_ZEM1TDCRefThr);
969 printf(" \t fZDCQAThr_ZEM2TDCRefThr %f \n\n",fZDCQAThr_ZEM2TDCRefThr);