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