Added V0A23 (V0 rings 2-3), V0C01 (V0 rings 0-1) and V0S = V0A23+V0C01
[u/mrichter/AliRoot.git] / STEER / STEERBase / 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","MFT"};   
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(new ULong_t[qa.fNdet]), 
105   fDet(qa.fDet),
106   fTask(qa.fTask)
107
108   // cpy ctor
109   memcpy(fQA, qa.fQA, sizeof(ULong_t)*fNdet);
110 }
111
112 //_____________________________________________________________________________
113 AliQA& AliQA::operator = (const AliQA& qa)
114 {
115   //
116   // Assignment operator
117   if(this != &qa) {
118     TNamed::operator=(qa);
119     fNdet = qa.fNdet;
120     delete [] fQA;
121     fQA = new ULong_t[fNdet];
122     memcpy(fQA, qa.fQA, sizeof(ULong_t)*fNdet);
123     fDet = qa.fDet;
124     fTask = qa.fTask;
125   }
126   return *this;
127 }
128
129 //_______________________________________________________________
130 AliQA::AliQA(const DETECTORINDEX_t det) :
131   TNamed("QA", "Quality Assurance status"),
132   fNdet(kNDET),  
133   fQA(new ULong_t[fNdet]), 
134   fDet(det),
135   fTask(kNULLTASK) 
136 {
137   // constructor to be used
138   if (! CheckRange(det) ) {
139     fDet = kNULLDET ; 
140     return ;
141   } 
142   Int_t index ; 
143   for (index = 0; index < fNdet; index++) 
144     fQA[index] = 0 ; 
145 }
146   
147 //_______________________________________________________________
148 AliQA::AliQA(const ALITASK_t tsk) :
149   TNamed("QA", "Quality Assurance status"), 
150   fNdet(kNDET),
151   fQA(new ULong_t[fNdet]), 
152   fDet(kNULLDET),
153   fTask(tsk)
154 {
155   // constructor to be used in the AliRoot module (SIM, REC, ESD or ANA)
156   if (! CheckRange(tsk) ) {
157     fTask = kNULLTASK ; 
158     return ;
159   } 
160   Int_t index ; 
161   for (index = 0; index < fNdet; index++) 
162     fQA[index] = 0 ; 
163 }
164
165 //____________________________________________________________________________
166 AliQA::~AliQA() 
167 {
168   // dtor  
169   delete[] fQA ;
170 }
171
172 //_______________________________________________________________
173 void AliQA::Close() 
174 {
175         // close the open files
176         if (fgQADataFile) 
177                 if (fgQADataFile->IsOpen())
178                         fgQADataFile->Close() ; 
179         if (fgQAResultFile) 
180                 if (fgQAResultFile->IsOpen()) 
181                         fgQAResultFile->Close() ;
182         if (fgQARefFile)
183                 if (fgQARefFile->IsOpen())
184                         fgQARefFile->Close() ; 
185
186
187 //_______________________________________________________________
188 Bool_t AliQA::CheckFatal() const
189 {
190   // check if any FATAL status is set
191   Bool_t rv = kFALSE ;
192   Int_t index ;
193   for (index = 0; index < kNDET ; index++)
194     rv = rv || IsSet(DETECTORINDEX_t(index), fTask, kFATAL) ;
195   return rv ;
196 }
197
198 //_______________________________________________________________
199 Bool_t AliQA::CheckRange(DETECTORINDEX_t det) const
200
201   // check if detector is in given detector range: 0-kNDET
202
203   Bool_t rv = ( det < 0 || det > kNDET )  ? kFALSE : kTRUE ;
204   if (!rv)
205     AliFatal(Form("Detector index %d is out of range: 0 <= index <= %d", det, kNDET)) ;
206   return rv ;
207 }
208
209 //_______________________________________________________________
210 Bool_t AliQA::CheckRange(ALITASK_t task) const
211
212   // check if task is given taskk range: 0:kNTASK
213   Bool_t rv = ( task < kRAW || task > kNTASK )  ? kFALSE : kTRUE ;
214   if (!rv)
215     AliFatal(Form("Module index %d is out of range: 0 <= index <= %d", task, kNTASK)) ;
216   return rv ;
217 }
218
219 //_______________________________________________________________
220 Bool_t AliQA::CheckRange(QABIT_t bit) const
221
222   // check if bit is in given bit range: 0-kNBit
223
224   Bool_t rv = ( bit < 0 || bit > kNBIT )  ? kFALSE : kTRUE ;
225   if (!rv)
226     AliFatal(Form("Status bit %d is out of range: 0 <= bit <= %d", bit, kNBIT)) ;
227   return rv ;
228 }
229
230
231
232 //_______________________________________________________________
233 char * AliQA::GetAliTaskName(ALITASK_t tsk)
234 {
235         // returns the char name corresponding to module index
236         TString tskName ;
237         switch (tsk) {
238                 case kNULLTASK:
239                         break ; 
240                 case kRAW:
241                         tskName = "RAW" ;
242                         break ;  
243                 case kSIM:
244                         tskName = "SIM" ;
245                         break ;
246                 case kREC:
247                         tskName = "REC" ;
248                         break ;
249                 case kESD:
250                         tskName = "ESD" ;
251                         break ;
252                 case kANA:
253                         tskName = "ANA" ;
254                         break ;
255                 default:
256                         tsk = kNULLTASK ; 
257                         break ;
258         }
259         return Form("%s", tskName.Data()) ;
260 }
261
262 //_______________________________________________________________
263 char * AliQA::GetBitName(QABIT_t bit) const
264 {
265         // returns the char name corresponding to bit 
266         TString bitName ;
267         switch (bit) {
268                 case kNULLBit:
269                         break ; 
270                 case kINFO:
271                         bitName = "INFO" ;
272                         break ;  
273                 case kWARNING:
274                         bitName = "WARNING" ;
275                         break ;
276                 case kERROR:
277                         bitName = "ERROR" ;
278                         break ;
279                 case kFATAL:
280                         bitName = "FATAL" ;
281                         break ;
282                 default:
283                         bit = kNULLBit ; 
284                         break ;
285         }
286         return Form("%s", bitName.Data()) ; 
287 }
288
289 //_______________________________________________________________
290 AliQA::DETECTORINDEX_t AliQA::GetDetIndex(const char * name) 
291 {
292         // returns the detector index corresponding to a given name
293         TString sname(name) ; 
294         DETECTORINDEX_t rv = kNULLDET ; 
295         for (Int_t det = 0; det < kNDET ; det++) {
296                 if ( GetDetName(det) == sname ) {
297                         rv = DETECTORINDEX_t(det) ; 
298                         break ; 
299                 }
300         }
301         return rv ;             
302 }
303
304 //_______________________________________________________________
305 const char * AliQA::GetDetName(Int_t det) 
306 {
307         // returns the detector name corresponding to a given index (needed in a loop)
308         
309         if ( det >= 0 &&  det < kNDET) 
310                 return (fgDetNames[det]).Data() ; 
311         else 
312                 return NULL ; 
313 }
314
315 //_______________________________________________________________
316 TFile * AliQA::GetQADataFile(const char * name, const Int_t run) 
317 {
318   // opens the file to store the detectors Quality Assurance Data Maker results
319         const char * temp = Form("%s.%s.%d.root", name, fgQADataFileName.Data(), run) ; 
320         TString opt ; 
321         if (! fgQADataFile ) {     
322                 if  (gSystem->AccessPathName(temp))
323                         opt = "NEW" ;
324                 else 
325                         opt = "UPDATE" ; 
326                 fgQADataFile = TFile::Open(temp, opt.Data()) ;
327         } else {
328                 if ( strcmp(temp, fgQADataFile->GetName()) != 0 ) {
329                         fgQADataFile = dynamic_cast<TFile *>(gROOT->FindObject(temp)) ; 
330                         if ( !fgQADataFile ) {
331                                 if  (gSystem->AccessPathName(temp))
332                                         opt = "NEW" ;
333                                 else 
334                                         opt = "UPDATE" ; 
335                                 fgQADataFile = TFile::Open(temp, opt.Data()) ;
336                         }
337                 }
338   }
339         return fgQADataFile ;
340
341
342 //_____________________________________________________________________________
343 TFile * AliQA::GetQADataFile(const char * fileName)
344 {
345   // Open if necessary the Data file and return its pointer
346
347   if (!fgQADataFile) 
348         if (!fileName) 
349                 fileName = AliQA::GetQADataFileName() ; 
350         if  (!gSystem->AccessPathName(fileName)) {
351                 fgQADataFile =  TFile::Open(fileName) ;
352         } else {
353                 AliFatalClass(Form("File %s not found", fileName)) ;
354         }
355   return fgQADataFile ; 
356 }
357
358 //_______________________________________________________________
359 TFile * AliQA::GetQAResultFile() 
360 {
361   // opens the file to store the  Quality Assurance Data Checker results
362         if (fgQAResultFile) 
363                 fgQAResultFile->Close() ; 
364         fgQAResultFile = 0x0 ; 
365 //      if (!fgQAResultFile) { 
366                 TString dirName(fgQAResultDirName) ; 
367                 if ( dirName.Contains(fgkLabLocalFile)) 
368                         dirName.ReplaceAll(fgkLabLocalFile, "") ;
369                 TString fileName(dirName + fgQAResultFileName) ; 
370                 TString opt("") ; 
371                 if ( !gSystem->AccessPathName(fileName) )
372                         opt = "UPDATE" ; 
373                 else { 
374                         if ( gSystem->AccessPathName(dirName) )
375                                 gSystem->mkdir(dirName) ; 
376                         opt = "NEW" ; 
377                 }
378                 fgQAResultFile = TFile::Open(fileName, opt) ;   
379 //      }
380         
381         return fgQAResultFile ;
382 }
383
384 //_______________________________________________________________
385 const TString AliQA::GetRunTypeName(RUNTYPE_t rt) 
386
387   // returns the name of a run type
388         TString rv("Invalid Run Type") ;        
389         if ( rt == kNULLTYPE ) {
390                 rv = "Known RUN_TYPE are: \n" ; 
391                 for (Int_t index = 0 ; index < kNTYPE; index++) {
392                         rv += Form("%2d -- %s\n", index, fgRTNames[index].Data()) ;  
393                 }
394                 AliErrorClass(Form("%s", rv.Data())) ; 
395                 return "" ; 
396         }
397         else {
398                 if ( rt > kNULLTYPE && rt < kNTYPE )
399                         rv = fgRTNames[rt] ; 
400         }
401         return rv ; 
402 }
403
404 //_______________________________________________________________
405 AliQA::TASKINDEX_t AliQA::GetTaskIndex(const char * name) 
406 {
407         // returns the detector index corresponding to a given name
408         TString sname(name) ; 
409         TASKINDEX_t rv = kNULLTASKINDEX ; 
410         for (Int_t tsk = 0; tsk < kNTASKINDEX ; tsk++) {
411                 if ( GetTaskName(tsk) == sname ) {
412                         rv = TASKINDEX_t(tsk) ; 
413                         break ; 
414                 }
415         }
416         return rv ;             
417 }
418
419 //_______________________________________________________________
420 Bool_t AliQA::IsSet(DETECTORINDEX_t det, ALITASK_t tsk, QABIT_t bit) const
421 {
422   // Checks is the requested bit is set
423         
424   CheckRange(det) ; 
425   CheckRange(tsk) ;
426   CheckRange(bit) ;
427         
428   ULong_t offset = Offset(tsk) ;
429   ULong_t status = GetStatus(det) ;
430   offset+= bit ;
431   status = (status & 1 << offset) != 0 ;
432   return status ;
433 }
434
435 //_______________________________________________________________
436 Bool_t AliQA::IsSetAny(DETECTORINDEX_t det, ALITASK_t tsk) const
437 {
438   // Checks is the requested bit is set
439         
440   CheckRange(det) ; 
441   CheckRange(tsk) ;
442         
443   ULong_t offset = Offset(tsk) ;
444   ULong_t status = GetStatus(det) ;
445         UShort_t st = 0 ; 
446         for ( Int_t bit = 0 ; bit < kNBIT ; bit++) {
447                 offset+= bit ;
448                 st += (status & 1 << offset) != 0 ;             
449         }
450         if ( st == 0 ) 
451                 return kFALSE ; 
452         else 
453                 return kTRUE ;
454 }
455 //_______________________________________________________________
456 Bool_t AliQA::IsSetAny(DETECTORINDEX_t det) const
457 {
458   // Checks is the requested bit is set
459         
460   CheckRange(det) ; 
461         
462         ULong_t status = GetStatus(det) ;
463         UShort_t st = 0 ; 
464         for ( Int_t tsk = 0 ; tsk < kNTASK ; tsk++) {
465                 ULong_t offset = Offset(ALITASK_t(tsk)) ;
466                 for ( Int_t bit = 0 ; bit < kNBIT ; bit++) {
467                         offset+= bit ;
468                         st += (status & 1 << offset) != 0 ;             
469                 }
470         }
471         if ( st == 0 ) 
472                 return kFALSE ; 
473         else 
474                 return kTRUE ;
475 }
476
477 //_______________________________________________________________
478 AliQA * AliQA::Instance()
479 {
480   // Get an instance of the singleton.
481   // Object must have been instantiated with Instance(ALITASK) first
482
483   return fgQA ;
484 }
485
486 //_______________________________________________________________
487 AliQA * AliQA::Instance(const DETECTORINDEX_t det)
488 {
489   // Get an instance of the singleton. The only authorized way to call the ctor
490   
491   if ( ! fgQA) {
492     TFile * f = GetQAResultFile() ; 
493         fgQA = dynamic_cast<AliQA *>(f->Get("QA")) ; 
494     if ( ! fgQA ) 
495                 fgQA = new AliQA(det) ;
496   }             
497   fgQA->Set(det) ;
498   return fgQA ;
499 }
500
501 //_______________________________________________________________
502 AliQA * AliQA::Instance(const ALITASK_t tsk)
503 {
504   // get an instance of the singleton.
505
506   if ( ! fgQA)
507     switch (tsk) {
508     case kNULLTASK:
509       break ;
510         case kRAW:
511       fgQA = new AliQA(tsk) ;
512       break ;
513         case kSIM:
514       fgQA = new AliQA(tsk) ;
515       break ;
516     case kREC:
517       AliInfoClass("fgQA = gAlice->GetQA()") ;
518       break ;
519     case kESD:
520       AliInfoClass("fgQA = dynamic_cast<AliQA *> (esdFile->Get(\"QA\")") ;
521       break ;
522     case kANA:
523       AliInfoClass("fgQA = dynamic_cast<AliQA *> (esdFile->Get(\"QA\")") ;
524       break ;
525     case kNTASK:
526       break ;
527     }
528   if (fgQA) 
529     fgQA->Set(tsk) ;
530   return fgQA ;
531 }
532
533 //_______________________________________________________________
534 AliQA *  AliQA::Instance(const TASKINDEX_t tsk) 
535 {
536         // get an instance of the singleton.
537         
538         ALITASK_t index = kNULLTASK ; 
539
540         if ( tsk == kRAWS )
541                 index = kRAW ;
542         else if (tsk < kDIGITS)
543                 index = kSIM ;
544         else if (tsk < kRECPARTICLES)
545                 index = kREC ; 
546         else if (tsk == kESDS) 
547                 index = kESD ; 
548
549         return Instance(index) ; 
550 }
551
552 //_______________________________________________________________
553 Long64_t AliQA::Merge(const TCollection * list) {
554   // Merge the QA resuls in the list into this single AliQA object
555   
556   Long64_t nmerge=0;
557   for (Int_t det = 0 ; det < kNDET ; det++) {
558     Set(DETECTORINDEX_t(det)) ; 
559     for (Int_t task = 0 ; task < kNTASK ; task++) {
560       Set(ALITASK_t(task)) ; 
561       for (Int_t bit = 0 ; bit < kNBIT ; bit++) {
562         TIter next(list) ;
563         AliQA * qa ; 
564         while ( (qa = (AliQA*)next() ) ) {
565           ++nmerge;
566           qa->IsSet(DETECTORINDEX_t(det), ALITASK_t(task), QABIT_t(bit)) ;
567           Set(QABIT_t(bit)) ; 
568         } // qa list
569       } // bit
570     } // task
571   } // detector
572   return nmerge;
573 }
574
575 //_______________________________________________________________
576 ULong_t AliQA::Offset(ALITASK_t tsk) const
577 {
578   // Calculates the bit offset for a given module (SIM, REC, ESD, ANA)
579
580   CheckRange(tsk) ; 
581
582   ULong_t offset = 0 ;
583   switch (tsk) {
584   case kNULLTASK:
585     break ;
586   case kRAW:
587     offset+= 0 ;
588     break ;
589   case kSIM:
590     offset+= 4 ;
591     break ;
592   case kREC:
593     offset+= 8 ;
594     break ;
595   case kESD:
596     offset+= 12 ;
597     break ;
598   case kANA:
599     offset+= 16 ;
600     break ;
601   case kNTASK:
602     break ;
603   }
604
605   return offset ;
606 }
607
608 //_______________________________________________________________
609 void AliQA::Set(QABIT_t bit)
610 {
611   // Set the status bit of the current detector in the current module
612   
613   SetStatusBit(fDet, fTask, bit) ;
614 }
615
616 //_____________________________________________________________________________
617 void AliQA::SetQARefStorage(const char * name)
618 {
619         // Set the root directory where the QA reference data are stored
620
621         fgQARefDirName = name ; 
622         if ( fgQARefDirName.Contains(fgkLabLocalFile) )
623                 fgQARefFileName =  fgkRefFileName ; 
624         else if ( fgQARefDirName.Contains(fgkLabLocalOCDB) )
625                 fgQARefFileName =  fgkQAName ; 
626         else if ( fgQARefDirName.Contains(fgkLabAliEnOCDB) )
627                 fgQARefFileName =  fgkQAName ; 
628
629   else {
630           AliErrorClass(Form("%s is an invalid storage definition\n", name)) ; 
631           fgQARefDirName  = "" ; 
632           fgQARefFileName = "" ; 
633   }     
634         TString tmp(fgQARefDirName) ; // + fgQARefFileName) ;
635         AliInfoClass(Form("AliQA::SetQARefDir: QA references are in  %s\n", tmp.Data()) ) ;
636 }
637
638 //_____________________________________________________________________________
639 void AliQA::SetQARefDataDirName(const char * name) 
640 {
641   // Set the lower level directory name where reference data are found
642   TString test(name) ; 
643   RUNTYPE_t rt = kNULLTYPE ; 
644   for (Int_t index = 0; index < kNTYPE; index++) {
645     if (test.CompareTo(fgRTNames[index]) == 0) {
646       rt = (RUNTYPE_t) index ; 
647       break ; 
648     } 
649         }
650         
651         if (rt == kNULLTYPE) {
652       AliWarningClass(Form("AliQA::SetQARefDataDirName: %s is an unknown RUN TYPE name\n", name)) ; 
653       return ; 
654         }
655  
656         SetQARefDataDirName(rt) ; 
657 }
658
659 //_____________________________________________________________________________
660 void AliQA::SetQAResultDirName(const char * name)
661 {
662   // Set the root directory where to store the QA status object
663
664   fgQAResultDirName.Prepend(name) ; 
665   AliInfoClass(Form("AliQA::SetQAResultDirName: QA results are in  %s\n", fgQAResultDirName.Data())) ;
666   if ( fgQAResultDirName.Contains(fgkLabLocalFile)) 
667     fgQAResultDirName.ReplaceAll(fgkLabLocalFile, "") ;
668   fgQAResultFileName.Prepend(fgQAResultDirName) ;
669 }
670
671 //_______________________________________________________________
672 void AliQA::SetStatusBit(DETECTORINDEX_t det, ALITASK_t tsk, QABIT_t bit)
673 {
674  // Set the status bit for a given detector and a given task
675
676   CheckRange(det) ;
677   CheckRange(tsk) ;
678   CheckRange(bit) ;
679
680   ULong_t offset = Offset(tsk) ;
681   ULong_t status = GetStatus(det) ;
682   offset+= bit ;
683   status = status | 1 << offset ;
684   SetStatus(det, status) ;
685 }
686
687 //_______________________________________________________________
688 void AliQA::ShowAll() const
689 {
690   // dispplay the QA status word
691   Int_t index ;
692   for (index = 0 ; index < kNDET ; index++) {
693                 for (Int_t tsk = kRAW ; tsk < kNTASK ; tsk++) {
694                         ShowStatus(DETECTORINDEX_t(index), ALITASK_t(tsk)) ;
695                 }
696         }
697 }
698
699 //_______________________________________________________________
700 void AliQA::ShowStatus(DETECTORINDEX_t det, ALITASK_t tsk) const
701 {
702         // Prints the full QA status of a given detector
703         CheckRange(det) ;
704         ULong_t status = GetStatus(det) ;
705         ULong_t tskStatus[kNTASK] ; 
706         tskStatus[kRAW] = status & 0x0000f ;
707         tskStatus[kSIM] = status & 0x000f0 ;
708         tskStatus[kREC] = status & 0x00f00 ;
709         tskStatus[kESD] = status & 0x0f000 ;
710         tskStatus[kANA] = status & 0xf0000 ;
711
712         AliInfo(Form("====> QA Status for %8s raw =0x%lx, sim=0x%lx, rec=0x%lx, esd=0x%lx, ana=0x%lx", GetDetName(det).Data(), 
713                                  tskStatus[kRAW], tskStatus[kSIM], tskStatus[kREC], tskStatus[kESD], tskStatus[kANA] )) ;
714         if (tsk == kNULLTASK) {
715                 for (Int_t itsk = kRAW ; itsk < kNTASK ; itsk++) {
716                         ShowASCIIStatus(det, ALITASK_t(itsk), tskStatus[itsk]) ; 
717                 } 
718         } else {
719                         ShowASCIIStatus(det, tsk, tskStatus[tsk]) ; 
720         }
721 }
722
723 //_______________________________________________________________
724 void AliQA::ShowASCIIStatus(DETECTORINDEX_t det, ALITASK_t tsk, const ULong_t status) const 
725 {
726         // print the QA status in human readable format
727         TString text; 
728         for (Int_t bit = kINFO ; bit < kNBIT ; bit++) {
729                 if (IsSet(det, tsk, QABIT_t(bit))) {
730                         text = GetBitName(QABIT_t(bit)) ; 
731                         text += " " ; 
732                 }
733         }
734         if (! text.IsNull())
735                 AliWarningClass(Form("           %8s %4s 0x%4lx, Problem signalled: %8s \n", GetDetName(det).Data(), GetAliTaskName(tsk), status, text.Data())) ; 
736 }
737
738 //_______________________________________________________________
739 void AliQA::UnSet(QABIT_t bit)
740 {
741         // UnSet the status bit of the current detector in the current module
742         
743         UnSetStatusBit(fDet, fTask, bit) ;
744 }
745
746 //_______________________________________________________________
747 void AliQA::UnSetStatusBit(DETECTORINDEX_t det, ALITASK_t tsk, QABIT_t bit)
748 {
749         // UnSet the status bit for a given detector and a given task
750         
751         CheckRange(det) ;
752         CheckRange(tsk) ;
753         CheckRange(bit) ;
754         
755         ULong_t offset = Offset(tsk) ;
756         ULong_t status = GetStatus(det) ;
757         offset+= bit ;
758         status = status & 0 << offset ;
759         SetStatus(det, status) ;
760 }