HLT/trigger/AliHLTGlobalTriggerComponent.cxx

   1 // $Id$
   2 /**************************************************************************
   3  * This file is property of and copyright by the ALICE HLT Project        *
   4  * ALICE Experiment at CERN, All rights reserved.                         *
   5  *                                                                        *
   6  * Primary Authors: Artur Szostak <artursz@iafrica.com>                   *
   7  *                  for The ALICE HLT Project.                            *
   8  *                                                                        *
   9  * Permission to use, copy, modify and distribute this software and its   *
  10  * documentation strictly for non-commercial purposes is hereby granted   *
  11  * without fee, provided that the above copyright notice appears in all   *
  12  * copies and that both the copyright notice and this permission notice   *
  13  * appear in the supporting documentation. The authors make no claims     *
  14  * about the suitability of this software for any purpose. It is          *
  15  * provided "as is" without express or implied warranty.                  *
  16  **************************************************************************/
  17
  18 /// @file   AliHLTGlobalTriggerComponent.cxx
  19 /// @author Artur Szostak <artursz@iafrica.com>
  20 /// @date   26 Nov 2008
  21 /// @brief  Implementation of the AliHLTGlobalTriggerComponent component class.
  22 ///
  23 /// The AliHLTGlobalTriggerComponentComponent class applies the global HLT trigger to all
  24 /// trigger information produced by components deriving from AliHLTTrigger.
  25
  26 #include "AliHLTGlobalTriggerComponent.h"
  27 #include "AliHLTGlobalTriggerDecision.h"
  28 #include "AliHLTGlobalTrigger.h"
  29 #include "AliHLTGlobalTriggerConfig.h"
  30 #include "AliHLTTriggerMenu.h"
  31 #include "AliHLTCTPData.h"
  32 #include "AliCDBManager.h"
  33 #include "AliCDBStorage.h"
  34 #include "AliCDBEntry.h"
  35 #include "TUUID.h"
  36 #include "TROOT.h"
  37 #include "TSystem.h"
  38 #include "TRegexp.h"
  39 #include "TClonesArray.h"
  40 #include "TObjString.h"
  41 #include "TString.h"
  42 #include "TInterpreter.h"
  43 #include "TDatime.h"
  44 #include "TClass.h"
  45 #include <fstream>
  46 #include <cerrno>
  47 #include <cassert>
  48 #include <vector>
  49 #include <algorithm>
  50
  51 ClassImp(AliHLTGlobalTriggerComponent)
  52
  53 const char* AliHLTGlobalTriggerComponent::fgkTriggerMenuCDBPath = "HLT/ConfigHLT/HLTGlobalTrigger";
  54
  55
  56 namespace
  57 {
  58   /**
  59    * This method is used as a comparison functor with the STL sort routines.
  60    */
  61   bool AliHLTDescendingNumbers(UInt_t a, UInt_t b)
  62   {
  63     return a > b;
  64   }
  65 } // end of namespace
  66
  67
  68 AliHLTGlobalTriggerComponent::AliHLTGlobalTriggerComponent() :
  69         AliHLTTrigger(),
  70         fTrigger(NULL),
  71         fDebugMode(false),
  72         fRuntimeCompile(true),
  73         fSkipCTPCounters(false),
  74         fDeleteCodeFile(false),
  75         fCodeFileName(),
  76         fClassName(),
  77         fCTPDecisions(NULL),
  78         fBufferSizeConst(2*(sizeof(AliHLTGlobalTriggerDecision) + sizeof(AliHLTReadoutList))),
  79         fBufferSizeMultiplier(1.),
  80         fIncludePaths(TObjString::Class()),
  81         fIncludeFiles(TObjString::Class()),
  82         fLibStateAtLoad()
  83 {
  84   // Default constructor.
  85
  86   ClearInfoForNewEvent(false);
  87 }
  88
  89
  90 AliHLTGlobalTriggerComponent::~AliHLTGlobalTriggerComponent()
  91 {
  92   // Default destructor.
  93
  94   if (fTrigger != NULL) delete fTrigger;
  95
  96   if (fCTPDecisions) {
  97     fCTPDecisions->Delete();
  98     delete fCTPDecisions;
  99   }
 100 }
 101
 102
 103 void AliHLTGlobalTriggerComponent::GetOutputDataTypes(AliHLTComponentDataTypeList& list) const
 104 {
 105   // Returns the kAliHLTDataTypeGlobalTrigger type as output.
 106   list.push_back(kAliHLTDataTypeGlobalTrigger);
 107 }
 108
 109
 110 void AliHLTGlobalTriggerComponent::GetOutputDataSize(unsigned long& constBase, double& inputMultiplier)
 111 {
 112   // Returns the output data size estimate.
 113
 114   constBase = fBufferSizeConst;
 115   inputMultiplier = fBufferSizeMultiplier;
 116 }
 117
 118
 119 Int_t AliHLTGlobalTriggerComponent::DoInit(int argc, const char** argv)
 120 {
 121   // Initialises the global trigger component.
 122
 123   fDebugMode = false;
 124   fClassName = "";
 125   fCodeFileName = "";
 126   fDeleteCodeFile = false;
 127   const char* configFileName = NULL;
 128   const char* codeFileName = NULL;
 129   fIncludePaths.Clear();
 130   fIncludeFiles.Clear();
 131
 132   for (int i = 0; i < argc; i++)
 133   {
 134     if (strcmp(argv[i], "-config") == 0)
 135     {
 136       if (configFileName != NULL)
 137       {
 138         HLTWarning("Trigger configuration macro was already specified."
 139                    " Will replace previous value given by -config."
 140         );
 141       }
 142       if (argc <= i+1)
 143       {
 144         HLTError("The trigger configuration macro filename was not specified." );
 145         return -EINVAL;
 146       }
 147       configFileName = argv[i+1];
 148       i++;
 149       continue;
 150     }
 151
 152     if (strcmp(argv[i], "-includepath") == 0)
 153     {
 154       if (argc <= i+1)
 155       {
 156         HLTError("The include path was not specified." );
 157         return -EINVAL;
 158       }
 159       new (fIncludePaths[fIncludePaths.GetEntriesFast()]) TObjString(argv[i+1]);
 160       i++;
 161       continue;
 162     }
 163
 164     if (strcmp(argv[i], "-include") == 0)
 165     {
 166       if (argc <= i+1)
 167       {
 168         HLTError("The include file name was not specified." );
 169         return -EINVAL;
 170       }
 171       new (fIncludeFiles[fIncludeFiles.GetEntriesFast()]) TObjString(argv[i+1]);
 172       i++;
 173       continue;
 174     }
 175
 176     if (strcmp(argv[i], "-debug") == 0)
 177     {
 178       if (fDebugMode == true)
 179       {
 180         HLTWarning("The debug flag was already specified. Ignoring this instance.");
 181       }
 182       fDebugMode = true;
 183       continue;
 184     }
 185
 186     if (strcmp(argv[i], "-cint") == 0)
 187     {
 188       fRuntimeCompile = false;
 189       continue;
 190     }
 191
 192     if (strcmp(argv[i], "-usecode") == 0)
 193     {
 194       if (codeFileName != NULL)
 195       {
 196         HLTWarning("Custom trigger code file was already specified."
 197                    " Will replace previous value given by -usecode."
 198         );
 199       }
 200       if (argc <= i+1)
 201       {
 202         HLTError("The custom trigger code filename was not specified." );
 203         return -EINVAL;
 204       }
 205       codeFileName = argv[i+1];
 206       if (argc <= i+2)
 207       {
 208         HLTError("The custom trigger class name was not specified." );
 209         return -EINVAL;
 210       }
 211       fClassName = argv[i+2];
 212       i += 2;
 213       continue;
 214     }
 215
 216     if (strcmp(argv[i], "-skipctp") == 0)
 217     {
 218       HLTInfo("Skipping CTP counters in trigger decision");
 219       fSkipCTPCounters=true;
 220       continue;
 221     }
 222
 223     HLTError("Unknown option '%s'.", argv[i]);
 224     return -EINVAL;
 225   } // for loop
 226
 227   const AliHLTTriggerMenu* menu = NULL;
 228   if (configFileName != NULL)
 229   {
 230     TString cmd = ".x ";
 231     cmd += configFileName;
 232     gROOT->ProcessLine(cmd);
 233     menu = AliHLTGlobalTriggerConfig::Menu();
 234   }
 235
 236   // Try load the trigger menu from the CDB if it is not loaded yet with the
 237   // -config option
 238   int result = -ENOENT;
 239   if (menu == NULL)
 240   {
 241     result = LoadTriggerMenu(fgkTriggerMenuCDBPath, menu);
 242   }
 243   if (menu == NULL)
 244   {
 245     HLTError("No trigger menu configuration found or specified.");
 246     return result;
 247   }
 248
 249   if (codeFileName == NULL)
 250   {
 251     result = GenerateTrigger(menu, fClassName, fCodeFileName, fIncludePaths, fIncludeFiles);
 252     if (result == 0) fDeleteCodeFile = true;
 253   }
 254   else
 255   {
 256     result = LoadTriggerClass(codeFileName, fIncludePaths);
 257     if (result == 0) fCodeFileName = codeFileName;
 258   }
 259   if (result != 0) return result;
 260
 261   fTrigger = AliHLTGlobalTrigger::CreateNew(fClassName.Data());
 262   if (fTrigger == NULL)
 263   {
 264     HLTError("Could not create a new instance of '%s'.", fClassName.Data());
 265     return -EIO;
 266   }
 267
 268   fTrigger->FillFromMenu(*menu);
 269   if (fTrigger->CallFailed()) return -EPROTO;
 270
 271   // setup the CTP accounting in AliHLTComponent
 272   SetupCTPData();
 273
 274   // Set the default values from the trigger menu.
 275   SetDescription(menu->DefaultDescription());
 276   SetTriggerDomain(menu->DefaultTriggerDomain());
 277
 278   return 0;
 279 }
 280
 281
 282 Int_t AliHLTGlobalTriggerComponent::DoDeinit()
 283 {
 284   // Cleans up the global trigger component.
 285
 286   if (fTrigger != NULL)
 287   {
 288     delete fTrigger;
 289     fTrigger = NULL;
 290   }
 291
 292   if (fCTPDecisions) {
 293     fCTPDecisions->Delete();
 294     delete fCTPDecisions;
 295   }
 296   fCTPDecisions=NULL;
 297
 298   Int_t result = UnloadTriggerClass(fCodeFileName);
 299   if (result != 0) return result;
 300
 301   if (fDeleteCodeFile and !fCodeFileName.IsNull() && gSystem->AccessPathName(fCodeFileName)==0 && !fDebugMode) {
 302     fCodeFileName.ReplaceAll(".cxx", "*");
 303     TString command="rm "; command+=fCodeFileName;
 304     gSystem->Exec(command);
 305   }
 306   fCodeFileName="";
 307   fDeleteCodeFile=false;
 308
 309   return 0;
 310 }
 311
 312
 313 AliHLTComponent* AliHLTGlobalTriggerComponent::Spawn()
 314 {
 315   // Creates a new object instance.
 316
 317   return new AliHLTGlobalTriggerComponent;
 318 }
 319
 320
 321 int AliHLTGlobalTriggerComponent::DoTrigger()
 322 {
 323   // This method will apply the global trigger decision.
 324
 325   if (fTrigger == NULL)
 326   {
 327     HLTFatal("Global trigger implementation object is NULL!");
 328     return -EIO;
 329   }
 330
 331   AliHLTUInt32_t eventType=0;
 332   if (!IsDataEvent(&eventType)) {
 333     if (eventType==gkAliEventTypeEndOfRun) PrintStatistics(fTrigger, kHLTLogImportant, 0);
 334     return 0;
 335   }
 336
 337   // Copy the trigger counters in case we need to set them back to their original
 338   // value because the PushBack method fails with ENOSPC.
 339   TArrayL64 originalCounters = fTrigger->GetCounters();
 340   if (fTrigger->CallFailed()) return -EPROTO;
 341
 342   fTrigger->NewEvent();
 343   if (fTrigger->CallFailed()) return -EPROTO;
 344
 345   // Fill in the input data.
 346   const TObject* obj = GetFirstInputObject();
 347   while (obj != NULL)
 348   {
 349     fTrigger->Add(obj, GetDataType(), GetSpecification());
 350     if (fTrigger->CallFailed()) return -EPROTO;
 351     obj = GetNextInputObject();
 352   }
 353
 354   // add trigger decisions for every CTP class
 355   const AliHLTCTPData* pCTPData=CTPData();
 356   if (pCTPData) {
 357     AddCTPDecisions(fTrigger, pCTPData, GetTriggerData());
 358   }
 359
 360   // Calculate the global trigger result and trigger domain, then create and push
 361   // back the new global trigger decision object.
 362   TString description;
 363   AliHLTTriggerDomain triggerDomain;
 364   bool triggerResult = fTrigger->CalculateTriggerDecision(triggerDomain, description);
 365   if (fTrigger->CallFailed()) return -EPROTO;
 366   AliHLTGlobalTriggerDecision decision(
 367       triggerResult,
 368       // The following will cause the decision to be generated with default values
 369       // (set in fTriggerDomain and fDescription) if the trigger result is false.
 370       (triggerResult == true) ? triggerDomain : GetTriggerDomain(),
 371       (triggerResult == true) ? description.Data() : GetDescription()
 372     );
 373
 374   // mask the readout list according to the CTP trigger
 375   // if the classes have been initialized (mask non-zero)
 376   if (pCTPData && pCTPData->Mask()) {
 377     AliHLTEventDDL eventDDL=pCTPData->ReadoutList(*GetTriggerData());
 378     AliHLTReadoutList ctpreadout(eventDDL);
 379     ctpreadout.Enable(AliHLTReadoutList::kHLT);
 380     AliHLTReadoutList maskedList=decision.ReadoutList();
 381     maskedList.AndEq(ctpreadout);
 382     decision.ReadoutList(maskedList);
 383   }
 384
 385   decision.SetCounters(fTrigger->GetCounters(), GetEventCount()+1);
 386   if (fTrigger->CallFailed()) return -EPROTO;
 387
 388   static UInt_t lastTime=0;
 389   TDatime time;
 390   if (time.Get()-lastTime>5) {
 391     lastTime=time.Get();
 392     PrintStatistics(fTrigger);
 393   }
 394
 395   // Add the input objects used to the global decision.
 396   obj = GetFirstInputObject();
 397   while (obj != NULL)
 398   {
 399     if (obj->IsA() == AliHLTTriggerDecision::Class())
 400     {
 401       decision.AddTriggerInput( *static_cast<const AliHLTTriggerDecision*>(obj) );
 402     }
 403     else
 404     {
 405       decision.AddInputObject(obj);
 406     }
 407     obj = GetNextInputObject();
 408   }
 409
 410   if (!fSkipCTPCounters && CTPData()) decision.AddInputObject(CTPData());
 411
 412   CreateEventDoneReadoutFilter(decision.TriggerDomain(), 3);
 413   CreateEventDoneReadoutFilter(decision.TriggerDomain(), 4);
 414   if (TriggerEvent(&decision, kAliHLTDataTypeGlobalTrigger) == -ENOSPC)
 415   {
 416     // Increase the estimated buffer space required if the PushBack methods in TriggerEvent
 417     // returned the "no buffer space" error code. Also remember to set the trigger counters
 418     // back to what they were, otherwise triggers will be double counted when we try to reprocess
 419     // this event with larger buffers.
 420     fBufferSizeConst += 1024*1024;
 421     fBufferSizeMultiplier *= 2.;
 422     fTrigger->SetCounters(originalCounters);
 423     if (fTrigger->CallFailed()) return -EPROTO;
 424     return -ENOSPC;
 425   }
 426   return 0;
 427 }
 428
 429
 430 int AliHLTGlobalTriggerComponent::Reconfigure(const char* cdbEntry, const char* chainId)
 431 {
 432   // Reconfigure the component by loading the trigger menu and recreating the
 433   // trigger logic class.
 434
 435   const char* path = fgkTriggerMenuCDBPath;
 436   const char* id = "(unknown)";
 437   if (cdbEntry != NULL) path = cdbEntry;
 438   if (chainId != NULL and chainId[0] != '\0') id = chainId;
 439   HLTInfo("Reconfiguring from '%s' for chain component '%s'.", path, id);
 440
 441   const AliHLTTriggerMenu* menu = NULL;
 442   int result = LoadTriggerMenu(path, menu);
 443   if (result != 0) return result;
 444
 445   TString className;
 446   TString codeFileName;
 447   result = GenerateTrigger(menu, className, codeFileName, fIncludePaths, fIncludeFiles);
 448   if (result != 0) return result;
 449
 450   AliHLTGlobalTrigger* trigger = AliHLTGlobalTrigger::CreateNew(className.Data());
 451   if (trigger == NULL)
 452   {
 453     HLTError("Could not create a new instance of '%s'.", className.Data());
 454     // Make sure to cleanup after the new code file.
 455     UnloadTriggerClass(codeFileName);
 456     if (not codeFileName.IsNull() and gSystem->AccessPathName(codeFileName)==0 and not fDebugMode)
 457     {
 458       codeFileName.ReplaceAll(".cxx", "*");
 459       TString command="rm "; command+=codeFileName;
 460       gSystem->Exec(command);
 461     }
 462     return -EIO;
 463   }
 464
 465   if (fTrigger != NULL)
 466   {
 467     delete fTrigger;
 468     fTrigger = NULL;
 469   }
 470
 471   fTrigger = trigger;
 472   fTrigger->FillFromMenu(*menu);
 473   if (fTrigger->CallFailed()) return -EPROTO;
 474
 475   // Set the default values from the trigger menu.
 476   SetDescription(menu->DefaultDescription());
 477   SetTriggerDomain(menu->DefaultTriggerDomain());
 478
 479   // Cleanup the old class code.
 480   UnloadTriggerClass(fCodeFileName);
 481   if (fDeleteCodeFile and not fCodeFileName.IsNull() and gSystem->AccessPathName(fCodeFileName)==0 and not fDebugMode)
 482   {
 483     fCodeFileName.ReplaceAll(".cxx", "*");
 484     TString command="rm "; command+=fCodeFileName;
 485     gSystem->Exec(command);
 486   }
 487   fCodeFileName = codeFileName;
 488   fDeleteCodeFile = true;  // Since we generated a new class.
 489
 490   return 0;
 491 }
 492
 493
 494 int AliHLTGlobalTriggerComponent::LoadTriggerMenu(const char* cdbPath, const AliHLTTriggerMenu*& menu)
 495 {
 496   // Loads the trigger menu object from the CDB path.
 497
 498   HLTDebug("Trying to load trigger menu from '%s'.", cdbPath);
 499   if (AliCDBManager::Instance() == NULL)
 500   {
 501     HLTError("CDB manager object not found.");
 502     return -EIO;
 503   }
 504   AliCDBStorage* store = AliCDBManager::Instance()->GetDefaultStorage();
 505   if (store == NULL)
 506   {
 507     HLTError("Could not get the the default storage for the CDB.");
 508     return -EIO;
 509   }
 510   Int_t version = store->GetLatestVersion(cdbPath, GetRunNo());
 511   Int_t subVersion = store->GetLatestSubVersion(cdbPath, GetRunNo(), version);
 512   AliCDBEntry* entry = AliCDBManager::Instance()->Get(cdbPath, GetRunNo(), version, subVersion);
 513   if (entry == NULL)
 514   {
 515     HLTError("Could not get the CDB entry for \"%s\".", cdbPath);
 516     return -EIO;
 517   }
 518   TObject* obj = entry->GetObject();
 519   if (obj == NULL)
 520   {
 521     HLTError("Configuration object for \"%s\" is missing.", cdbPath);
 522     return -ENOENT;
 523   }
 524   if (obj->IsA() != AliHLTTriggerMenu::Class())
 525   {
 526     HLTError("Wrong type for configuration object in \"%s\". Found a %s but we expect a AliHLTTriggerMenu.",
 527              cdbPath, obj->ClassName()
 528     );
 529     return -EPROTO;
 530   }
 531   menu = static_cast<AliHLTTriggerMenu*>(obj);
 532   return 0;
 533 }
 534
 535
 536 int AliHLTGlobalTriggerComponent::GenerateTrigger(
 537     const AliHLTTriggerMenu* menu, TString& name, TString& filename,
 538     const TClonesArray& includePaths, const TClonesArray& includeFiles
 539   )
 540 {
 541   // Generates the global trigger class that will implement the specified trigger menu.
 542   // See header for more details.
 543
 544   HLTDebug("Generating custom HLT trigger class named %s using trigger menu %p.", ((void*)menu), name.Data());
 545
 546   // Create a new UUID and replace the '-' characters with '_' to make it a valid
 547   // C++ symbol name.
 548   TUUID uuid;
 549   TString uuidstr = uuid.AsString();
 550   for (Int_t i = 0; i < uuidstr.Length(); i++)
 551   {
 552     if (uuidstr[i] == '-') uuidstr[i] = '_';
 553   }
 554
 555   // Create the name of the new class.
 556   name = "AliHLTGlobalTriggerImpl_";
 557   name += uuidstr;
 558   filename = name + ".cxx";
 559
 560   // Open a text file to write the code and generate the new class.
 561   fstream code(filename.Data(), ios_base::out | ios_base::trunc);
 562   if (not code.good())
 563   {
 564     HLTError("Could not open file '%s' for writing.", filename.Data());
 565     return -EIO;
 566   }
 567
 568   TClonesArray symbols(AliHLTTriggerMenuSymbol::Class());
 569   int result = BuildSymbolList(menu, symbols);
 570   if (result != 0) return result;
 571
 572   code << "#if !defined(__CINT__) || defined(__MAKECINT__)" << endl;
 573   code << "#include <cstring>" << endl;
 574   code << "#include \"TString.h\"" << endl;
 575   code << "#include \"TClonesArray.h\"" << endl;
 576   code << "#include \"AliHLTLogging.h\"" << endl;
 577   code << "#include \"AliHLTGlobalTrigger.h\"" << endl;
 578   code << "#include \"AliHLTGlobalTriggerDecision.h\"" << endl;
 579   code << "#include \"AliHLTDomainEntry.h\"" << endl;
 580   code << "#include \"AliHLTTriggerDomain.h\"" << endl;
 581   code << "#include \"AliHLTReadoutList.h\"" << endl;
 582   code << "#include \"AliHLTTriggerMenu.h\"" << endl;
 583   code << "#include \"AliHLTTriggerMenuItem.h\"" << endl;
 584   code << "#include \"AliHLTTriggerMenuSymbol.h\"" << endl;
 585
 586   // Add any include files that were specified on the command line.
 587   for (Int_t i = 0; i < includeFiles.GetEntriesFast(); i++)
 588   {
 589     TString file = static_cast<TObjString*>(includeFiles.UncheckedAt(i))->String();
 590     code << "#include \"" << file.Data() << "\"" << endl;
 591   }
 592
 593   if (fDebugMode)
 594   {
 595     code << "#else" << endl;
 596     code << "const char* gFunctionName = \"???\";" << endl;
 597     code << "#define HLTDebug(msg) if (CheckFilter(kHLTLogDebug) && CheckGroup(Class_Name())) SendMessage(kHLTLogDebug, Class_Name(), ::gFunctionName, __FILE__, __LINE__, msg)" << endl;
 598   }
 599   code << "#endif" << endl;
 600
 601   code << "class " << name << " :" << endl;
 602   // Add appropriate #ifdef sections since we need to prevent inheritance from
 603   // AliHLTGlobalTrigger. CINT does not seem to support multiple inheritance nor
 604   // multiple levels of inheritance. Neither of the following schemes worked:
 605   //
 606   // 1)  class AliHLTGlobalTrigger : public AliHLTLogging {};
 607   //     class AliHLTGlobalTriggerImpl_xyz : public AliHLTGlobalTrigger {};
 608   //
 609   // 2)  class AliHLTGlobalTrigger {};
 610   //     class AliHLTGlobalTriggerImpl_xyz : public AliHLTGlobalTrigger, public AliHLTLogging {};
 611   //
 612   // Thus, we are forced to just inherit from AliHLTLogging when running in the CINT
 613   // interpreter. But we anyway have to call the global trigger implementation class
 614   // through the AliHLTGlobalTriggerWrapper so this is not such a problem.
 615   code << "#if !defined(__CINT__) || defined(__MAKECINT__)" << endl;
 616   code << "  public AliHLTGlobalTrigger," << endl;
 617   code << "#endif" << endl;
 618   code << "  public AliHLTLogging" << endl;
 619   code << "{" << endl;
 620   code << "public:" << endl;
 621
 622   // Generate constructor method.
 623   code << "  " << name << "() :" << endl;
 624   code << "#if !defined(__CINT__) || defined(__MAKECINT__)" << endl;
 625   code << "    AliHLTGlobalTrigger()," << endl;
 626   code << "#endif" << endl;
 627   code << "    AliHLTLogging()";
 628   // Write the symbols in the trigger menu in the initialisation list.
 629   for (Int_t i = 0; i < symbols.GetEntriesFast(); i++)
 630   {
 631     code << "," << endl;
 632     AliHLTTriggerMenuSymbol* symbol = static_cast<AliHLTTriggerMenuSymbol*>( symbols.UncheckedAt(i) );
 633     code << "    " << symbol->Name() << "()," << endl;
 634     if (strcmp(symbol->ObjectClass(), "AliHLTTriggerDecision") == 0)
 635     {
 636       code << "    " << symbol->Name() << "TriggerDomain()," << endl;
 637     }
 638     code << "    " << symbol->Name() << "DomainEntry(kAliHLTAnyDataType)";
 639   }
 640   for (UInt_t i = 0; i < menu->NumberOfItems(); i++)
 641   {
 642     code << "," << endl << "    fMenuItemDescription" << i << "()";
 643   }
 644   code << endl << "  {" << endl;
 645   if (fDebugMode)
 646   {
 647     code << "#ifdef __CINT__" << endl;
 648     code << "    gFunctionName = \"" << name.Data() <<"\";" << endl;
 649     code << "#endif" << endl;
 650     code << "    SetLocalLoggingLevel(kHLTLogAll);" << endl;
 651     code << "    HLTDebug(Form(\"Creating new instance at %p.\", this));" << endl;
 652   }
 653   code << "  }" << endl;
 654
 655   code << "  virtual ~" << name << "() {" << endl;
 656   if (fDebugMode)
 657   {
 658     code << "#ifdef __CINT__" << endl;
 659     code << "    gFunctionName = \"~" << name.Data() << "\";" << endl;
 660     code << "#endif" << endl;
 661     code << "    HLTDebug(Form(\"Deleting instance at %p.\", this));" << endl;
 662   }
 663   code << "  }" << endl;
 664
 665   // Generate the FillFromMenu method.
 666   code << "  virtual void FillFromMenu(const AliHLTTriggerMenu& menu) {" << endl;
 667   if (fDebugMode)
 668   {
 669     code << "#ifdef __CINT__" << endl;
 670     code << "    gFunctionName = \"FillFromMenu\";" << endl;
 671     code << "#endif" << endl;
 672     code << "    HLTDebug(Form(\"Filling description entries from trigger menu for global trigger %p.\", this));" << endl;
 673   }
 674   code << "    fCounter.Set(menu.NumberOfItems());" << endl;
 675   for (UInt_t i = 0; i < menu->NumberOfItems(); i++)
 676   {
 677     code << "    fMenuItemDescription" << i << " = (menu.Item(" << i
 678          << ") != NULL) ? menu.Item(" << i << ")->Description() : \"\";" << endl;
 679   }
 680   if (fDebugMode)
 681   {
 682     code << "    HLTDebug(Form(\"Finished filling description entries from trigger menu.\"));" << endl;
 683     code << "    HLTDebug(Form(\"Filling domain entries from trigger menu symbols for global trigger %p.\", this));" << endl;
 684   }
 685   code << "    for (Int_t i = 0; i < menu.SymbolArray().GetEntriesFast(); i++) {" << endl;
 686   // 30 Oct 2009 - CINT sometimes evaluates the dynamic_cast incorrectly.
 687   // Have to use the TClass system for extra protection.
 688   code << "      if (menu.SymbolArray().UncheckedAt(i) == NULL) continue;" << endl;
 689   code << "      if (menu.SymbolArray().UncheckedAt(i)->IsA() != AliHLTTriggerMenuSymbol::Class()) continue;" << endl;
 690   code << "      const AliHLTTriggerMenuSymbol* symbol = dynamic_cast<const"
 691            " AliHLTTriggerMenuSymbol*>(menu.SymbolArray().UncheckedAt(i));" << endl;
 692   code << "      if (symbol == NULL) continue;" << endl;
 693   for (Int_t i = 0; i < symbols.GetEntriesFast(); i++)
 694   {
 695     AliHLTTriggerMenuSymbol* symbol = static_cast<AliHLTTriggerMenuSymbol*>( symbols.UncheckedAt(i) );
 696     code << "      if (strcmp(symbol->RealName(), \"" << symbol->RealName() << "\") == 0) {" << endl;
 697     if (fDebugMode)
 698     {
 699       code << "        HLTDebug(Form(\"Assinging domain entry value corresponding with symbol '%s' to '%s'.\","
 700               " symbol->RealName(), symbol->BlockType().AsString().Data()));" << endl;
 701     }
 702     code << "        " << symbol->Name() << "DomainEntry = symbol->BlockType();" << endl;
 703     code << "        continue;" << endl;
 704     code << "      }" << endl;
 705   }
 706   code << "    }" << endl;
 707   if (fDebugMode)
 708   {
 709     code << "    HLTDebug(Form(\"Finished filling domain entries from trigger menu symbols.\"));" << endl;
 710   }
 711   code << "  }" << endl;
 712
 713   // Generate the NewEvent method.
 714   code << "  virtual void NewEvent() {" << endl;
 715   if (fDebugMode)
 716   {
 717     code << "#ifdef __CINT__" << endl;
 718     code << "    gFunctionName = \"NewEvent\";" << endl;
 719     code << "#endif" << endl;
 720     code << "    HLTDebug(Form(\"New event for global trigger object %p, initialising variables to default values.\", this));" << endl;
 721   }
 722   // Write code to initialise the symbols in the trigger menu to their default values.
 723   for (Int_t i = 0; i < symbols.GetEntriesFast(); i++)
 724   {
 725     AliHLTTriggerMenuSymbol* symbol = static_cast<AliHLTTriggerMenuSymbol*>( symbols.UncheckedAt(i) );
 726     // CINT has problems with the implicit equals operator for complex types, so if
 727     // the type has a equals operater we need to write the operator call explicitly.
 728     TClass* clas = TClass::GetClass(symbol->Type());
 729     if (clas != NULL and clas->GetMethodAny("operator=") != NULL)
 730     {
 731       code << "    " << symbol->Name() << ".operator = (" << symbol->DefaultValue() << ");" << endl;
 732     }
 733     else
 734     {
 735       code << "    " << symbol->Name() << " = " << symbol->DefaultValue() << ";" << endl;
 736     }
 737     if (strcmp(symbol->ObjectClass(), "AliHLTTriggerDecision") == 0)
 738     {
 739       code << "    " << symbol->Name() << "TriggerDomain.Clear();" << endl;
 740     }
 741   }
 742   if (fDebugMode)
 743   {
 744     code << "    HLTDebug(Form(\"Finished initialising variables.\"));" << endl;
 745   }
 746   code << "  }" << endl;
 747
 748   // Generate the Add method.
 749   code << "  virtual void Add(const TObject* _object_, const AliHLTComponentDataType& _type_, AliHLTUInt32_t _spec_) {" << endl;
 750   if (fDebugMode)
 751   {
 752     code << "#ifdef __CINT__" << endl;
 753     code << "    gFunctionName = \"Add\";" << endl;
 754     code << "#endif" << endl;
 755   }
 756   code << "    AliHLTDomainEntry _type_spec_(_type_, _spec_);" << endl;
 757   if (fDebugMode)
 758   {
 759     code << "    HLTDebug(Form(\"Adding TObject %p, with class name '%s' from data block"
 760             " '%s', to global trigger object %p\", _object_, _object_->ClassName(),"
 761             " _type_spec_.AsString().Data(), this));" << endl;
 762     code << "    _object_->Print();" << endl;
 763     code << "    bool _object_assigned_ = false;" << endl;
 764   }
 765   for (Int_t i = 0; i < symbols.GetEntriesFast(); i++)
 766   {
 767     // Write code to check if the block type, specification and class name is correct.
 768     // Then write code to assign the variable from the input object.
 769     AliHLTTriggerMenuSymbol* symbol = static_cast<AliHLTTriggerMenuSymbol*>( symbols.UncheckedAt(i) );
 770     TString expr = symbol->AssignExpression();
 771     if (expr == "") continue; // Skip entries that have no assignment expression.
 772     bool isTrigDecision = strcmp(symbol->ObjectClass(), "AliHLTTriggerDecision") == 0;
 773     if (fDebugMode)
 774     {
 775       if (isTrigDecision)
 776       {
 777         code << "    HLTDebug(Form(\"Trying to match input object to class '"
 778              << symbol->ObjectClass() << "', trigger name '" << symbol->RealName()
 779              << "' and block type '%s'\", " << symbol->Name()
 780              << "DomainEntry.AsString().Data()));" << endl;
 781       }
 782       else
 783       {
 784         code << "    HLTDebug(Form(\"Trying to match input object to class '"
 785              << symbol->ObjectClass() << "' and block type '%s'\", "
 786              << symbol->Name() << "DomainEntry.AsString().Data()));" << endl;
 787       }
 788     }
 789     // 30 Oct 2009 - CINT sometimes evaluates the dynamic_cast incorrectly.
 790     // Have to use the TClass system for extra protection.
 791     code << "    const " << symbol->ObjectClass() << "* " << symbol->Name() << "_object_ = NULL;" << endl;
 792     code << "    if (_object_->IsA() == " << symbol->ObjectClass() << "::Class()) " << symbol->Name()
 793          << "_object_ = dynamic_cast<const " << symbol->ObjectClass()
 794          << "*>(_object_);" << endl;
 795     code << "    if (" << symbol->Name() << "_object_ != NULL && ";
 796     if (isTrigDecision)
 797     {
 798       code << "strcmp(" << symbol->Name() << "_object_->Name(), \""
 799            << symbol->RealName() << "\") == 0 && ";
 800     }
 801     code << symbol->Name() << "DomainEntry == _type_spec_) {" << endl;
 802     TString fullname = symbol->Name();
 803     fullname += "_object_";
 804     expr.ReplaceAll("this", fullname);
 805     code << "      this->" << symbol->Name() << " = " << expr.Data() << ";" << endl;
 806     if (isTrigDecision)
 807     {
 808       code << "      this->" << symbol->Name() << "TriggerDomain = "
 809            << fullname.Data() << "->TriggerDomain();" << endl;
 810     }
 811     if (fDebugMode)
 812     {
 813       code << "      HLTDebug(Form(\"Added TObject %p with class name '%s' to variable "
 814            << symbol->Name() << "\", _object_, _object_->ClassName()));" << endl;
 815       code << "      _object_assigned_ = true;" << endl;
 816     }
 817     code << "    }" << endl;
 818   }
 819   if (fDebugMode)
 820   {
 821     code << "    if (! _object_assigned_) {" << endl;
 822     code << "      HLTDebug(Form(\"Did not assign TObject %p"
 823             " with class name '%s' to any variable.\", _object_, _object_->ClassName()));"
 824          << endl;
 825     code << "    }" << endl;
 826   }
 827   code << "  }" << endl;
 828
 829   // Generate the CalculateTriggerDecision method.
 830   // This requires code to be generated that checks which items in the trigger menu
 831   // have their conditions asserted and then the trigger domain is generated from
 832   // those fired items.
 833   // The processing will start from the highest priority trigger group and stop
 834   // after at least one trigger from the current priority group being processed
 835   // is positive. For each priority group all the trigger menu items are checked.
 836   // Their combined trigger condition expression must be true for the trigger priority
 837   // group to be triggered positive. The full condition expression is formed by
 838   // concatenating the individual condition expressions. If no trailing operators are
 839   // used in the individual expressions then the default condition operator is placed
 840   // between two concatenated condition expressions.
 841   // If a trigger priority group has at least one trigger fired then the trigger domain
 842   // is calculated such that it will give the same result as the concatenated trigger
 843   // domain merging expressions for all the individual trigger menu items with
 844   // positive results. Again, if no trailing operators are used in the individual
 845   // merging expressions then the default domain operator is placed between two
 846   // expression fragments.
 847   code << "  virtual bool CalculateTriggerDecision(AliHLTTriggerDomain& _domain_, TString& _description_) {" << endl;
 848   if (fDebugMode)
 849   {
 850     code << "#ifdef __CINT__" << endl;
 851     code << "    gFunctionName = \"CalculateTriggerDecision\";" << endl;
 852     code << "#endif" << endl;
 853     code << "    HLTDebug(Form(\"Calculating global HLT trigger result with trigger object at %p.\", this));" << endl;
 854   }
 855
 856   // Build a list of priorities used in the trigger menu.
 857   std::vector<UInt_t> priorities;
 858   for (UInt_t i = 0; i < menu->NumberOfItems(); i++)
 859   {
 860     const AliHLTTriggerMenuItem* item = menu->Item(i);
 861     bool priorityNotInList = std::find(priorities.begin(), priorities.end(), item->Priority()) == priorities.end();
 862     if (priorityNotInList) priorities.push_back(item->Priority());
 863   }
 864   std::sort(priorities.begin(), priorities.end(), AliHLTDescendingNumbers);
 865   // From the priority list, build the priority groups in the correct order,
 866   // i.e. highest priority first.
 867   // The priority group is a list of vectors of integers. The integers are the
 868   // index numbers into the trigger menu item list for the items which form part
 869   // of the priority group.
 870   std::vector<std::vector<Int_t> > priorityGroup;
 871   priorityGroup.insert(priorityGroup.begin(), priorities.size(), std::vector<Int_t>());
 872   for (size_t n = 0; n < priorities.size(); n++)
 873   {
 874     UInt_t priority = priorities[n];
 875     for (UInt_t i = 0; i < menu->NumberOfItems(); i++)
 876     {
 877       const AliHLTTriggerMenuItem* item = menu->Item(i);
 878       if (item->Priority() == priority) priorityGroup[n].push_back(i);
 879     }
 880   }
 881
 882   for (size_t n = 0; n < priorityGroup.size(); n++)
 883   {
 884     if (fDebugMode)
 885     {
 886       code << "    HLTDebug(Form(\"Processing trigger priority group " << priorities[n] << "\"));" << endl;
 887     }
 888     code << "    ";
 889     if (n == 0) code << "UInt_t ";
 890     code << "_previous_match_ = 0xFFFFFFFF;" << endl;
 891     code << "    ";
 892     if (n == 0) code << "bool ";
 893     code << "_trigger_matched_ = false;" << endl;
 894     code << "    ";
 895     if (n == 0) code << "bool ";
 896     code << "_group_result_ = false;" << endl;
 897     std::vector<TString> conditionOperator;
 898     conditionOperator.insert(conditionOperator.begin(), priorityGroup[n].size(), TString(""));
 899     std::vector<TString> domainOperator;
 900     domainOperator.insert(domainOperator.begin(), priorityGroup[n].size(), TString(""));
 901     for (size_t m = 0; m < priorityGroup[n].size(); m++)
 902     {
 903       UInt_t i = priorityGroup[n][m];
 904       const AliHLTTriggerMenuItem* item = menu->Item(i);
 905       TString triggerCondition = item->TriggerCondition();
 906       TString mergeExpr = item->MergeExpression();
 907       // Replace the symbols found in the trigger condition and merging expressions
 908       // with appropriate compilable versions.
 909       for (Int_t j = 0; j < symbols.GetEntriesFast(); j++)
 910       {
 911         AliHLTTriggerMenuSymbol* symbol = static_cast<AliHLTTriggerMenuSymbol*>( symbols.UncheckedAt(j) );
 912         bool symbolNamesDifferent = strcmp(symbol->RealName(), symbol->Name()) != 0;
 913         if (strcmp(symbol->ObjectClass(), "AliHLTTriggerDecision") == 0)
 914         {
 915           TString newname = symbol->Name();
 916           newname += "TriggerDomain";
 917           mergeExpr.ReplaceAll(symbol->RealName(), newname);
 918         }
 919         else
 920         {
 921           if (symbolNamesDifferent) mergeExpr.ReplaceAll(symbol->RealName(), symbol->Name());
 922         }
 923         if (symbolNamesDifferent) triggerCondition.ReplaceAll(symbol->RealName(), symbol->Name());
 924       }
 925       // We allow the trigger conditions and merging expressions to have trailing operators.
 926       // Thus, we need to extract the operators and cleanup the expressions so that they will
 927       // compile. This means that we silently ignore the trailing operator if not needed.
 928       if (ExtractedOperator(triggerCondition, conditionOperator[m]))
 929       {
 930         // If the trailing operator is the same as the default operator then reset
 931         // the value in the operator list so that the default is used in the generated
 932         // code. This creates more compact code.
 933         if (conditionOperator[m] == menu->DefaultConditionOperator()) conditionOperator[m] = "";
 934       }
 935       if (ExtractedOperator(mergeExpr, domainOperator[m]))
 936       {
 937         if (domainOperator[m] == menu->DefaultDomainOperator()) domainOperator[m] = "";
 938       }
 939       if (fDebugMode)
 940       {
 941         code << "    HLTDebug(Form(\"Trying trigger condition " << i
 942              << " (Description = '%s').\", fMenuItemDescription" << i << ".Data()));"
 943              << endl;
 944       }
 945       code << "    ";
 946       if (n == 0 and m == 0) code << "bool ";
 947       code << "_item_result_ = false;" << endl;
 948       code << "    if (" << triggerCondition << ") {" << endl;
 949       code << "      ++fCounter[" << i << "];" << endl;
 950       const char* indentation = "";
 951       if (item->PreScalar() != 0)
 952       {
 953         indentation = "  ";
 954         code << "      if ((fCounter[" << i << "] % " << item->PreScalar() << ") == 1) {" << endl;
 955       }
 956       code << indentation << "      _item_result_ = true;" << endl;
 957       if (fDebugMode)
 958       {
 959         code << indentation << "      HLTDebug(Form(\"Matched trigger condition " << i
 960              << " (Description = '%s').\", fMenuItemDescription" << i << ".Data()));" << endl;
 961       }
 962       if (item->PreScalar() != 0)
 963       {
 964         code << "      }" << endl;
 965       }
 966       code << "    }" << endl;
 967       if (m == 0)
 968       {
 969         // Since this is the first item of the trigger group,
 970         // the generated trigger logic can be simplified a little.
 971         code << "    _group_result_ = _item_result_;" << endl;
 972         code << "    if (_item_result_) {" << endl;
 973         code << "      _domain_ = " << mergeExpr.Data() << ";" << endl;
 974         code << "      _description_ = fMenuItemDescription" << i << ";" << endl;
 975         code << "      _previous_match_ = " << i << ";" << endl;
 976         code << "      _trigger_matched_ = true;" << endl;
 977         code << "    }" << endl;
 978       }
 979       else
 980       {
 981         if (conditionOperator[m-1] == "")
 982         {
 983           code << "    _group_result_ = _group_result_ "
 984                << menu->DefaultConditionOperator() << " _item_result_;" << endl;
 985         }
 986         else
 987         {
 988           code << "    _group_result_ = _group_result_ "
 989                << conditionOperator[m-1] << " _item_result_;" << endl;
 990         }
 991         code << "    if (_item_result_) {" << endl;
 992         code << "      if (_trigger_matched_) {" << endl;
 993         bool switchWillBeEmpty = true;
 994         for (size_t k = 0; k < m; k++)
 995         {
 996           if (domainOperator[k] == "") continue;
 997           switchWillBeEmpty = false;
 998         }
 999         if (switchWillBeEmpty)
1000         {
1001           code << "        _domain_ = _domain_ " << menu->DefaultDomainOperator() << " "
1002                << mergeExpr.Data() << ";" << endl;
1003         }
1004         else
1005         {
1006           code << "        switch(_previous_match_) {" << endl;
1007           for (size_t k = 0; k < m; k++)
1008           {
1009             if (domainOperator[k] == "") continue;
1010             code << "        case " << k << ": _domain_ = _domain_ "
1011                  << domainOperator[k] << " " << mergeExpr.Data() << "; break;" << endl;
1012           }
1013           code << "        default: _domain_ = _domain_ "
1014                << menu->DefaultDomainOperator() << " " << mergeExpr.Data() << ";" << endl;
1015           code << "        }" << endl;
1016         }
1017         code << "        _description_ += \",\";" << endl;
1018         code << "        _description_ += fMenuItemDescription" << i << ";" << endl;
1019         code << "      } else {" << endl;
1020         code << "        _domain_ = " << mergeExpr.Data() << ";" << endl;
1021         code << "        _description_ = fMenuItemDescription" << i << ";" << endl;
1022         code << "      }" << endl;
1023         code << "      _previous_match_ = " << i << ";" << endl;
1024         code << "      _trigger_matched_ = true;" << endl;
1025         code << "    }" << endl;
1026       }
1027     }
1028     code << "    if (_group_result_) {" << endl;
1029     if (fDebugMode)
1030     {
1031       if (n < priorities.size() - 1)
1032       {
1033         code << "      HLTDebug(Form(\"Matched triggers in trigger priority group " << priorities[n]
1034              << ". Stopping processing here because all other trigger groups have lower priority.\"));" << endl;
1035       }
1036       else
1037       {
1038         code << "      HLTDebug(Form(\"Matched triggers in trigger priority group " << priorities[n] << ".\"));" << endl;
1039       }
1040     }
1041     code << "      return true;" << endl;
1042     code << "    }" << endl;
1043   }
1044   code << "    _domain_.Clear();" << endl;
1045   code << "    _description_ = \"\";" << endl;
1046   code << "    return false;" << endl;
1047   code << "  }" << endl;
1048
1049   // Generate getter and setter methods for the counters.
1050   code << "  const TArrayL64& GetCounters() const { return fCounter; }" << endl;
1051   code << "  void SetCounters(const TArrayL64& counters) { fCounter = counters; }" << endl;
1052
1053   code << "private:" << endl;
1054   // Add the symbols in the trigger menu to the list of private variables.
1055   for (Int_t i = 0; i < symbols.GetEntriesFast(); i++)
1056   {
1057     AliHLTTriggerMenuSymbol* symbol = static_cast<AliHLTTriggerMenuSymbol*>( symbols.UncheckedAt(i) );
1058     code << "  " << symbol->Type() << " " << symbol->Name() << ";" << endl;
1059     if (strcmp(symbol->ObjectClass(), "AliHLTTriggerDecision") == 0)
1060     {
1061       code << "  AliHLTTriggerDomain " << symbol->Name() << "TriggerDomain;" << endl;
1062     }
1063     code << "  AliHLTDomainEntry " << symbol->Name() << "DomainEntry;" << endl;
1064   }
1065   for (UInt_t i = 0; i < menu->NumberOfItems(); i++)
1066   {
1067     code << "  TString fMenuItemDescription" << i << ";" << endl;
1068   }
1069   code << "  TArrayL64 fCounter;" << endl;
1070   code << "#if !defined(__CINT__) || defined(__MAKECINT__)" << endl;
1071   code << "  ClassDef(" << name.Data() << ", 0)" << endl;
1072   code << "#else" << endl;
1073   code << "  virtual const char* Class_Name() const { return \"" << name.Data() << "\"; }" << endl;
1074   code << "#endif" << endl;
1075   code << "};" << endl;
1076   code << "#if !defined(__CINT__) || defined(__MAKECINT__)" << endl;
1077   code << "ClassImp(" << name.Data() << ")" << endl;
1078   code << "#endif" << endl;
1079
1080   code.close();
1081
1082   // Now we need to compile and load the new class.
1083   result = LoadTriggerClass(filename, includePaths);
1084   return result;
1085 }
1086
1087
1088 int AliHLTGlobalTriggerComponent::LoadTriggerClass(
1089     const char* filename, const TClonesArray& includePaths
1090   )
1091 {
1092   // Loads the code for a custom global trigger class implementation on the fly.
1093
1094   HLTDebug("Loading HLT trigger class from file '%s'.", filename);
1095
1096   TString compiler = gSystem->GetBuildCompilerVersion();
1097   if (fRuntimeCompile && (compiler.Contains("gcc") or compiler.Contains("icc")))
1098   {
1099     TString includePath;
1100 #if defined(PKGINCLUDEDIR)
1101     // this is especially for the HLT build system where the package is installed
1102     // in a specific directory including proper treatment of include files
1103     includePath.Form("-I%s", PKGINCLUDEDIR);
1104 #else
1105     // the default AliRoot behavior, all include files can be found in the
1106     // $ALICE_ROOT subfolders
1107     includePath = "-I${ALICE_ROOT}/include -I${ALICE_ROOT}/HLT/BASE -I${ALICE_ROOT}/HLT/trigger";
1108 #endif
1109     // Add any include paths that were specified on the command line.
1110     for (Int_t i = 0; i < includePaths.GetEntriesFast(); i++)
1111     {
1112       TString path = static_cast<TObjString*>(includePaths.UncheckedAt(i))->String();
1113       includePath += " -I";
1114       includePath += path;
1115     }
1116     HLTDebug("using include settings: %s", includePath.Data());
1117     gSystem->SetIncludePath(includePath);
1118     gSystem->SetFlagsOpt("-O3 -DNDEBUG");
1119     gSystem->SetFlagsDebug("-g3 -DDEBUG -D__DEBUG");
1120
1121     int result = kTRUE;
1122     if (fDebugMode)
1123     {
1124       result = gSystem->CompileMacro(filename, "g");
1125     }
1126     else
1127     {
1128       result = gSystem->CompileMacro(filename, "O");
1129     }
1130     if (result != kTRUE)
1131     {
1132       HLTFatal("Could not compile and load global trigger menu implementation.");
1133       return -ENOENT;
1134     }
1135   }
1136   else
1137   {
1138     // Store the library state to be checked later in UnloadTriggerClass.
1139     fLibStateAtLoad = gSystem->GetLibraries();
1140
1141     // If we do not support the compiler then try interpret the class instead.
1142     TString cmd = ".L ";
1143     cmd += filename;
1144     Int_t errorcode = TInterpreter::kNoError;
1145     gROOT->ProcessLine(cmd, &errorcode);
1146     if (errorcode != TInterpreter::kNoError)
1147     {
1148       HLTFatal("Could not load interpreted global trigger menu implementation"
1149                " (Interpreter error code = %d).",
1150                errorcode
1151       );
1152       return -ENOENT;
1153     }
1154   }
1155
1156   return 0;
1157 }
1158
1159
1160 int AliHLTGlobalTriggerComponent::UnloadTriggerClass(const char* filename)
1161 {
1162   // Unloads the code previously loaded by LoadTriggerClass.
1163
1164   HLTDebug("Unloading HLT trigger class in file '%s'.", filename);
1165
1166   TString compiler = gSystem->GetBuildCompilerVersion();
1167   if (fRuntimeCompile && (compiler.Contains("gcc") or compiler.Contains("icc")))
1168   {
1169     // Generate the library name.
1170     TString libname = filename;
1171     Ssiz_t dotpos = libname.Last('.');
1172     if (0 <= dotpos and dotpos < libname.Length()) libname[dotpos] = '_';
1173     libname += ".";
1174     libname += gSystem->GetSoExt();
1175
1176     // This is a workaround for a problem with unloading shared libraries in ROOT.
1177     // If the trigger logic library is loaded before the libAliHLTHOMER.so library
1178     // or any other library is loaded afterwards, then during the gInterpreter->UnloadFile
1179     // call all the subsequent libraries get unloded. This means that any objects created
1180     // from classes implemented in the libAliHLTHOMER.so library will generate segfaults
1181     // since the executable code has been unloaded.
1182     // We need to check if there are any more libraries loaded after the class we
1183     // are unloading and in that case don't unload the class.
1184     TString libstring = gSystem->GetLibraries();
1185     TString token, lastlib;
1186     Ssiz_t from = 0;
1187     Int_t numOfLibs = 0, posOfLib = -1;
1188     while (libstring.Tokenize(token, from, " "))
1189     {
1190       ++numOfLibs;
1191       lastlib = token;
1192       if (token.Contains(libname)) posOfLib = numOfLibs;
1193     }
1194     if (numOfLibs != posOfLib)
1195     {
1196       HLTWarning(Form("ROOT limitation! Cannot properly cleanup and unload the shared"
1197           " library '%s' since another library '%s' was loaded afterwards. Trying to"
1198           " unload this library will remove the others and lead to serious memory faults.",
1199           libname.Data(), lastlib.Data()
1200       ));
1201       return 0;
1202     }
1203
1204     char* path = NULL;
1205     int result = 0;
1206     if ((path = gSystem->DynamicPathName(libname)) != NULL)
1207     {
1208       result = gInterpreter->UnloadFile(path);
1209       delete [] path;
1210     }
1211     if (result != TInterpreter::kNoError) return -ENOENT;
1212   }
1213   else
1214   {
1215     // This is again a workaround for the problem with unloading files in ROOT.
1216     // If the trigger logic class is loaded before the libAliHLTHOMER.so library
1217     // or any other library is loaded afterwards, then during the gInterpreter->UnloadFile
1218     // call all the subsequent libraries get unloded.
1219     // We need to check if the list of loaded libraries has changed since the last
1220     // call to LoadTriggerClass. If it has then don't unload the class.
1221     if (fLibStateAtLoad != gSystem->GetLibraries())
1222     {
1223       TString libstring = gSystem->GetLibraries();
1224       TString token;
1225       Ssiz_t from = 0;
1226       while (libstring.Tokenize(token, from, " "))
1227       {
1228         if (not fLibStateAtLoad.Contains(token)) break;
1229       }
1230       HLTWarning(Form("ROOT limitation! Cannot properly cleanup and unload the file"
1231           " '%s' since another library '%s' was loaded afterwards. Trying to unload"
1232           " this file will remove the other library and lead to serious memory faults.",
1233           filename, token.Data()
1234       ));
1235       return 0;
1236     }
1237
1238     // If we did not compile the trigger logic then remove the interpreted class.
1239     TString cmd = ".U ";
1240     cmd += filename;
1241     Int_t errorcode = TInterpreter::kNoError;
1242     gROOT->ProcessLine(cmd, &errorcode);
1243     if (errorcode != TInterpreter::kNoError)
1244     {
1245       HLTFatal("Could not unload interpreted global trigger menu implementation"
1246                " (Interpreter error code = %d).",
1247                errorcode
1248       );
1249       return -ENOENT;
1250     }
1251   }
1252
1253   return 0;
1254 }
1255
1256
1257 int AliHLTGlobalTriggerComponent::FindSymbol(const char* name, const TClonesArray& list)
1258 {
1259   // Searches for the named symbol in the given list.
1260   // See header for more details.
1261
1262   for (int i = 0; i < list.GetEntriesFast(); i++)
1263   {
1264     const AliHLTTriggerMenuSymbol* symbol = dynamic_cast<const AliHLTTriggerMenuSymbol*>( list.UncheckedAt(i) );
1265     if (symbol == NULL) continue;
1266     if (strcmp(symbol->Name(), name) == 0) return i;
1267   }
1268   return -1;
1269 }
1270
1271
1272 int AliHLTGlobalTriggerComponent::BuildSymbolList(const AliHLTTriggerMenu* menu, TClonesArray& list)
1273 {
1274   // Builds the list of symbols to use in the custom global trigger menu
1275   // implementation class.
1276   // See header for more details.
1277
1278   // Note: when we build the symbol list we must use the symbol name as returned
1279   // by the Name() method and not the RealName() method when using FindSymbol.
1280   // This is so that we avoid problems with the generated code not compiling
1281   // because names like "abc-xyz" and "abc_xyz" are synonymous.
1282   // Name() returns the converted C++ symbol name as used in the generated code.
1283
1284   for (UInt_t i = 0; i < menu->NumberOfSymbols(); i++)
1285   {
1286     const AliHLTTriggerMenuSymbol* symbol = menu->Symbol(i);
1287     if (FindSymbol(symbol->Name(), list) != -1)
1288     {
1289       HLTError("Multiple symbols with the name '%s' defined in the trigger menu.", symbol->Name());
1290       return -EIO;
1291     }
1292     new (list[list.GetEntriesFast()]) AliHLTTriggerMenuSymbol(*symbol);
1293   }
1294
1295   TRegexp exp("[_a-zA-Z][-_a-zA-Z0-9]*");
1296   TRegexp hexexp("x[a-fA-F0-9]+");
1297   for (UInt_t i = 0; i < menu->NumberOfItems(); i++)
1298   {
1299     const AliHLTTriggerMenuItem* item = menu->Item(i);
1300     TString str = item->TriggerCondition();
1301     Ssiz_t start = 0;
1302     do
1303     {
1304       Ssiz_t length = 0;
1305       Ssiz_t pos = exp.Index(str, &length, start);
1306       if (pos == kNPOS) break;
1307       start = pos+length;
1308
1309       // Check if there is a numerical character before the found
1310       // regular expression. If so, then the symbol is not a valid one
1311       // and should be skipped.
1312       if (pos > 0)
1313       {
1314         bool notValid = false;
1315         switch (str[pos-1])
1316         {
1317         case '0': case '1': case '2': case '3': case '4':
1318         case '5': case '6': case '7': case '8': case '9':
1319           notValid = true;
1320           break;
1321         default:
1322           notValid = false;
1323           break;
1324         }
1325         if (notValid) continue;
1326       }
1327       TString s = str(pos, length);
1328
1329       if (s == "and" or s == "and_eq" or s == "bitand" or s == "bitor" or
1330           s == "compl" or s == "not" or s == "not_eq" or s == "or" or
1331           s == "or_eq" or s == "xor" or s == "xor_eq" or s == "true" or
1332           s == "false"
1333          )
1334       {
1335         // Ignore iso646.h and other keywords.
1336         continue;
1337       }
1338
1339       // Need to create the symbols first and check if its name is in the list
1340       // before actually adding it to the symbols list.
1341       AliHLTTriggerMenuSymbol newSymbol;
1342       newSymbol.Name(s.Data());
1343       newSymbol.Type("bool");
1344       newSymbol.ObjectClass("AliHLTTriggerDecision");
1345       newSymbol.AssignExpression("this->Result()");
1346       newSymbol.DefaultValue("false");
1347       if (FindSymbol(newSymbol.Name(), list) == -1)
1348       {
1349         new (list[list.GetEntriesFast()]) AliHLTTriggerMenuSymbol(newSymbol);
1350       }
1351     }
1352     while (start < str.Length());
1353   }
1354
1355   return 0;
1356 }
1357
1358
1359 bool AliHLTGlobalTriggerComponent::ExtractedOperator(TString& expr, TString& op)
1360 {
1361   // Extracts the trailing operator from the expression.
1362
1363   Ssiz_t i = 0;
1364   // First skip the trailing whitespace.
1365   bool whitespace = true;
1366   for (i = expr.Length()-1; i >= 0 and whitespace; i--)
1367   {
1368     switch (expr[i])
1369     {
1370     case ' ': case '\t': case '\r': case '\n':
1371       whitespace = true;
1372       break;
1373     default:
1374       whitespace = false;
1375     }
1376   }
1377   if (i < 0 or whitespace) return false;
1378
1379   // Now find the first whitespace character before the trailing symbol.
1380   bool nonwhitespace = true;
1381   for (; i >= 0 and nonwhitespace; i--)
1382   {
1383     switch (expr[i])
1384     {
1385     case ' ': case '\t': case '\r': case '\n':
1386       nonwhitespace = false;
1387       break;
1388     default:
1389       nonwhitespace = true;
1390     }
1391   }
1392   if (i < 0 or nonwhitespace) return false;
1393
1394   // Extract the last symbols and check if it is a valid operator.
1395   TString s = expr;
1396   s.Remove(0, i+2);
1397   if (s == "and" or s == "and_eq" or s == "bitand" or s == "bitor" or
1398       s == "compl" or s == "not" or s == "not_eq" or s == "or" or
1399       s == "or_eq" or s == "xor" or s == "xor_eq" or s == "&&" or
1400       s == "&=" or s == "&" or s == "|" or s == "~" or s == "!" or
1401       s == "!=" or s == "||" or s == "|=" or s == "^" or s == "^=" or
1402       s == "==" or s == "+" or s == "-" or s == "*" or s == "/" or
1403       s == "%" or s == ">" or s == "<" or s == ">=" or s == "<="
1404      )
1405   {
1406     expr.Remove(i+1);
1407     op = s;
1408     return true;
1409   }
1410
1411   return false;
1412 }
1413
1414
1415 int AliHLTGlobalTriggerComponent::PrintStatistics(const AliHLTGlobalTrigger* pTrigger, AliHLTComponentLogSeverity level, int offset) const
1416 {
1417   // print some statistics
1418   int totalEvents=GetEventCount()+offset;
1419   const TArrayL64& counters = pTrigger->GetCounters();
1420   if (pTrigger->CallFailed()) return -EPROTO;
1421   for (int i = 0; i < counters.GetSize(); i++) {
1422     ULong64_t count = counters[i];
1423     float ratio=0;
1424     if (totalEvents>0) ratio=100*(float)count/totalEvents;
1425     HLTLog(level, "Item %d: total events: %d - counted events: %llu (%.1f%%)", i, totalEvents, count, ratio);
1426   }
1427   return 0;
1428 }
1429
1430 int AliHLTGlobalTriggerComponent::AddCTPDecisions(AliHLTGlobalTrigger* pTrigger, const AliHLTCTPData* pCTPData, const AliHLTComponentTriggerData* trigData)
1431 {
1432   // add trigger decisions for the valid CTP classes
1433   if (!pCTPData || !pTrigger) return 0;
1434
1435   AliHLTUInt64_t triggerMask=pCTPData->Mask();
1436   AliHLTUInt64_t bit0=0x1;
1437   if (!fCTPDecisions) {
1438     fCTPDecisions=new TClonesArray(AliHLTTriggerDecision::Class(), gkNCTPTriggerClasses);
1439     if (!fCTPDecisions) return -ENOMEM;
1440
1441     fCTPDecisions->ExpandCreate(gkNCTPTriggerClasses);
1442     for (int i=0; i<gkNCTPTriggerClasses; i++) {
1443       const char* name=pCTPData->Name(i);
1444       if (triggerMask&(bit0<<i) && name) {
1445         AliHLTTriggerDecision* pDecision=dynamic_cast<AliHLTTriggerDecision*>(fCTPDecisions->At(i));
1446         assert(pDecision);
1447         if (!pDecision) {
1448           delete fCTPDecisions;
1449           fCTPDecisions=NULL;
1450           return -ENOENT;
1451         }
1452         pDecision->Name(name);
1453       }
1454     }
1455   }
1456
1457   for (int i=0; i<gkNCTPTriggerClasses; i++) {
1458     const char* name=pCTPData->Name(i);
1459     if ((triggerMask&(bit0<<i))==0 || name==NULL) continue;
1460     AliHLTTriggerDecision* pDecision=dynamic_cast<AliHLTTriggerDecision*>(fCTPDecisions->At(i));
1461     HLTDebug("updating CTP trigger decision %d %s (%p casted %p)", i, name, fCTPDecisions->At(i), pDecision);
1462     if (!pDecision) return -ENOENT;
1463
1464     bool result=false;
1465     if (trigData) result=pCTPData->EvaluateCTPTriggerClass(name, *trigData);
1466     else result=pCTPData->EvaluateCTPTriggerClass(name);
1467     pDecision->Result(result);
1468     pDecision->TriggerDomain().Clear();
1469     if (trigData) pDecision->TriggerDomain().Add(pCTPData->ReadoutList(*trigData));
1470     else pDecision->TriggerDomain().Add(pCTPData->ReadoutList());
1471
1472     pTrigger->Add(fCTPDecisions->At(i), kAliHLTDataTypeTriggerDecision, kAliHLTVoidDataSpec);
1473     if (pTrigger->CallFailed()) return -EPROTO;
1474   }
1475
1476   return 0;
1477 }