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::fgkLabLocalFile     = "file://"  ;
  71 const TString AliQA::fgkLabLocalOCDB     = "local://" ;
  72 const TString AliQA::fgkLabAliEnOCDB     = "alien://" ;
  73 const TString AliQA::fgkRefFileName      = "QA.root" ;
  74 const TString AliQA::fgkQAName           = "QA"  ;
  75 const TString AliQA::fgkQACorrNtName     = "CorrQA" ;
  76 const TString AliQA::fgkRefOCDBDirName   = "Ref"  ;
  77 TString AliQA::fgkRefDataDirName               = ""  ;
  78 const TString AliQA::fgkQARefOCDBDefault = "alien://folder=/alice/QA/20"  ;
  79 const TString AliQA::fgkExpert           = "Expert" ;
  80 const UInt_t  AliQA::fgkExpertBit        = 16 ;
  81 const UInt_t  AliQA::fgkQABit            = 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
 115   this->~AliQA();
 116   new(this) AliQA(qa);
 117   return *this;
 118 }
 119
 120 //_______________________________________________________________
 121 AliQA::AliQA(const DETECTORINDEX_t det) :
 122   TNamed("QA", "Quality Assurance status"),
 123   fNdet(kNDET),
 124   fQA(new ULong_t[fNdet]),
 125   fDet(det),
 126   fTask(kNULLTASK)
 127 {
 128   // constructor to be used
 129   if (! CheckRange(det) ) {
 130     fDet = kNULLDET ;
 131     return ;
 132   }
 133   Int_t index ;
 134   for (index = 0; index < fNdet; index++)
 135     fQA[index] = 0 ;
 136 }
 137
 138 //_______________________________________________________________
 139 AliQA::AliQA(const ALITASK_t tsk) :
 140   TNamed("QA", "Quality Assurance status"),
 141   fNdet(kNDET),
 142   fQA(new ULong_t[fNdet]),
 143   fDet(kNULLDET),
 144   fTask(tsk)
 145 {
 146   // constructor to be used in the AliRoot module (SIM, REC, ESD or ANA)
 147   if (! CheckRange(tsk) ) {
 148     fTask = kNULLTASK ;
 149     return ;
 150   }
 151   Int_t index ;
 152   for (index = 0; index < fNdet; index++)
 153     fQA[index] = 0 ;
 154 }
 155
 156 //____________________________________________________________________________
 157 AliQA::~AliQA()
 158 {
 159   // dtor
 160   delete[] fQA ;
 161 }
 162
 163 //_______________________________________________________________
 164 void AliQA::Close()
 165 {
 166         // close the open files
 167         if (fgQADataFile)
 168                 if (fgQADataFile->IsOpen())
 169                         fgQADataFile->Close() ;
 170         if (fgQAResultFile)
 171                 if (fgQAResultFile->IsOpen())
 172                         fgQAResultFile->Close() ;
 173         if (fgQARefFile)
 174                 if (fgQARefFile->IsOpen())
 175                         fgQARefFile->Close() ;
 176 }
 177
 178 //_______________________________________________________________
 179 Bool_t AliQA::CheckFatal() const
 180 {
 181   // check if any FATAL status is set
 182   Bool_t rv = kFALSE ;
 183   Int_t index ;
 184   for (index = 0; index < kNDET ; index++)
 185     rv = rv || IsSet(DETECTORINDEX_t(index), fTask, kFATAL) ;
 186   return rv ;
 187 }
 188
 189 //_______________________________________________________________
 190 Bool_t AliQA::CheckRange(DETECTORINDEX_t det) const
 191 {
 192   // check if detector is in given detector range: 0-kNDET
 193
 194   Bool_t rv = ( det < 0 || det > kNDET )  ? kFALSE : kTRUE ;
 195   if (!rv)
 196     AliFatal(Form("Detector index %d is out of range: 0 <= index <= %d", det, kNDET)) ;
 197   return rv ;
 198 }
 199
 200 //_______________________________________________________________
 201 Bool_t AliQA::CheckRange(ALITASK_t task) const
 202 {
 203   // check if task is given taskk range: 0:kNTASK
 204   Bool_t rv = ( task < kRAW || task > kNTASK )  ? kFALSE : kTRUE ;
 205   if (!rv)
 206     AliFatal(Form("Module index %d is out of range: 0 <= index <= %d", task, kNTASK)) ;
 207   return rv ;
 208 }
 209
 210 //_______________________________________________________________
 211 Bool_t AliQA::CheckRange(QABIT_t bit) const
 212 {
 213   // check if bit is in given bit range: 0-kNBit
 214
 215   Bool_t rv = ( bit < 0 || bit > kNBIT )  ? kFALSE : kTRUE ;
 216   if (!rv)
 217     AliFatal(Form("Status bit %d is out of range: 0 <= bit <= %d", bit, kNBIT)) ;
 218   return rv ;
 219 }
 220
 221
 222
 223 //_______________________________________________________________
 224 char * AliQA::GetAliTaskName(ALITASK_t tsk)
 225 {
 226         // returns the char name corresponding to module index
 227         TString tskName ;
 228         switch (tsk) {
 229                 case kNULLTASK:
 230                         break ;
 231                 case kRAW:
 232                         tskName = "RAW" ;
 233                         break ;
 234                 case kSIM:
 235                         tskName = "SIM" ;
 236                         break ;
 237                 case kREC:
 238                         tskName = "REC" ;
 239                         break ;
 240                 case kESD:
 241                         tskName = "ESD" ;
 242                         break ;
 243                 case kANA:
 244                         tskName = "ANA" ;
 245                         break ;
 246                 default:
 247                         tsk = kNULLTASK ;
 248                         break ;
 249         }
 250         return Form("%s", tskName.Data()) ;
 251 }
 252
 253 //_______________________________________________________________
 254 char * AliQA::GetBitName(QABIT_t bit) const
 255 {
 256         // returns the char name corresponding to bit
 257         TString bitName ;
 258         switch (bit) {
 259                 case kNULLBit:
 260                         break ;
 261                 case kINFO:
 262                         bitName = "INFO" ;
 263                         break ;
 264                 case kWARNING:
 265                         bitName = "WARNING" ;
 266                         break ;
 267                 case kERROR:
 268                         bitName = "ERROR" ;
 269                         break ;
 270                 case kFATAL:
 271                         bitName = "FATAL" ;
 272                         break ;
 273                 default:
 274                         bit = kNULLBit ;
 275                         break ;
 276         }
 277         return Form("%s", bitName.Data()) ;
 278 }
 279
 280 //_______________________________________________________________
 281 AliQA::DETECTORINDEX_t AliQA::GetDetIndex(const char * name)
 282 {
 283         // returns the detector index corresponding to a given name
 284         TString sname(name) ;
 285         DETECTORINDEX_t rv = kNULLDET ;
 286         for (Int_t det = 0; det < kNDET ; det++) {
 287                 if ( GetDetName(det) == sname ) {
 288                         rv = DETECTORINDEX_t(det) ;
 289                         break ;
 290                 }
 291         }
 292         return rv ;
 293 }
 294
 295 //_______________________________________________________________
 296 const char * AliQA::GetDetName(Int_t det)
 297 {
 298         // returns the detector name corresponding to a given index (needed in a loop)
 299
 300         if ( det >= 0 &&  det < kNDET)
 301                 return (fgDetNames[det]).Data() ;
 302         else
 303                 return NULL ;
 304 }
 305
 306 //_______________________________________________________________
 307 TFile * AliQA::GetQADataFile(const char * name, const Int_t run)
 308 {
 309   // opens the file to store the detectors Quality Assurance Data Maker results
 310         const char * temp = Form("%s.%s.%d.root", name, fgQADataFileName.Data(), run) ;
 311         TString opt ;
 312         if (! fgQADataFile ) {
 313                 if  (gSystem->AccessPathName(temp))
 314                         opt = "NEW" ;
 315                 else
 316                         opt = "UPDATE" ;
 317                 fgQADataFile = TFile::Open(temp, opt.Data()) ;
 318         } else {
 319                 if ( strcmp(temp, fgQADataFile->GetName()) != 0 ) {
 320                         fgQADataFile = dynamic_cast<TFile *>(gROOT->FindObject(temp)) ;
 321                         if ( !fgQADataFile ) {
 322                                 if  (gSystem->AccessPathName(temp))
 323                                         opt = "NEW" ;
 324                                 else
 325                                         opt = "UPDATE" ;
 326                                 fgQADataFile = TFile::Open(temp, opt.Data()) ;
 327                         }
 328                 }
 329   }
 330         return fgQADataFile ;
 331 }
 332
 333 //_____________________________________________________________________________
 334 TFile * AliQA::GetQADataFile(const char * fileName)
 335 {
 336   // Open if necessary the Data file and return its pointer
 337
 338   if (!fgQADataFile)
 339         if (!fileName)
 340                 fileName = AliQA::GetQADataFileName() ;
 341         if  (!gSystem->AccessPathName(fileName)) {
 342                 fgQADataFile =  TFile::Open(fileName) ;
 343         } else {
 344                 printf("File %s not found", fileName) ;
 345                 exit(1) ;
 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                 printf("%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       printf("fgQA = gAlice->GetQA()") ;
 510       break ;
 511     case kESD:
 512       printf("fgQA = dynamic_cast<AliQA *> (esdFile->Get(\"QA\")") ;
 513       break ;
 514     case kANA:
 515       printf("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           printf("ERROR: %s is an invalid storage definition\n", name) ;
 620           fgQARefDirName  = "" ;
 621           fgQARefFileName = "" ;
 622   }
 623         TString tmp(fgQARefDirName) ; // + fgQARefFileName) ;
 624         printf("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       printf("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   printf("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                 printf("           %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 }