EMCAL/AliEMCALDigitizer.cxx

   1 /**************************************************************************
   2  * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
   3  *                                                                        *
   4  * Author: The ALICE Off-line Project.                                    *
   5  * Contributors are mentioned in the code where appropriate.              *
   6  *                                                                        *
   7  * Permission to use, copy, modify and distribute this software and its   *
   8  * documentation strictly for non-commercial purposes is hereby granted   *
   9  * without fee, provided that the above copyright notice appears in all   *
  10  * copies and that both the copyright notice and this permission notice   *
  11  * appear in the supporting documentation. The authors make no claims     *
  12  * about the suitability of this software for any purpose. It is          *
  13  * provided "as is" without express or implied warranty.                  *
  14  **************************************************************************/
  15
  16 /* $Id$ */
  17
  18 //_________________________________________________________________________
  19 //
  20 //////////////////////////////////////////////////////////////////////////////
  21 // Class performs digitization of Summable digits
  22 //
  23 // In addition it performs mixing of summable digits from different events.
  24 //
  25 // For each event two branches are created in TreeD:
  26 //   "EMCAL" - list of digits
  27 //   "AliEMCALDigitizer" - AliEMCALDigitizer with all parameters used in digitization
  28 //
  29 // Note, that one cset title for new digits branch, and repeat digitization with
  30 // another set of parameters.
  31 //
  32 // Examples of use:
  33 // root[0] AliEMCALDigitizer * d = new AliEMCALDigitizer() ;
  34 // root[1] d->ExecuteTask()
  35 // Warning in <TDatabasePDG::TDatabasePDG>: object already instantiated
  36 //                       //Digitizes SDigitis in all events found in file galice.root
  37 //
  38 // root[2] AliEMCALDigitizer * d1 = new AliEMCALDigitizer("galice1.root") ;
  39 //                       // Will read sdigits from galice1.root
  40 // root[3] d1->MixWith("galice2.root")
  41 // Warning in <TDatabasePDG::TDatabasePDG>: object already instantiated
  42 //                       // Reads another portion of sdigits from galice2.root
  43 // root[3] d1->MixWith("galice3.root")
  44 //                       // Reads another portion of sdigits from galice3.root
  45 // root[4] d->ExecuteTask("deb timing")
  46 //                       // Reads SDigits from files galice1.root, galice2.root ....
  47 //                       // mixes them and stores produced Digits in file galice1.root
  48 //                       // deb - prints number of produced digits
  49 //                       // deb all - prints list of produced digits
  50 //                       // timing  - prints time used for digitization
  51 ////////////////////////////////////////////////////////////////////////////////////
  52 //
  53 //*-- Author: Sahal Yacoob (LBL)
  54 // based on : AliEMCALDigitizer
  55 // Modif:
  56 //  August 2002 Yves Schutz: clone PHOS as closely as possible and intoduction
  57 //                           of new  IO (à la PHOS)
  58 ///_________________________________________________________________________________
  59
  60 // --- ROOT system ---
  61 #include "TFile.h"
  62 #include "TTree.h"
  63 #include "TSystem.h"
  64 #include "TROOT.h"
  65 #include "TFolder.h"
  66 #include "TObjString.h"
  67 #include "TGeometry.h"
  68 #include "TBenchmark.h"
  69
  70 // --- Standard library ---
  71
  72 // --- AliRoot header files ---
  73 #include "AliRun.h"
  74 #include "AliHeader.h"
  75 #include "AliStream.h"
  76 #include "AliRunDigitizer.h"
  77 #include "AliEMCALDigit.h"
  78 #include "AliEMCAL.h"
  79 #include "AliEMCALGetter.h"
  80 #include "AliEMCALDigitizer.h"
  81 #include "AliEMCALSDigitizer.h"
  82 #include "AliEMCALGeometry.h"
  83 #include "AliEMCALTick.h"
  84
  85 ClassImp(AliEMCALDigitizer)
  86
  87
  88 //____________________________________________________________________________
  89   AliEMCALDigitizer::AliEMCALDigitizer()
  90 {
  91   // ctor
  92   //InitParameters() ;
  93   fDefaultInit = kTRUE ;
  94   fManager = 0 ;                     // We work in the standalong mode
  95
  96 }
  97
  98 //____________________________________________________________________________
  99 AliEMCALDigitizer::AliEMCALDigitizer(const char *headerFile, const char *name, const Bool_t toSplit)
 100 {
 101   // ctor
 102
 103   SetTitle(headerFile) ;
 104   SetName(name) ;
 105   fManager = 0 ;                     // We work in the standalong mode
 106   fSplitFile= 0 ;
 107   fToSplit = toSplit ;
 108   Init() ;
 109   InitParameters() ;
 110   fDefaultInit = kFALSE ;
 111 }
 112
 113 //____________________________________________________________________________
 114 AliEMCALDigitizer::AliEMCALDigitizer(AliRunDigitizer * ard):AliDigitizer(ard)
 115 {
 116   // ctor
 117   SetTitle(ard->GetInputFileName(0,0)) ;
 118   InitParameters() ;
 119   fDefaultInit = kFALSE ;
 120   fSplitFile   = 0 ;
 121
 122   if (ard->GetOutputFile()) {
 123     SetName(ard->GetOutputFile().Data());
 124     fToSplit = kTRUE ;
 125   } else {
 126     SetName("Default") ;
 127     fToSplit = kFALSE ;
 128   }
 129 }
 130
 131 //____________________________________________________________________________
 132   AliEMCALDigitizer::~AliEMCALDigitizer()
 133 {
 134   // dtor
 135
 136     fSplitFile = 0 ;
 137 }
 138
 139 //____________________________________________________________________________
 140 void AliEMCALDigitizer::Digitize(const Int_t event)
 141 {
 142
 143   // Makes the digitization of the collected summable digits
 144   // for this it first creates the array of all EMCAL modules
 145   // filled with noise (different for EMC, CPV and PPSD) and
 146   // after that adds contributions from SDigits. This design
 147   // helps to avoid scanning over the list of digits to add
 148   // contribution of any new SDigit.
 149
 150   AliEMCALGetter * gime = AliEMCALGetter::GetInstance() ;
 151   TClonesArray * digits = gime->Digits(GetName()) ;
 152
 153   digits->Clear() ;
 154
 155   const AliEMCALGeometry *geom = gime->EMCALGeometry() ;
 156   //Making digits with noise, first EMC
 157   Int_t nEMC = 0 ;
 158   if (geom->GetNHCLayers() > 0 )
 159     nEMC = 3*geom->GetNPhi()*geom->GetNZ(); //max number of digits possible (Preshower, ECAL, HCAL)
 160   else
 161     nEMC = 2*geom->GetNPhi()*geom->GetNZ(); //max number of digits possible (Preshower, ECAL)
 162
 163  Int_t absID ;
 164   TString name      =  geom->GetName() ;
 165
 166  // get first the sdigitizer from the tasks list (must have same name as the digitizer)
 167   const AliEMCALSDigitizer * sDigitizer = gime->SDigitizer(GetName());
 168   if ( !sDigitizer) {
 169     Fatal("Digitize", "SDigitizer with name %s not found", GetName() );
 170   }
 171
 172 // loop through the sdigits posted to the White Board and add them to the noise
 173   TCollection * folderslist = gime->SDigitsFolder()->GetListOfFolders() ;
 174   TIter next(folderslist) ;
 175   TFolder * folder = 0 ;
 176   TClonesArray * sdigits = 0 ;
 177   Int_t input = 0 ;
 178   TObjArray * sdigArray = new TObjArray(2) ;
 179   while ( (folder = (TFolder*)next()) ) {
 180     if ( (sdigits = (TClonesArray*)folder->FindObject(GetName()) ) ) {
 181       TString fileName(folder->GetName()) ;
 182       fileName.ReplaceAll("_","/") ;
 183       if (gDebug)
 184         Info("Digitize", "Adding SDigits %s from %s", GetName(), fileName.Data()) ;
 185       sdigArray->AddAt(sdigits, input) ;
 186       input++ ;
 187     }
 188   }
 189
 190   //Find the first tower with signal
 191   Int_t nextSig = nEMC + 1 ;
 192   Int_t i;
 193   for(i=0; i<input; i++){
 194     sdigits = (TClonesArray *)sdigArray->At(i) ;
 195     if ( !sdigits->GetEntriesFast() )
 196       continue ;
 197     Int_t curNext = ((AliEMCALDigit *)sdigits->At(0))->GetId() ;
 198      if(curNext < nextSig)
 199        nextSig = curNext ;
 200   }
 201
 202   TArrayI index(input) ;
 203   index.Reset() ;  //Set all indexes to zero
 204
 205   AliEMCALDigit * digit ;
 206   AliEMCALDigit * curSDigit ;
 207
 208   TClonesArray * ticks = new TClonesArray("AliEMCALTick",1000) ;
 209
 210   //Put Noise contribution
 211   for(absID = 1; absID <= nEMC; absID++){
 212     Float_t amp = 0 ;
 213     //    Float_t noise = TMath::Abs(gRandom->Gaus(0., fPinNoise));
 214     //new((*digits)[absID-1]) AliEMCALDigit( -1, -1, absID, sDigitizer->Digitize(noise), TimeOfNoise() ) ;
 215     // amplitude set to zero, noise will be added later
 216     new((*digits)[absID-1]) AliEMCALDigit( -1, -1, absID, 0, TimeOfNoise() ) ;
 217     //look if we have to add signal?
 218     digit = (AliEMCALDigit *) digits->At(absID-1) ;
 219     if(absID==nextSig){
 220       //Add SDigits from all inputs
 221       ticks->Clear() ;
 222       Int_t contrib = 0 ;
 223       Float_t a = digit->GetAmp() ;
 224       Float_t b = TMath::Abs( a /fTimeSignalLength) ;
 225       //Mark the beginnign of the signal
 226       new((*ticks)[contrib++]) AliEMCALTick(digit->GetTime(),0, b);
 227       //Mark the end of the ignal
 228       new((*ticks)[contrib++]) AliEMCALTick(digit->GetTime()+fTimeSignalLength, -a, -b);
 229
 230  // loop over input
 231       for(i = 0; i< input ; i++){  //loop over (possible) merge sources
 232         if(((TClonesArray *)sdigArray->At(i))->GetEntriesFast() > index[i] )
 233           curSDigit = (AliEMCALDigit*)((TClonesArray *)sdigArray->At(i))->At(index[i]) ;
 234         else
 235           curSDigit = 0 ;
 236         //May be several digits will contribute from the same input
 237         while(curSDigit && curSDigit->GetId() == absID){
 238           //Shift primary to separate primaries belonging different inputs
 239           Int_t primaryoffset ;
 240           if(fManager)
 241             primaryoffset = fManager->GetMask(i) ;
 242           else
 243             primaryoffset = i ;
 244           curSDigit->ShiftPrimary(primaryoffset) ;
 245
 246           a = curSDigit->GetAmp() ;
 247           b = a /fTimeSignalLength ;
 248           new((*ticks)[contrib++]) AliEMCALTick(curSDigit->GetTime(),0, b);
 249           new((*ticks)[contrib++]) AliEMCALTick(curSDigit->GetTime()+fTimeSignalLength, -a, -b);
 250
 251           *digit = *digit + *curSDigit ;  //add energies
 252
 253           index[i]++ ;
 254           if(((TClonesArray *)sdigArray->At(i))->GetEntriesFast() > index[i] )
 255             curSDigit = (AliEMCALDigit*)((TClonesArray *)sdigArray->At(i))->At(index[i]) ;
 256           else
 257             curSDigit = 0 ;
 258         }
 259       }
 260       // add fluctuations for photo-electron creation
 261       amp = sDigitizer->Calibrate(digit->GetAmp()) ; // GeV
 262       if (gDebug==1)
 263         Info("Digitize", "id = %d BEFORE amp = %f\n", digit->GetId(),amp) ;
 264       amp *= static_cast<Float_t>(gRandom->Poisson(fMeanPhotonElectron)) / static_cast<Float_t>(fMeanPhotonElectron) ;
 265       if (gDebug==1)
 266         Info("Digitize", "After fluctuation amp = %f\n", amp) ;
 267       //calculate and set time
 268       Float_t time = FrontEdgeTime(ticks) ;
 269       digit->SetTime(time) ;
 270
 271       //Find next signal module
 272       nextSig = nEMC + 1 ;
 273       for(i=0; i<input; i++){
 274         sdigits = ((TClonesArray *)sdigArray->At(i)) ;
 275         Int_t curNext = nextSig ;
 276         if(sdigits->GetEntriesFast() > index[i] ){
 277           curNext = ((AliEMCALDigit *) sdigits->At(index[i]))->GetId() ;
 278
 279         }
 280         if(curNext < nextSig) nextSig = curNext ;
 281       }
 282     }
 283     // add the noise now
 284
 285     if (geom->IsInECAL(digit->GetId()))
 286       amp += TMath::Abs(gRandom->Gaus(0., fPinNoise)) ;
 287     else if (geom->IsInPRE(digit->GetId()))
 288       amp += TMath::Abs(gRandom->Gaus(0., fPinNoise/100.)) ; // arbitrarely divide by 100, assuming that the gain of APD will be higher
 289     else if (geom->IsInHCAL(digit->GetId()))
 290       amp += TMath::Abs(gRandom->Gaus(0., fPinNoise/10.)) ;  // arbitrarely divide by 10, assuming that the gain of APD will be higher
 291    if (gDebug==1)
 292       Info("Digitize", "After noise amp = %f \n", amp) ;
 293     digit->SetAmp(sDigitizer->Digitize(amp)) ;
 294   }
 295
 296   ticks->Delete() ;
 297   delete ticks ;
 298
 299   delete sdigArray ; //We should not delete its contents
 300
 301   //remove digits below thresholds
 302   for(absID = 0; absID < nEMC; absID++){
 303     digit = dynamic_cast<AliEMCALDigit*>( digits->At(absID) ) ;
 304     Float_t threshold = 0 ;
 305
 306     if (geom->IsInECAL(digit->GetId()))
 307       threshold = fDigitThreshold ;
 308     else  if (geom->IsInPRE(digit->GetId()))
 309       threshold = fDigitThreshold / 100. ; // arbitrary see before when noise is added
 310     else  if (geom->IsInHCAL(digit->GetId()))
 311       threshold = fDigitThreshold / 10. ; // arbitrary see before when noise is added
 312
 313     if(sDigitizer->Calibrate( digit->GetAmp() ) <= threshold)
 314       digits->RemoveAt(absID) ;
 315     else {
 316       if (gDebug == 1)
 317         Info("Digitize", "id = %d, amp = %f, noise = %f", absID, sDigitizer->Calibrate(digit->GetAmp()), fPinNoise) ;
 318       digit->SetTime(gRandom->Gaus(digit->GetTime(),fTimeResolution) ) ;
 319     }
 320   }
 321
 322   digits->Compress() ;
 323
 324   Int_t ndigits = digits->GetEntriesFast() ;
 325   //  digits->Expand(ndigits) ;
 326
 327   //Set indexes in list of digits
 328   for (i = 0 ; i < ndigits ; i++) {
 329     digit = dynamic_cast<AliEMCALDigit *>( digits->At(i) ) ;
 330     digit->SetIndexInList(i) ;
 331     Float_t energy = sDigitizer->Calibrate(digit->GetAmp()) ;
 332     digit->SetAmp(DigitizeEnergy(energy,digit->GetId()) ) ;
 333   }
 334 }
 335
 336 //____________________________________________________________________________
 337
 338 Int_t AliEMCALDigitizer::DigitizeEnergy(Float_t energy, Int_t absId)
 339 {
 340   Int_t channel = -999;
 341   AliEMCALGeometry * geom = AliEMCALGetter::GetInstance()->EMCALGeometry() ;
 342
 343   if(geom->IsInPRE(absId)){        //digitize as PRE section
 344     channel =  static_cast<Int_t>(TMath::Ceil( (energy + fADCpedestalPRE)/fADCchannelPRE ))  ;
 345     if(channel > fNADCPRE )
 346       channel =  fNADCPRE ;
 347   }
 348   else if(geom->IsInECAL(absId)){  //digitize as ECAL section
 349     channel = static_cast<Int_t> (TMath::Ceil( (energy + fADCpedestalEC)/fADCchannelEC ))  ;
 350     if(channel > fNADCEC )
 351       channel =  fNADCEC ;
 352   }
 353   else if(geom->IsInHCAL(absId)){  //digitize as HCAL section
 354     channel = static_cast<Int_t> (TMath::Ceil( (energy + fADCpedestalHC)/fADCchannelHC ))  ;
 355     if(channel > fNADCHC )
 356       channel =  fNADCHC ;
 357   }
 358
 359   return channel ;
 360 }
 361
 362 //____________________________________________________________________________
 363 void AliEMCALDigitizer::Exec(Option_t *option)
 364 {
 365   // Managing method
 366
 367   if(strcmp(GetName(), "") == 0 )
 368     Init() ;
 369   if (strstr(option,"print")) {
 370     Print("");
 371     return ;
 372   }
 373
 374   if(strstr(option,"tim"))
 375     gBenchmark->Start("EMCALDigitizer");
 376
 377   AliEMCALGetter * gime = AliEMCALGetter::GetInstance() ;
 378
 379   Int_t nevents ;
 380
 381   TTree * treeD ;
 382
 383   if(fManager){
 384     treeD = fManager->GetTreeD() ;
 385     nevents = 1 ;    // Will process only one event
 386
 387     //Check, if this branch already exits
 388     if (treeD) {
 389       TObjArray * lob = (TObjArray*)treeD->GetListOfBranches() ;
 390       TIter next(lob) ;
 391       TBranch * branch = 0 ;
 392       Bool_t emcalfound = kFALSE, digitizerfound = kFALSE ;
 393
 394       while ( (branch = (TBranch*)next()) && (!emcalfound || !digitizerfound) ) {
 395         if ( (strcmp(branch->GetName(), "EMCAL")==0) &&
 396              (strcmp(branch->GetTitle(), GetName())==0) )
 397           emcalfound = kTRUE ;
 398
 399         else if ( (strcmp(branch->GetName(), "AliEMCALDigitizer")==0) &&
 400                   (strcmp(branch->GetTitle(), GetName())==0) )
 401           digitizerfound = kTRUE ;
 402       }
 403
 404       if ( emcalfound ) {
 405         Error( "Exec", "Digits branch with name %s already exits", GetName() ) ;
 406         return ;
 407       }
 408       if ( digitizerfound ) {
 409         Error( "Exec", "Digitizer branch with name %s already exit", GetName() ) ;
 410                return ;
 411       }
 412     }
 413   }
 414   else { //EMCAL standalone
 415     if(gime->BranchExists("Digits") )
 416       return ;
 417     nevents=gime->MaxEvent() ;
 418   }
 419
 420   Int_t ievent ;
 421
 422   for(ievent = 0; ievent < nevents; ievent++){
 423
 424     if(fManager){
 425
 426       Int_t input ;
 427       for(input = 0 ; input < fManager->GetNinputs(); input ++){
 428         TTree * treeS = fManager->GetInputTreeS(input) ;
 429         if(!treeS){
 430           Error( "Exec", "No Input") ;
 431           return ;
 432         }
 433         gime->ReadTreeS(treeS,input) ;
 434       }
 435
 436     }
 437     else
 438       gime->Event(ievent,"S") ;
 439
 440     Digitize(ievent) ; //Add prepared SDigits to digits and add the noise
 441
 442     WriteDigits(ievent) ;
 443
 444     if(strstr(option,"deb"))
 445       PrintDigits(option);
 446
 447     //increment the total number of Digits per run
 448     fDigitsInRun += gime->Digits()->GetEntriesFast() ;
 449   }
 450
 451   if(strstr(option,"tim")){
 452     gBenchmark->Stop("EMCALDigitizer");
 453     Info("Exec", "took %f seconds for Digitizing %f seconds per event",
 454          gBenchmark->GetCpuTime("EMCALDigitizer"), gBenchmark->GetCpuTime("EMCALDigitizer")/nevents ) ;
 455   }
 456
 457 }
 458
 459 //____________________________________________________________________________
 460 Float_t AliEMCALDigitizer::FrontEdgeTime(TClonesArray * ticks)
 461 { //
 462   ticks->Sort() ; //Sort in accordance with times of ticks
 463   TIter it(ticks) ;
 464   AliEMCALTick * ctick = (AliEMCALTick *) it.Next() ;
 465   Float_t time = ctick->CrossingTime(fTimeThreshold) ;
 466
 467   AliEMCALTick * t ;
 468   while((t=(AliEMCALTick*) it.Next())){
 469     if(t->GetTime() < time)  //This tick starts before crossing
 470       *ctick+=*t ;
 471     else
 472       return time ;
 473
 474     time = ctick->CrossingTime(fTimeThreshold) ;
 475   }
 476   return time ;
 477 }
 478
 479 //____________________________________________________________________________
 480 Bool_t AliEMCALDigitizer::Init()
 481 {
 482   // Makes all memory allocations
 483
 484   if( strcmp(GetTitle(), "") == 0 )
 485     SetTitle("galice.root") ;
 486
 487   AliEMCALGetter * gime = AliEMCALGetter::GetInstance(GetTitle(), GetName(), fToSplit) ;
 488   if ( gime == 0 ) {
 489     Error("Init", "Could not obtain the Getter object !" ) ;
 490     return kFALSE;
 491   }
 492
 493   //const AliEMCALGeometry * geom = gime->EMCALGeometry() ;
 494
 495   //fEmcCrystals = geom->GetNModules() *  geom->GetNCristalsInModule() ;
 496
 497   // Post Digits to the white board
 498   gime->PostDigits(GetName() ) ;
 499
 500   // Post Digitizer to the white board
 501   gime->PostDigitizer(this) ;
 502
 503   fSplitFile = 0 ;
 504   if(fToSplit){
 505     // construct the name of the file as /path/EMCAL.SDigits.root
 506     //First - extract full path if necessary
 507     TString digitsFileName(GetTitle()) ;
 508     Ssiz_t islash = digitsFileName.Last('/') ;
 509     if(islash<digitsFileName.Length())
 510       digitsFileName.Remove(islash+1,digitsFileName.Length()) ;
 511     else
 512       digitsFileName="" ;
 513     // Next - append the file name
 514     digitsFileName+="EMCAL.Digits." ;
 515     if((strcmp(GetName(),"Default")!=0)&&(strcmp(GetName(),"")!=0)){
 516       digitsFileName+=GetName() ;
 517       digitsFileName+="." ;
 518     }
 519     digitsFileName+="root" ;
 520     // Finally - check if the file already opened or open the file
 521     fSplitFile = static_cast<TFile*>(gROOT->GetFile(digitsFileName.Data()));
 522     if(!fSplitFile)
 523       fSplitFile =  TFile::Open(digitsFileName.Data(),"update") ;
 524   }
 525
 526   //Mark that we will use current header file
 527   if(!fManager){
 528     gime->PostSDigits(GetName(),GetTitle()) ;
 529     gime->PostSDigitizer(GetName(),GetTitle()) ;
 530   }
 531   return kTRUE ;
 532 }
 533
 534 //____________________________________________________________________________
 535 void AliEMCALDigitizer::InitParameters()
 536 {
 537   fMeanPhotonElectron = 1250 ; // electrons per GeV
 538
 539   Warning("InitParameters", "No noise added\n") ;
 540   fPinNoise           = 0. ; // 0.001 ; // noise equivalent GeV (random choice)
 541   fDigitThreshold     = fPinNoise * 3; //2 sigma
 542   fTimeResolution     = 0.5e-9 ;
 543   fTimeSignalLength   = 1.0e-9 ;
 544
 545   fADCchannelEC    = 0.000220;                     // width of one ADC channel in GeV
 546   fADCpedestalEC   = 0.005 ;                       // GeV
 547   fNADCEC          = (Int_t) TMath::Power(2,16) ;  // number of channels in Tower ADC
 548
 549   fADCchannelHC    = 0.000220;                     // width of one ADC channel in GeV
 550   fADCpedestalHC   = 0.005 ;                       // GeV
 551   fNADCHC          = (Int_t) TMath::Power(2,16) ;  // number of channels in Tower ADC
 552
 553   fADCchannelPRE   = 0.0000300;                    // width of one ADC channel in Pre Shower
 554   fADCpedestalPRE  = 0.005 ;                       // GeV
 555   fNADCPRE         = (Int_t) TMath::Power(2,12);   // number of channels in Pre ShowerADC
 556
 557   fTimeThreshold      = 0.001*10000000 ; //Means 1 MeV in terms of SDigits amplitude
 558
 559 }
 560
 561 //__________________________________________________________________
 562 void AliEMCALDigitizer::MixWith(char* headerFile)
 563 {
 564   // Allows to produce digits by superimposing background and signal event.
 565   // It is assumed, that headers file with SIGNAL events is opened in
 566   // the constructor.
 567   // Sets the BACKGROUND event, with which the SIGNAL event is to be mixed
 568   // Thus we avoid writing (changing) huge and expensive
 569   // backgound files: all output will be writen into SIGNAL, i.e.
 570   // opened in constructor file.
 571   //
 572   // One can open as many files to mix with as one needs.
 573   // However only Sdigits with the same name (i.e. constructed with the same SDigitizer)
 574   // can be mixed.
 575
 576   if( strcmp(GetName(), "") == 0 )
 577     Init() ;
 578
 579   if(fManager){
 580     Error("MixWith", "Cannot use this method under AliRunDigitizer") ;
 581     return ;
 582   }
 583
 584   // check if the specified SDigits do not already exist on the White Board:
 585   // //Folders/RunMC/Event/Data/EMCAL/SDigits/headerFile/sdigitsname
 586
 587   AliEMCALGetter * gime = AliEMCALGetter::GetInstance() ;
 588   TString path = gime->SDigitsFolder()->GetName() ;
 589
 590   // before it was ???? "Folders/RunMC/Event/Data/EMCAL/SDigits" ;
 591   path += headerFile ;
 592   path += "/" ;
 593   path += GetName() ;
 594   if ( gROOT->FindObjectAny(path.Data()) ) {
 595     Error("MixWith", "Entry already exists, do not add" ) ;
 596     return;
 597   }
 598
 599   gime->PostSDigits(GetName(),headerFile) ;
 600
 601   // check if the requested file is already open or exist and if SDigits Branch exist
 602   TFile * file = (TFile*)gROOT->FindObject(headerFile);
 603   if ( !file ) {
 604     file = new TFile(headerFile, "READ") ;
 605     if (!file) {
 606       Error("MixWith", "File %s does not exist!", headerFile) ;
 607       return ;
 608     }
 609   }
 610
 611 }
 612
 613 //__________________________________________________________________
 614 void AliEMCALDigitizer::Print(Option_t* option)const {
 615
 616   TString message("\n") ;
 617
 618   if( strcmp(GetName(), "") != 0) {
 619     message += "------------------- " ;
 620     message += GetName() ;
 621     message += " -------------" ;
 622     const Int_t nStreams = GetNInputStreams() ;
 623     if (nStreams) {
 624       Int_t index = 0 ;
 625       for (index = 0 ; index < nStreams ; index++) {
 626         message += "\nAdding SDigits " ;
 627         message += GetName() ;
 628         message += " from " ;
 629         message += fManager->GetInputFileName(index, 0) ;
 630       }
 631
 632       message += "\nWriting digits to " ;
 633       message += fManager->GetInputFileName(0, 0) ;
 634     } else {
 635       message += "\nWriting digits to " ;
 636       message += GetTitle() ;
 637     }
 638     message += "\nWith following parameters: " ;
 639     message += "\n     Electronics noise in EMC (fPinNoise) = " ;
 640     message += fPinNoise ;
 641     message += "\n  Threshold  in EMC  (fDigitThreshold) = " ;
 642     message += fDigitThreshold  ;
 643     message += "\n---------------------------------------------------"  ;
 644   }
 645   else
 646     message += "\nAliEMCALDigitizer not initialized " ;
 647
 648   Info("Print", message.Data() ) ;
 649 }
 650
 651 //__________________________________________________________________
 652 void AliEMCALDigitizer::PrintDigits(Option_t * option){
 653
 654   AliEMCALGetter * gime = AliEMCALGetter::GetInstance() ;
 655   TClonesArray * fDigits = gime->Digits() ;
 656
 657   TString message("\n") ;
 658   message += "       Number of entries in Digits list " ;
 659   message += fDigits->GetEntriesFast() ;
 660
 661   if(strstr(option,"all")){
 662
 663     //loop over digits
 664     AliEMCALDigit * digit;
 665     message += "\n   Id  Amplitude    Time          Index Nprim: Primaries list \n" ;
 666     Int_t index ;
 667     char * tempo = new char[8192];
 668     for (index = 0 ; index < fDigits->GetEntries() ; index++) {
 669       digit = (AliEMCALDigit * )  fDigits->At(index) ;
 670       sprintf(tempo, "\n%6d  %8d    %6.5e %4d      %2d : ",
 671               digit->GetId(), digit->GetAmp(), digit->GetTime(), digit->GetIndexInList(), digit->GetNprimary()) ;
 672       message += tempo ;
 673       Int_t iprimary;
 674       for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
 675         sprintf(tempo, "%d ",digit->GetPrimary(iprimary+1) ) ;
 676         message += tempo ;
 677       }
 678     }
 679     delete tempo ;
 680   }
 681   Info("PrintDigits", message.Data() ) ;
 682 }
 683
 684 //__________________________________________________________________
 685 Float_t AliEMCALDigitizer::TimeOfNoise(void)
 686 {  // Calculates the time signal generated by noise
 687   //to be rewritten, now returns just big number
 688   return 1. ;
 689
 690 }
 691
 692 //_________________________________________________________________________________________
 693 void AliEMCALDigitizer::WriteDigits(Int_t event)
 694 {
 695
 696   // Makes TreeD in the output file.
 697   // Check if branch already exists:
 698   //   if yes, exit without writing: ROOT TTree does not support overwriting/updating of
 699   //      already existing branches.
 700   //   else creates branch with Digits, named "EMCAL", title "...",
 701   //      and branch "AliEMCALDigitizer", with the same title to keep all the parameters
 702   //      and names of files, from which digits are made.
 703
 704   AliEMCALGetter * gime = AliEMCALGetter::GetInstance() ;
 705   const TClonesArray * digits = gime->Digits(GetName()) ;
 706  TTree * treeD ;
 707
 708  if(fManager)
 709    treeD = fManager->GetTreeD() ;
 710  else {
 711    if ((gAlice->TreeD() == 0) || (fSplitFile)) // we should not create TreeD if it is already here
 712      gAlice->MakeTree("D", fSplitFile); // We overwrite TreeD in split file in the case of second reconstruction
 713    if(fSplitFile)
 714      fSplitFile->cd() ;
 715    treeD = gAlice->TreeD();
 716  }
 717
 718  // -- create Digits branch
 719  Int_t bufferSize = 32000 ;
 720  TBranch * digitsBranch = treeD->Branch("EMCAL",&digits,bufferSize);
 721  digitsBranch->SetTitle(GetName());
 722
 723  // -- Create Digitizer branch
 724  Int_t splitlevel = 0 ;
 725  const  AliEMCALDigitizer * d = gime->Digitizer(GetName()) ;
 726  TBranch * digitizerBranch = treeD->Branch("AliEMCALDigitizer", "AliEMCALDigitizer", &d,bufferSize,splitlevel);
 727  digitizerBranch->SetTitle(GetName());
 728
 729  digitsBranch->Fill() ;
 730  digitizerBranch->Fill() ;
 731  treeD->AutoSave() ;
 732
 733 }
 734