]> git.uio.no Git - u/mrichter/AliRoot.git/blob - STEER/AliQA.cxx
Bug fix in proof mode when using folders.
[u/mrichter/AliRoot.git] / STEER / AliQA.cxx
1
2 /**************************************************************************
3  * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
4  *                                                                        *
5  * Author: The ALICE Off-line Project.                                    *
6  * Contributors are mentioned in the code where appropriate.              *
7  *                                                                        *
8  * Permission to use, copy, modify and distribute this software and its   *
9  * documentation strictly for non-commercial purposes is hereby granted   *
10  * without fee, provided that the above copyright notice appears in all   *
11  * copies and that both the copyright notice and this permission notice   *
12  * appear in the supporting documentation. The authors make no claims     *
13  * about the suitability of this software for any purpose. It is          *
14  * provided "as is" without express or implied warranty.                  *
15  **************************************************************************/
16 /* $Id$ */
17
18 //////////////////////////////////////////////////////////////////////////////
19 //
20 // Quality Assurance Object//_________________________________________________________________________
21 // Quality Assurance object. The QA status is held in one word per detector,
22 // each bit corresponds to a different status.
23 // bit 0-3   : QA raised during simulation      (RAW)
24 // bit 4-7   : QA raised during simulation      (SIM)
25 // bit 8-11  : QA raised during reconstruction  (REC)
26 // bit 12-15 : QA raised during ESD checking    (ESD)
27 // bit 16-19 : QA raised during analysis        (ANA)
28 // Each of the 4 bits corresponds to a severity level of increasing importance
29 // from lower to higher bit (INFO, WARNING, ERROR, FATAL)
30 //
31 //*-- Yves Schutz CERN, July 2007 
32 //////////////////////////////////////////////////////////////////////////////
33
34
35 #include <cstdlib>
36 // --- ROOT system ---
37 #include <TClass.h>
38 #include <TFile.h>
39 #include <TSystem.h>
40 #include <TROOT.h>
41
42 // --- Standard library ---
43
44 // --- AliRoot header files ---
45 #include "AliLog.h"
46 #include "AliQA.h"
47
48
49 ClassImp(AliQA)
50 AliQA    * AliQA::fgQA                   = 0x0 ;
51 TFile    * AliQA::fgQADataFile           = 0x0 ;   
52 TString    AliQA::fgQADataFileName       = "QA" ;  // will transform into Det.QA.run.cycle.root  
53 TFile    * AliQA::fgQARefFile            = 0x0 ;   
54 TString    AliQA::fgQARefDirName               = "" ; 
55 TString    AliQA::fgQARefFileName        = "QA.root" ;
56 TFile    * AliQA::fgQAResultFile         = 0x0 ;  
57 TString    AliQA::fgQAResultDirName      = "" ;  
58 TString    AliQA::fgQAResultFileName     = "QA.root" ; 
59 TString    AliQA::fgDetNames[]           = {"ITS", "TPC", "TRD", "TOF", "PHOS", "HMPID", "EMCAL", "MUON", "FMD",
60                                             "ZDC", "PMD", "T0", "VZERO", "ACORDE", "HLT", "Global", "CORR"} ;   
61 TString    AliQA::fgGRPPath              = "GRP/GRP/Data" ; 
62 TString    AliQA::fgRTNames[]            = {"UNKNOWN", "AUTO_TEST", "CALIBRATION", "CALIBRATION_PULSER", "CHANNEL_DELAY_TUNING", "COSMIC", 
63                                                                                                                                                                                 "COSMICS", "DAQ_FO_UNIF_SCAN", "DAQ_GEN_DAC_SCAN", "DAQ_MEAN_TH_SCAN", "DAQ_MIN_TH_SCAN", 
64                                                                                                                                                                                 "DAQ_NOISY_PIX_SCAN", "DAQ_PIX_DELAY_SCAN", "DAQ_UNIFORMITY_SCAN", "DCS_FO_UNIF_SCAN", 
65                                                                                                                                                                                 "DCS_MEAN_TH_SCAN", "DCS_MIN_TH_SCAN", "DCS_PIX_DELAY_SCAN", "DCS_UNIFORMITY_SCAN", 
66                                                                                                                                                                                 "DDL_TEST", "GAIN", "PEDESTAL", "INJECTOR",  "LASER", "MONTECARLO", "NOISE", "NOISY_PIX_SCAN", 
67                                                                                                                                                                                 "PHYSICS", "PULSER", "STANDALONE", "STANDALONE_BC", "STANDALONE_CENTRAL", "STANDALONE_COSMIC", 
68                                                                                                                                                                                 "STANDALONE_EMD", "STANDALONE_LASER", "STANDALONE_MB", "STANDALONE_PEDESTAL", 
69                                                                                                                                                                                 "STANDALONE_SEMICENTRAL", "STANDALONE_PULSER" } ;   
70 TString       AliQA::fgTaskNames[]       = {"Raws", "Hits", "SDigits", "Digits", "RecPoints", "TrackSegments", "RecParticles", "ESDs"} ;   
71 const TString AliQA::fgkLabLocalFile     = "file://"  ; 
72 const TString AliQA::fgkLabLocalOCDB     = "local://" ;  
73 const TString AliQA::fgkLabAliEnOCDB     = "alien://" ;  
74 const TString AliQA::fgkRefFileName      = "QA.root" ; 
75 const TString AliQA::fgkQAName           = "QA"  ; 
76 const TString AliQA::fgkQACorrNtName     = "CorrQA" ;  
77 const TString AliQA::fgkRefOCDBDirName   = "Ref"  ; 
78 TString AliQA::fgkRefDataDirName               = ""  ; 
79 const TString AliQA::fgkQARefOCDBDefault = "alien://folder=/alice/QA/20"  ; 
80 const TString AliQA::fgkExpert           = "Expert" ; 
81 const UInt_t  AliQA::fgkExpertBit        = 16 ; 
82 const UInt_t  AliQA::fgkQABit            = 17 ; 
83
84 //____________________________________________________________________________
85 AliQA::AliQA() : 
86   TNamed("", ""), 
87   fNdet(kNDET), 
88   fQA(new ULong_t[fNdet]), 
89   fDet(kNULLDET),
90   fTask(kNULLTASK)
91         
92 {
93   // default constructor
94   // beware singleton: not to be used
95   
96   for (Int_t index = 0 ; index < fNdet ; index++) 
97         fQA[index] = 0 ; 
98 }
99
100 //____________________________________________________________________________
101 AliQA::AliQA(const AliQA& qa) :
102   TNamed(qa),
103   fNdet(qa.fNdet), 
104   fQA(qa.fQA), 
105   fDet(qa.fDet),
106   fTask(qa.fTask)
107
108   // cpy ctor
109 }
110
111 //_____________________________________________________________________________
112 AliQA& AliQA::operator = (const AliQA& qa)
113 {
114 // assignment operator
115
116   this->~AliQA();
117   new(this) AliQA(qa);
118   return *this;
119 }
120
121 //_______________________________________________________________
122 AliQA::AliQA(const DETECTORINDEX_t det) :
123   TNamed("QA", "Quality Assurance status"),
124   fNdet(kNDET),  
125   fQA(new ULong_t[fNdet]), 
126   fDet(det),
127   fTask(kNULLTASK) 
128 {
129   // constructor to be used
130   if (! CheckRange(det) ) {
131     fDet = kNULLDET ; 
132     return ;
133   } 
134   Int_t index ; 
135   for (index = 0; index < fNdet; index++) 
136     fQA[index] = 0 ; 
137 }
138   
139 //_______________________________________________________________
140 AliQA::AliQA(const ALITASK_t tsk) :
141   TNamed("QA", "Quality Assurance status"), 
142   fNdet(kNDET),
143   fQA(new ULong_t[fNdet]), 
144   fDet(kNULLDET),
145   fTask(tsk)
146 {
147   // constructor to be used in the AliRoot module (SIM, REC, ESD or ANA)
148   if (! CheckRange(tsk) ) {
149     fTask = kNULLTASK ; 
150     return ;
151   } 
152   Int_t index ; 
153   for (index = 0; index < fNdet; index++) 
154     fQA[index] = 0 ; 
155 }
156
157 //____________________________________________________________________________
158 AliQA::~AliQA() 
159 {
160   // dtor  
161   delete[] fQA ;
162 }
163
164 //_______________________________________________________________
165 void AliQA::Close() 
166 {
167         // close the open files
168         if (fgQADataFile) 
169                 if (fgQADataFile->IsOpen())
170                         fgQADataFile->Close() ; 
171         if (fgQAResultFile) 
172                 if (fgQAResultFile->IsOpen()) 
173                         fgQAResultFile->Close() ;
174         if (fgQARefFile)
175                 if (fgQARefFile->IsOpen())
176                         fgQARefFile->Close() ; 
177
178
179 //_______________________________________________________________
180 Bool_t AliQA::CheckFatal() const
181 {
182   // check if any FATAL status is set
183   Bool_t rv = kFALSE ;
184   Int_t index ;
185   for (index = 0; index < kNDET ; index++)
186     rv = rv || IsSet(DETECTORINDEX_t(index), fTask, kFATAL) ;
187   return rv ;
188 }
189
190 //_______________________________________________________________
191 Bool_t AliQA::CheckRange(DETECTORINDEX_t det) const
192
193   // check if detector is in given detector range: 0-kNDET
194
195   Bool_t rv = ( det < 0 || det > kNDET )  ? kFALSE : kTRUE ;
196   if (!rv)
197     AliFatal(Form("Detector index %d is out of range: 0 <= index <= %d", det, kNDET)) ;
198   return rv ;
199 }
200
201 //_______________________________________________________________
202 Bool_t AliQA::CheckRange(ALITASK_t task) const
203
204   // check if task is given taskk range: 0:kNTASK
205   Bool_t rv = ( task < kRAW || task > kNTASK )  ? kFALSE : kTRUE ;
206   if (!rv)
207     AliFatal(Form("Module index %d is out of range: 0 <= index <= %d", task, kNTASK)) ;
208   return rv ;
209 }
210
211 //_______________________________________________________________
212 Bool_t AliQA::CheckRange(QABIT_t bit) const
213
214   // check if bit is in given bit range: 0-kNBit
215
216   Bool_t rv = ( bit < 0 || bit > kNBIT )  ? kFALSE : kTRUE ;
217   if (!rv)
218     AliFatal(Form("Status bit %d is out of range: 0 <= bit <= %d", bit, kNBIT)) ;
219   return rv ;
220 }
221
222
223
224 //_______________________________________________________________
225 char * AliQA::GetAliTaskName(ALITASK_t tsk)
226 {
227         // returns the char name corresponding to module index
228         TString tskName ;
229         switch (tsk) {
230                 case kNULLTASK:
231                         break ; 
232                 case kRAW:
233                         tskName = "RAW" ;
234                         break ;  
235                 case kSIM:
236                         tskName = "SIM" ;
237                         break ;
238                 case kREC:
239                         tskName = "REC" ;
240                         break ;
241                 case kESD:
242                         tskName = "ESD" ;
243                         break ;
244                 case kANA:
245                         tskName = "ANA" ;
246                         break ;
247                 default:
248                         tsk = kNULLTASK ; 
249                         break ;
250         }
251         return Form("%s", tskName.Data()) ;
252 }
253
254 //_______________________________________________________________
255 char * AliQA::GetBitName(QABIT_t bit) const
256 {
257         // returns the char name corresponding to bit 
258         TString bitName ;
259         switch (bit) {
260                 case kNULLBit:
261                         break ; 
262                 case kINFO:
263                         bitName = "INFO" ;
264                         break ;  
265                 case kWARNING:
266                         bitName = "WARNING" ;
267                         break ;
268                 case kERROR:
269                         bitName = "ERROR" ;
270                         break ;
271                 case kFATAL:
272                         bitName = "FATAL" ;
273                         break ;
274                 default:
275                         bit = kNULLBit ; 
276                         break ;
277         }
278         return Form("%s", bitName.Data()) ; 
279 }
280
281 //_______________________________________________________________
282 AliQA::DETECTORINDEX_t AliQA::GetDetIndex(const char * name) 
283 {
284         // returns the detector index corresponding to a given name
285         TString sname(name) ; 
286         DETECTORINDEX_t rv = kNULLDET ; 
287         for (Int_t det = 0; det < kNDET ; det++) {
288                 if ( GetDetName(det) == sname ) {
289                         rv = DETECTORINDEX_t(det) ; 
290                         break ; 
291                 }
292         }
293         return rv ;             
294 }
295
296 //_______________________________________________________________
297 const char * AliQA::GetDetName(Int_t det) 
298 {
299         // returns the detector name corresponding to a given index (needed in a loop)
300         
301         if ( det >= 0 &&  det < kNDET) 
302                 return (fgDetNames[det]).Data() ; 
303         else 
304                 return NULL ; 
305 }
306
307 //_______________________________________________________________
308 TFile * AliQA::GetQADataFile(const char * name, const Int_t run) 
309 {
310   // opens the file to store the detectors Quality Assurance Data Maker results
311         const char * temp = Form("%s.%s.%d.root", name, fgQADataFileName.Data(), run) ; 
312         TString opt ; 
313         if (! fgQADataFile ) {     
314                 if  (gSystem->AccessPathName(temp))
315                         opt = "NEW" ;
316                 else 
317                         opt = "UPDATE" ; 
318                 fgQADataFile = TFile::Open(temp, opt.Data()) ;
319         } else {
320                 if ( strcmp(temp, fgQADataFile->GetName()) != 0 ) {
321                         fgQADataFile = dynamic_cast<TFile *>(gROOT->FindObject(temp)) ; 
322                         if ( !fgQADataFile ) {
323                                 if  (gSystem->AccessPathName(temp))
324                                         opt = "NEW" ;
325                                 else 
326                                         opt = "UPDATE" ; 
327                                 fgQADataFile = TFile::Open(temp, opt.Data()) ;
328                         }
329                 }
330   }
331         return fgQADataFile ;
332
333
334 //_____________________________________________________________________________
335 TFile * AliQA::GetQADataFile(const char * fileName)
336 {
337   // Open if necessary the Data file and return its pointer
338
339   if (!fgQADataFile) 
340         if (!fileName) 
341                 fileName = AliQA::GetQADataFileName() ; 
342         if  (!gSystem->AccessPathName(fileName)) {
343                 fgQADataFile =  TFile::Open(fileName) ;
344         } else {
345                 AliFatalClass(Form("File %s not found", fileName)) ;
346         }
347   return fgQADataFile ; 
348 }
349
350 //_______________________________________________________________
351 TFile * AliQA::GetQAResultFile() 
352 {
353   // opens the file to store the  Quality Assurance Data Checker results
354         if (fgQAResultFile) 
355                 fgQAResultFile->Close() ; 
356         fgQAResultFile = 0x0 ; 
357 //      if (!fgQAResultFile) { 
358                 TString dirName(fgQAResultDirName) ; 
359                 if ( dirName.Contains(fgkLabLocalFile)) 
360                         dirName.ReplaceAll(fgkLabLocalFile, "") ;
361                 TString fileName(dirName + fgQAResultFileName) ; 
362                 TString opt("") ; 
363                 if ( !gSystem->AccessPathName(fileName) )
364                         opt = "UPDATE" ; 
365                 else { 
366                         if ( gSystem->AccessPathName(dirName) )
367                                 gSystem->mkdir(dirName) ; 
368                         opt = "NEW" ; 
369                 }
370                 fgQAResultFile = TFile::Open(fileName, opt) ;   
371 //      }
372         
373         return fgQAResultFile ;
374 }
375
376 //_______________________________________________________________
377 const TString AliQA::GetRunTypeName(RUNTYPE_t rt) 
378
379   // returns the name of a run type
380         TString rv("Invalid Run Type") ;        
381         if ( rt == kNULLTYPE ) {
382                 rv = "Known RUN_TYPE are: \n" ; 
383                 for (Int_t index = 0 ; index < kNTYPE; index++) {
384                         rv += Form("%2d -- %s\n", index, fgRTNames[index].Data()) ;  
385                 }
386                 AliErrorClass(Form("%s", rv.Data())) ; 
387                 return "" ; 
388         }
389         else {
390                 if ( rt > kNULLTYPE && rt < kNTYPE )
391                         rv = fgRTNames[rt] ; 
392         }
393         return rv ; 
394 }
395
396 //_______________________________________________________________
397 AliQA::TASKINDEX_t AliQA::GetTaskIndex(const char * name) 
398 {
399         // returns the detector index corresponding to a given name
400         TString sname(name) ; 
401         TASKINDEX_t rv = kNULLTASKINDEX ; 
402         for (Int_t tsk = 0; tsk < kNTASKINDEX ; tsk++) {
403                 if ( GetTaskName(tsk) == sname ) {
404                         rv = TASKINDEX_t(tsk) ; 
405                         break ; 
406                 }
407         }
408         return rv ;             
409 }
410
411 //_______________________________________________________________
412 Bool_t AliQA::IsSet(DETECTORINDEX_t det, ALITASK_t tsk, QABIT_t bit) const
413 {
414   // Checks is the requested bit is set
415         
416   CheckRange(det) ; 
417   CheckRange(tsk) ;
418   CheckRange(bit) ;
419         
420   ULong_t offset = Offset(tsk) ;
421   ULong_t status = GetStatus(det) ;
422   offset+= bit ;
423   status = (status & 1 << offset) != 0 ;
424   return status ;
425 }
426
427 //_______________________________________________________________
428 Bool_t AliQA::IsSetAny(DETECTORINDEX_t det, ALITASK_t tsk) const
429 {
430   // Checks is the requested bit is set
431         
432   CheckRange(det) ; 
433   CheckRange(tsk) ;
434         
435   ULong_t offset = Offset(tsk) ;
436   ULong_t status = GetStatus(det) ;
437         UShort_t st = 0 ; 
438         for ( Int_t bit = 0 ; bit < kNBIT ; bit++) {
439                 offset+= bit ;
440                 st += (status & 1 << offset) != 0 ;             
441         }
442         if ( st == 0 ) 
443                 return kFALSE ; 
444         else 
445                 return kTRUE ;
446 }
447 //_______________________________________________________________
448 Bool_t AliQA::IsSetAny(DETECTORINDEX_t det) const
449 {
450   // Checks is the requested bit is set
451         
452   CheckRange(det) ; 
453         
454         ULong_t status = GetStatus(det) ;
455         UShort_t st = 0 ; 
456         for ( Int_t tsk = 0 ; tsk < kNTASK ; tsk++) {
457                 ULong_t offset = Offset(ALITASK_t(tsk)) ;
458                 for ( Int_t bit = 0 ; bit < kNBIT ; bit++) {
459                         offset+= bit ;
460                         st += (status & 1 << offset) != 0 ;             
461                 }
462         }
463         if ( st == 0 ) 
464                 return kFALSE ; 
465         else 
466                 return kTRUE ;
467 }
468
469 //_______________________________________________________________
470 AliQA * AliQA::Instance()
471 {
472   // Get an instance of the singleton.
473   // Object must have been instantiated with Instance(ALITASK) first
474
475   return fgQA ;
476 }
477
478 //_______________________________________________________________
479 AliQA * AliQA::Instance(const DETECTORINDEX_t det)
480 {
481   // Get an instance of the singleton. The only authorized way to call the ctor
482   
483   if ( ! fgQA) {
484     TFile * f = GetQAResultFile() ; 
485         fgQA = dynamic_cast<AliQA *>(f->Get("QA")) ; 
486     if ( ! fgQA ) 
487                 fgQA = new AliQA(det) ;
488   }             
489   fgQA->Set(det) ;
490   return fgQA ;
491 }
492
493 //_______________________________________________________________
494 AliQA * AliQA::Instance(const ALITASK_t tsk)
495 {
496   // get an instance of the singleton.
497
498   if ( ! fgQA)
499     switch (tsk) {
500     case kNULLTASK:
501       break ;
502         case kRAW:
503       fgQA = new AliQA(tsk) ;
504       break ;
505         case kSIM:
506       fgQA = new AliQA(tsk) ;
507       break ;
508     case kREC:
509       AliInfoClass("fgQA = gAlice->GetQA()") ;
510       break ;
511     case kESD:
512       AliInfoClass("fgQA = dynamic_cast<AliQA *> (esdFile->Get(\"QA\")") ;
513       break ;
514     case kANA:
515       AliInfoClass("fgQA = dynamic_cast<AliQA *> (esdFile->Get(\"QA\")") ;
516       break ;
517     case kNTASK:
518       break ;
519     }
520   if (fgQA) 
521     fgQA->Set(tsk) ;
522   return fgQA ;
523 }
524
525 //_______________________________________________________________
526 AliQA *  AliQA::Instance(const TASKINDEX_t tsk) 
527 {
528         // get an instance of the singleton.
529         
530         ALITASK_t index = kNULLTASK ; 
531
532         if ( tsk == kRAWS )
533                 index = kRAW ;
534         else if (tsk < kDIGITS)
535                 index = kSIM ;
536         else if (tsk < kRECPARTICLES)
537                 index = kREC ; 
538         else if (tsk == kESDS) 
539                 index = kESD ; 
540
541         return Instance(index) ; 
542 }
543
544 //_______________________________________________________________
545 void AliQA::Merge(TCollection * list) {
546         // Merge the QA resuls in the list into this single AliQA object
547         
548         for (Int_t det = 0 ; det < kNDET ; det++) {
549                 Set(DETECTORINDEX_t(det)) ; 
550                 for (Int_t task = 0 ; task < kNTASK ; task++) {
551                         Set(ALITASK_t(task)) ; 
552                         for (Int_t bit = 0 ; bit < kNBIT ; bit++) {
553                                 TIter next(list) ;
554                                 AliQA * qa ; 
555                                 while ( (qa = (AliQA*)next() ) ) {
556                                         qa->IsSet(DETECTORINDEX_t(det), ALITASK_t(task), QABIT_t(bit)) ;
557                                         Set(QABIT_t(bit)) ; 
558                                 } // qa list
559                         } // bit
560                 } // task
561         } // detector
562 }
563
564 //_______________________________________________________________
565 ULong_t AliQA::Offset(ALITASK_t tsk) const
566 {
567   // Calculates the bit offset for a given module (SIM, REC, ESD, ANA)
568
569   CheckRange(tsk) ; 
570
571   ULong_t offset = 0 ;
572   switch (tsk) {
573   case kNULLTASK:
574     break ;
575   case kRAW:
576     offset+= 0 ;
577     break ;
578   case kSIM:
579     offset+= 4 ;
580     break ;
581   case kREC:
582     offset+= 8 ;
583     break ;
584   case kESD:
585     offset+= 12 ;
586     break ;
587   case kANA:
588     offset+= 16 ;
589     break ;
590   case kNTASK:
591     break ;
592   }
593
594   return offset ;
595 }
596
597 //_______________________________________________________________
598 void AliQA::Set(QABIT_t bit)
599 {
600   // Set the status bit of the current detector in the current module
601   
602   SetStatusBit(fDet, fTask, bit) ;
603 }
604
605 //_____________________________________________________________________________
606 void AliQA::SetQARefStorage(const char * name)
607 {
608         // Set the root directory where the QA reference data are stored
609
610         fgQARefDirName = name ; 
611         if ( fgQARefDirName.Contains(fgkLabLocalFile) )
612                 fgQARefFileName =  fgkRefFileName ; 
613         else if ( fgQARefDirName.Contains(fgkLabLocalOCDB) )
614                 fgQARefFileName =  fgkQAName ; 
615         else if ( fgQARefDirName.Contains(fgkLabAliEnOCDB) )
616                 fgQARefFileName =  fgkQAName ; 
617
618   else {
619           AliErrorClass(Form("%s is an invalid storage definition\n", name)) ; 
620           fgQARefDirName  = "" ; 
621           fgQARefFileName = "" ; 
622   }     
623         TString tmp(fgQARefDirName) ; // + fgQARefFileName) ;
624         AliInfoClass(Form("AliQA::SetQARefDir: QA references are in  %s\n", tmp.Data()) ) ;
625 }
626
627 //_____________________________________________________________________________
628 void AliQA::SetQARefDataDirName(const char * name) 
629 {
630   // Set the lower level directory name where reference data are found
631   TString test(name) ; 
632   RUNTYPE_t rt = kNULLTYPE ; 
633   for (Int_t index = 0; index < kNTYPE; index++) {
634     if (test.CompareTo(fgRTNames[index]) == 0) {
635       rt = (RUNTYPE_t) index ; 
636       break ; 
637     } 
638         }
639         
640         if (rt == kNULLTYPE) {
641       AliWarningClass(Form("AliQA::SetQARefDataDirName: %s is an unknown RUN TYPE name\n", name)) ; 
642       return ; 
643         }
644  
645         SetQARefDataDirName(rt) ; 
646 }
647
648 //_____________________________________________________________________________
649 void AliQA::SetQAResultDirName(const char * name)
650 {
651   // Set the root directory where to store the QA status object
652
653   fgQAResultDirName.Prepend(name) ; 
654   AliInfoClass(Form("AliQA::SetQAResultDirName: QA results are in  %s\n", fgQAResultDirName.Data())) ;
655   if ( fgQAResultDirName.Contains(fgkLabLocalFile)) 
656     fgQAResultDirName.ReplaceAll(fgkLabLocalFile, "") ;
657   fgQAResultFileName.Prepend(fgQAResultDirName) ;
658 }
659
660 //_______________________________________________________________
661 void AliQA::SetStatusBit(DETECTORINDEX_t det, ALITASK_t tsk, QABIT_t bit)
662 {
663  // Set the status bit for a given detector and a given task
664
665   CheckRange(det) ;
666   CheckRange(tsk) ;
667   CheckRange(bit) ;
668
669   ULong_t offset = Offset(tsk) ;
670   ULong_t status = GetStatus(det) ;
671   offset+= bit ;
672   status = status | 1 << offset ;
673   SetStatus(det, status) ;
674 }
675
676 //_______________________________________________________________
677 void AliQA::ShowAll() const
678 {
679   // dispplay the QA status word
680   Int_t index ;
681   for (index = 0 ; index < kNDET ; index++) {
682                 for (Int_t tsk = kRAW ; tsk < kNTASK ; tsk++) {
683                         ShowStatus(DETECTORINDEX_t(index), ALITASK_t(tsk)) ;
684                 }
685         }
686 }
687
688 //_______________________________________________________________
689 void AliQA::ShowStatus(DETECTORINDEX_t det, ALITASK_t tsk) const
690 {
691         // Prints the full QA status of a given detector
692         CheckRange(det) ;
693         ULong_t status = GetStatus(det) ;
694         ULong_t tskStatus[kNTASK] ; 
695         tskStatus[kRAW] = status & 0x0000f ;
696         tskStatus[kSIM] = status & 0x000f0 ;
697         tskStatus[kREC] = status & 0x00f00 ;
698         tskStatus[kESD] = status & 0x0f000 ;
699         tskStatus[kANA] = status & 0xf0000 ;
700
701         AliInfo(Form("====> QA Status for %8s raw =0x%x, sim=0x%x, rec=0x%x, esd=0x%x, ana=0x%x", GetDetName(det).Data(), 
702                                  tskStatus[kRAW], tskStatus[kSIM], tskStatus[kREC], tskStatus[kESD], tskStatus[kANA] )) ;
703         if (tsk == kNULLTASK) {
704                 for (Int_t itsk = kRAW ; itsk < kNTASK ; itsk++) {
705                         ShowASCIIStatus(det, ALITASK_t(itsk), tskStatus[itsk]) ; 
706                 } 
707         } else {
708                         ShowASCIIStatus(det, tsk, tskStatus[tsk]) ; 
709         }
710 }
711
712 //_______________________________________________________________
713 void AliQA::ShowASCIIStatus(DETECTORINDEX_t det, ALITASK_t tsk, const ULong_t status) const 
714 {
715         // print the QA status in human readable format
716         TString text; 
717         for (Int_t bit = kINFO ; bit < kNBIT ; bit++) {
718                 if (IsSet(det, tsk, QABIT_t(bit))) {
719                         text = GetBitName(QABIT_t(bit)) ; 
720                         text += " " ; 
721                 }
722         }
723         if (! text.IsNull())
724                 AliWarningClass(Form("           %8s %4s 0x%4lx, Problem signalled: %8s \n", GetDetName(det).Data(), GetAliTaskName(tsk), status, text.Data())) ; 
725 }
726
727 //_______________________________________________________________
728 void AliQA::UnSet(QABIT_t bit)
729 {
730         // UnSet the status bit of the current detector in the current module
731         
732         UnSetStatusBit(fDet, fTask, bit) ;
733 }
734
735 //_______________________________________________________________
736 void AliQA::UnSetStatusBit(DETECTORINDEX_t det, ALITASK_t tsk, QABIT_t bit)
737 {
738         // UnSet the status bit for a given detector and a given task
739         
740         CheckRange(det) ;
741         CheckRange(tsk) ;
742         CheckRange(bit) ;
743         
744         ULong_t offset = Offset(tsk) ;
745         ULong_t status = GetStatus(det) ;
746         offset+= bit ;
747         status = status & 0 << offset ;
748         SetStatus(det, status) ;
749 }