* provided "as is" without express or implied warranty. *
**************************************************************************/
+
/* $Id$ */
-//_________________________________________________________________________
-// Base class for a QA checker, to be instanciated as a container of user
-// defined tasks
-//*-- Author : Yves Schutz (SUBATECH)
-//////////////////////////////////////////////////////////////////////////////
+/*
+ Checks the quality assurance.
+ By comparing with reference data
+ Y. Schutz CERN July 2007
+*/
// --- ROOT system ---
-#include "TROOT.h"
+#include <TClass.h>
+#include <TH1F.h>
+#include <TH1I.h>
+#include <TIterator.h>
+#include <TKey.h>
+#include <TFile.h>
// --- Standard library ---
// --- AliRoot header files ---
-
+#include "AliLog.h"
+#include "AliQA.h"
+#include "AliQAChecker.h"
#include "AliPHOSQAChecker.h"
-#include "AliPHOSQAVirtualCheckable.h"
ClassImp(AliPHOSQAChecker)
+//__________________________________________________________________
-//____________________________________________________________________________
- AliPHOSQAChecker::AliPHOSQAChecker(const char * name, const char * title) : TTask(name,title)
-{
- // ctor
- // stores checkers in the PHOS QA TTask folder //Folders/Task/QA
- TTask * aliceQA = (TTask*)gROOT->FindObjectAny("Folders/Tasks/QA") ;
- TTask * phosQA = (TTask*)aliceQA->GetListOfTasks()->FindObject("PHOS") ;
- if (phosQA) // PHOS QA Tasks container exists
- phosQA->Add(this) ;
- else // create //Folders/Task/QA/PHOS
- aliceQA->Add(this) ;
-
- fCheckablesList = new TList() ;
- fCheckable = 0;
-}
-
-//____________________________________________________________________________
- AliPHOSQAChecker::~AliPHOSQAChecker()
-{
- // dtor remove the checker from the task list of the associated checker
-
- TIter next(fCheckablesList) ;
- AliPHOSQAVirtualCheckable * checkable ;
- while ( (checkable = (AliPHOSQAVirtualCheckable*)next()) )
- checkable->RemoveChecker(this) ;
- ExecuteTasks("D") ;
-}
-
-//____________________________________________________________________________
- void AliPHOSQAChecker::CheckIt(AliPHOSQAVirtualCheckable *ca)
-{
- // does the check for the given checkable
-
- SetCheckable(ca) ;
- TList * l = GetListOfTasks() ;
- TIter next(l) ;
- AliPHOSQAChecker * checker ;
- while ( (checker = (AliPHOSQAChecker*)next()) )
- checker->SetCheckable(ca) ;
- ExecuteTask("") ;
- fCheckable = 0 ;
-}
-
-//____________________________________________________________________________
- void AliPHOSQAChecker::CheckIt()
-{
- // does the check for all attached chekables
- if ( fCheckablesList->IsEmpty() )
- ExecuteTask("C") ;
- else {
- TIter next( fCheckablesList ) ;
- AliPHOSQAVirtualCheckable * checkable ;
- while ( (checkable = (AliPHOSQAVirtualCheckable*)next() ) ) {
- fCheckable = checkable ;
- ExecuteTask("") ;
- }
- }
-}
-
-//____________________________________________________________________________
- void AliPHOSQAChecker::Exec(Option_t *option)
-{
- // Performs various tasks as indicated by option
- // P --> Print
- // S --> Status
- // C --> does the comparison on all the checkables declared
- // --> does the comparison on only one checkable (the one which asks CheckMe() )
- // A --> list the alarms raised in the associated checkables
- // R --> reset the alarms
- // D --> calls the dtor
-
- if ( !(strcmp(option,"P")) )
- Print() ;
-
- else if ( !(strcmp(option,"S")) )
- Status() ;
-
- else if ( !(strcmp(option,"C")) ) {
- TIter next( fCheckablesList ) ;
- AliPHOSQAVirtualCheckable * checkable ;
- while ( (checkable = (AliPHOSQAVirtualCheckable*)next() ) ) {
- fCheckable = checkable ;
- TString message = CheckingOperation();
- if ( !message.IsNull() ) {
- TDatime dt ;
- TString time(dt.AsSQLString()) ;
- message = time + message ;
- fCheckable->RaiseAlarm(dt.AsSQLString(), fCheckable->GetName(), GetName(), message.Data()) ;
- }
- }
- }
-
- else if ( !(strcmp(option,"R")) ) {
- TIter next( fCheckablesList ) ;
- AliPHOSQAVirtualCheckable * checkable ;
- while ( (checkable = (AliPHOSQAVirtualCheckable*)next() ) ) {
- fCheckable = checkable ;
- fCheckable->ResetAlarms() ;
- }
- }
-
- else if ( !(strcmp(option,"")) ) {
- TString message = CheckingOperation();
- if ( !message.IsNull() ) {
- TDatime dt ;
- TString time(dt.AsSQLString()) ;
- message = time + message ;
- fCheckable->RaiseAlarm(dt.AsSQLString(), fCheckable->GetName(), GetName(), message.Data()) ;
- }
- }
-
- else if ( !(strcmp(option,"A")) )
- PrintAlarms() ;
-
- else if ( !(strcmp(option,"D")) )
- Delete() ;
-}
-
-//____________________________________________________________________________
- void AliPHOSQAChecker::Print()
-{
- // print the checker and sub-checkers, if any, name.
-
- Info("Print", "Checker : %s", GetName()) ;
-
-}
-
-//____________________________________________________________________________
- void AliPHOSQAChecker::PrintAlarms()
-{
- // Prints the alarms of all attached checkables
- Info("PrintAlarms", "Checker name : %s", GetName()) ;
- if ( !(fCheckablesList->IsEmpty() ) ) {
- TIter next( fCheckablesList ) ;
- AliPHOSQAVirtualCheckable * checkable ;
- while ( (checkable = (AliPHOSQAVirtualCheckable *)next() ) )
- checkable->Alarms() ;
- }
-}
-
-//____________________________________________________________________________
- void AliPHOSQAChecker::Status()
-{
- // Prints the checkables attached to this checker
- if ( fCheckablesList->IsEmpty() )
- Info("Status", "No checkables are checked by %s", GetName()) ;
- else {
- Info("Status", "The following checkables are checked by %s", GetName()) ;
- TIter next(fCheckablesList) ;
- AliPHOSQAVirtualCheckable * checkable ;
- while ( (checkable = (AliPHOSQAVirtualCheckable*)next() ) )
- checkable->Print() ;
- }
-}
git://git.uio.no / u / mrichter / AliRoot.git / blobdiff