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