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