]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - PHOS/AliPHOSDigitizer.cxx
Bug fix of FPE caused by large trigger amplitudes in rare cases
[u/mrichter/AliRoot.git] / PHOS / AliPHOSDigitizer.cxx
index 2ecf2f65dfa1ccecfddcc33b7b70fc89bee29854..732d999d93daceb13bf9251828ab13902bb8b509 100644 (file)
 
 /* $Id$ */
 
+/* History of cvs commits:
+ *
+ * $Log: AliPHOSDigitizer.cxx,v $
+ * Revision 1.104  2007/12/18 09:08:18  hristov
+ * Splitting of the QA maker into simulation and reconstruction dependent parts (Yves)
+ *
+ * Revision 1.103  2007/11/07 11:25:06  schutz
+ * Comment out the QA checking before starting digitization
+ *
+ * Revision 1.102  2007/10/19 18:04:29  schutz
+ * The standalone QA data maker is called from AliSimulation and AliReconstruction outside the event loop; i.e. re-reading the data. The QA data making in the event loop has been commented out.
+ *
+ * Revision 1.101  2007/10/14 21:08:10  schutz
+ * Introduced the checking of QA results from previous step before entering the event loop
+ *
+ * Revision 1.100  2007/10/10 09:05:10  schutz
+ * Changing name QualAss to QA
+ *
+ * Revision 1.99  2007/09/30 17:08:20  schutz
+ * Introducing the notion of QA data acquisition cycle (needed by online)
+ *
+ * Revision 1.98  2007/09/26 14:22:17  cvetan
+ * Important changes to the reconstructor classes. Complete elimination of the run-loaders, which are now steered only from AliReconstruction. Removal of the corresponding Reconstruct() and FillESD() methods.
+ *
+ * Revision 1.97  2007/08/07 14:12:03  kharlov
+ * Quality assurance added (Yves Schutz)
+ *
+ * Revision 1.96  2007/04/28 10:43:36  policheh
+ * Dead channels simulation: digit energy sets to 0.
+ *
+ * Revision 1.95  2007/04/10 07:20:52  kharlov
+ * Decalibration should use the same CDB as calibration in AliPHOSClusterizerv1
+ *
+ * Revision 1.94  2007/02/01 10:34:47  hristov
+ * Removing warnings on Solaris x86
+ *
+ * Revision 1.93  2006/10/17 13:17:01  kharlov
+ * Replace AliInfo by AliDebug
+ *
+ * Revision 1.92  2006/08/28 10:01:56  kharlov
+ * Effective C++ warnings fixed (Timur Pocheptsov)
+ *
+ * Revision 1.91  2006/04/29 20:25:30  hristov
+ * Decalibration is implemented (Yu.Kharlov)
+ *
+ * Revision 1.90  2006/04/22 10:30:17  hristov
+ * Add fEnergy to AliPHOSDigit and operate with EMC amplitude in energy units (Yu.Kharlov)
+ *
+ * Revision 1.89  2006/04/11 15:22:59  hristov
+ * run number in query set to -1: forces AliCDBManager to use its run number (A.Colla)
+ *
+ * Revision 1.88  2006/03/13 14:05:43  kharlov
+ * Calibration objects for EMC and CPV
+ *
+ * Revision 1.87  2005/08/24 15:33:49  kharlov
+ * Calibration data for raw digits
+ *
+ * Revision 1.86  2005/07/12 20:07:35  hristov
+ * Changes needed to run simulation and reconstrruction in the same AliRoot session
+ *
+ * Revision 1.85  2005/05/28 14:19:04  schutz
+ * Compilation warnings fixed by T.P.
+ *
+ */
+
 //_________________________________________________________________________
 //*-- Author :  Dmitri Peressounko (SUBATECH & Kurchatov Institute) 
 //////////////////////////////////////////////////////////////////////////////
 //
 
 // --- ROOT system ---
-#include "TFile.h"
 #include "TTree.h"
 #include "TSystem.h"
-#include "TROOT.h"
-#include "TFolder.h"
-#include "TObjString.h"
 #include "TBenchmark.h"
+#include "TRandom.h"
+#include "TMath.h"
 
 // --- Standard library ---
-#include <iomanip.h>
 
 // --- AliRoot header files ---
-
-#include "AliRun.h"
+#include <TGeoManager.h>                                                                                                                   
+#include "AliLog.h"
+#include "AliRunDigitizer.h"
 #include "AliPHOSDigit.h"
-#include "AliPHOS.h"
-#include "AliPHOSGetter.h"
 #include "AliPHOSDigitizer.h"
-#include "AliPHOSSDigitizer.h"
 #include "AliPHOSGeometry.h"
+#include "AliPHOSTick.h"
+#include "AliPHOSSimParam.h"
+#include "AliPHOSCalibData.h"
+#include "AliRunLoader.h"
+#include "AliPHOSLoader.h"
+#include "AliPHOSPulseGenerator.h"
 
 ClassImp(AliPHOSDigitizer)
 
 
 //____________________________________________________________________________ 
-  AliPHOSDigitizer::AliPHOSDigitizer():TTask("","") 
+AliPHOSDigitizer::AliPHOSDigitizer() :
+  AliDigitizer("",""),
+  fDefaultInit(kTRUE),
+  fDigitsInRun(0),
+  fInit(kFALSE),
+  fInput(0),
+  fInputFileNames(0x0),
+  fEventNames(0x0),
+  fEmcCrystals(0),
+  fEventFolderName(""),
+  fFirstEvent(0),
+  fLastEvent(0), 
+  fcdb(0x0),
+  fEventCounter(0),
+  fPulse(0),
+  fADCValuesLG(0),
+  fADCValuesHG(0)
 {
   // ctor
-
-  fPinNoise           = 0.01 ;
-  fEMCDigitThreshold  = 0.01 ;
-  fCPVNoise           = 0.01;
-  fCPVDigitThreshold  = 0.09 ;
-  fPPSDNoise          = 0.0000001;
-  fPPSDDigitThreshold = 0.0000002 ;  
-
+  InitParameters() ; 
+  fManager = 0 ;                     // We work in the standalong mode
 }
 
 //____________________________________________________________________________ 
-AliPHOSDigitizer::AliPHOSDigitizer(const char *headerFile,const char * name):
-  TTask(name, headerFile)
+AliPHOSDigitizer::AliPHOSDigitizer(TString alirunFileName, 
+                                  TString eventFolderName):
+  AliDigitizer("PHOS"+AliConfig::Instance()->GetDigitizerTaskName(), alirunFileName), 
+  fDefaultInit(kFALSE),
+  fDigitsInRun(0),
+  fInit(kFALSE),
+  fInput(0),
+  fInputFileNames(0x0),
+  fEventNames(0x0),
+  fEmcCrystals(0),
+  fEventFolderName(eventFolderName),
+  fFirstEvent(0),
+  fLastEvent(0), 
+  fcdb(0x0),
+  fEventCounter(0),
+  fPulse(0),
+  fADCValuesLG(0),
+  fADCValuesHG(0)
 {
   // ctor
-   
-  fPinNoise           = 0.01 ;
-  fEMCDigitThreshold  = 0.01 ;
-  fCPVNoise           = 0.01;
-  fCPVDigitThreshold  = 0.09 ;
-  fPPSDNoise          = 0.0000001;
-  fPPSDDigitThreshold = 0.0000002 ;  
-
+  InitParameters() ; 
   Init() ;
-  
+  fDefaultInit = kFALSE ; 
+  fManager = 0 ;                     // We work in the standalone mode
+  fcdb = new AliPHOSCalibData(-1);
+}
+
+//____________________________________________________________________________ 
+AliPHOSDigitizer::AliPHOSDigitizer(const AliPHOSDigitizer & d) : 
+  AliDigitizer(d),
+  fDefaultInit(d.fDefaultInit),
+  fDigitsInRun(d.fDigitsInRun),
+  fInit(d.fInit),
+  fInput(d.fInput),
+  fInputFileNames(0x0),//?
+  fEventNames(0x0),//?
+  fEmcCrystals(d.fEmcCrystals),
+  fEventFolderName(d.fEventFolderName),
+  fFirstEvent(d.fFirstEvent),
+  fLastEvent(d.fLastEvent), 
+  fcdb (0x0), 
+  fEventCounter(0),
+  fPulse(0),
+  fADCValuesLG(0),
+  fADCValuesHG(0)
+{
+  // copyy ctor 
+  SetName(d.GetName()) ; 
+  SetTitle(d.GetTitle()) ; 
+  fcdb = new AliPHOSCalibData(-1);
+}
+
+//____________________________________________________________________________ 
+AliPHOSDigitizer::AliPHOSDigitizer(AliRunDigitizer * rd) :
+  AliDigitizer(rd,"PHOS"+AliConfig::Instance()->GetDigitizerTaskName()),
+  fDefaultInit(kFALSE),
+  fDigitsInRun(0),
+  fInit(kFALSE),
+  fInput(0),
+  fInputFileNames(0x0),
+  fEventNames(0x0),
+  fEmcCrystals(0),
+  fEventFolderName(fManager->GetInputFolderName(0)),
+  fFirstEvent(0),
+  fLastEvent(0), 
+  fcdb (0x0), 
+  fEventCounter(0),
+  fPulse(0),
+  fADCValuesLG(0),
+  fADCValuesHG(0)
+
+{
+  // ctor Init() is called by RunDigitizer
+  fManager = rd ; 
+  SetTitle(dynamic_cast<AliStream*>(fManager->GetInputStream(0))->GetFileName(0));
+  InitParameters() ; 
+  fDefaultInit = kFALSE ; 
+  fcdb = new AliPHOSCalibData(-1);
 }
 
 //____________________________________________________________________________ 
   AliPHOSDigitizer::~AliPHOSDigitizer()
 {
   // dtor
+  AliRunLoader* rl = AliRunLoader::GetRunLoader(fEventFolderName) ;
+  if(rl){                                                                                                                               
+    AliPHOSLoader * phosLoader = dynamic_cast<AliPHOSLoader*>(rl->GetLoader("PHOSLoader"));                                                                 
+    phosLoader->CleanDigitizer() ;
+  }
+
+  delete [] fInputFileNames ; 
+  delete [] fEventNames ; 
+
+  delete fPulse;
+  delete [] fADCValuesLG;
+  delete [] fADCValuesHG;
 
+  if(fcdb){ delete fcdb ; fcdb=0;} 
 
 }
 
 //____________________________________________________________________________
-void AliPHOSDigitizer::Digitize(const Int_t event) 
+void AliPHOSDigitizer::Digitize(Int_t event) 
 { 
   
   // Makes the digitization of the collected summable digits.
   //  It first creates the array of all PHOS modules
-  //  filled with noise (different for EMC, CPV and PPSD) and
+  //  filled with noise (different for EMC, and CPV) and
   //  then adds contributions from SDigits. 
   // This design avoids scanning over the list of digits to add 
   // contribution to new SDigits only.
 
-  if( strcmp(GetName(), "") == 0 )
-    Init() ;
-
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ; 
-  TClonesArray * digits = gime->Digits() ; 
-
+  Bool_t toMakeNoise = kTRUE ; //Do not create noisy digits if merge with real data
+
+  //First stream 
+  AliRunLoader* rl = AliRunLoader::GetRunLoader(fEventFolderName) ;
+  AliPHOSLoader * phosLoader = dynamic_cast<AliPHOSLoader*>(rl->GetLoader("PHOSLoader"));
+
+  Int_t readEvent = event ; 
+  if (fManager) 
+    readEvent = dynamic_cast<AliStream*>(fManager->GetInputStream(0))->GetCurrentEventNumber() ; 
+  AliDebug(1,Form("Adding event %d from input stream 0 %s %s", 
+                 readEvent, GetTitle(), fEventFolderName.Data())) ; 
+  rl->GetEvent(readEvent) ;
+  phosLoader->CleanSDigits() ; 
+  phosLoader->LoadSDigits("READ") ;
+
+  //Prepare Output
+  TClonesArray * digits = phosLoader->Digits() ;
+  if( !digits ) {
+    phosLoader->MakeDigitsArray() ; 
+    digits = phosLoader->Digits() ;
+  }
   digits->Clear() ;
 
-  const AliPHOSGeometry *geom = gime->PHOSGeometry() ; 
-
+  //
+  const AliPHOSGeometry *geom = AliPHOSGeometry::GetInstance() ;
   //Making digits with noise, first EMC
-  Int_t nEMC = geom->GetNModules()*geom->GetNPhi()*geom->GetNZ();
+  //Check which PHOS modules are present
+  Bool_t isPresent[5] ;
+  TString volpath ;
+  Int_t nmod=0 ;
+  for(Int_t i=0; i<5; i++){
+    volpath = "/ALIC_1/PHOS_";
+    volpath += i+1;
+    if (gGeoManager->CheckPath(volpath.Data())) {
+      isPresent[i]=1 ;
+      nmod++ ;
+    }
+    else{
+      isPresent[i]=0 ;
+    }
+  }
+
+  Int_t nEMC = nmod*geom->GetNPhi()*geom->GetNZ();
   
   Int_t nCPV ;
-  Int_t nPPSD ;
   Int_t absID ;
-  TString name      =  geom->GetName() ;
   
-  if ( name == "IHEP" || name == "MIXT" )    
-    nCPV =nEMC + geom->GetNumberOfCPVPadsZ()*geom->GetNumberOfCPVPadsPhi()*
-      geom->GetNCPVModules()*geom->GetNumberOfCPVLayers() ;
-  else
-    nCPV = nEMC; 
+  //check if CPV exists
+  Bool_t isCPVpresent=0 ;
+  for(Int_t i=1; i<=5 && !isCPVpresent; i++){
+    volpath = "/ALIC_1/PHOS_";
+    volpath += i;
+    volpath += "/PCPV_1";
+    if (gGeoManager->CheckPath(volpath.Data())) 
+      isCPVpresent=1 ;
+  } 
   
-  if ( name == "GPS2" || name == "MIXT" )    
-    nPPSD =nCPV+2*geom->GetNPPSDModules()*geom->GetNumberOfModulesPhi()*geom->GetNumberOfModulesZ()*
-      geom->GetNumberOfPadsPhi()*geom->GetNumberOfPadsZ() ;
-  else
-    nPPSD = nCPV; 
-
-
-  digits->Expand(nPPSD) ;
+  if(isCPVpresent){
+    nCPV = nEMC + geom->GetNumberOfCPVPadsZ() * geom->GetNumberOfCPVPadsPhi() * nmod ;
+  }
+  else{
+     nCPV = nEMC ;
+  }  
 
+  digits->Expand(nCPV) ;
 
-  // sdigitize random gaussian noise and add it to all cells (EMCA+CPV+PPSD) 
-  // get first the sdigitizer from the tasks list (must have same name as the digitizer)
-  const AliPHOSSDigitizer * sDigitizer = gime->SDigitizer(GetName()); 
-  if ( !sDigitizer) {
-    cerr << "ERROR: AliPHOSDigitizer::Digitize -> SDigitizer with name " << GetName() << " not found " << endl ; 
-    abort() ; 
+  //take all the inputs to add together and load the SDigits
+  TObjArray * sdigArray = new TObjArray(fInput) ;
+  sdigArray->AddAt(phosLoader->SDigits(), 0) ;
+  for(Int_t i = 1 ; i < fInput ; i++){
+    TString tempo(fEventNames[i]) ; 
+    tempo += i ;
+    AliRunLoader* rl2 = AliRunLoader::GetRunLoader(tempo) ;
+    if(!rl2){ 
+      rl2 = AliRunLoader::Open(fInputFileNames[i], tempo) ;
+      if (!rl2) {
+        Fatal("AliPHOSDigitizer", "Could not find the Run Loader for %s - %s",fInputFileNames[i].Data(), tempo.Data()) ;
+        return ;
+      }
+      rl2->LoadHeader();
+    }
+    AliPHOSLoader * phosLoader2 = dynamic_cast<AliPHOSLoader*>(rl2->GetLoader("PHOSLoader"));
+    if(fManager){ 
+      readEvent = dynamic_cast<AliStream*>(fManager->GetInputStream(i))->GetCurrentEventNumber() ; 
+    }
+    TClonesArray * digs ;
+    if(AliPHOSSimParam::GetInstance()->IsStreamDigits(i)){ //This is Digits Stream
+      AliInfo(Form("Adding event %d from input stream %d %s %s", 
+                readEvent, i, fInputFileNames[i].Data(), tempo.Data())) ; 
+       rl2->GetEvent(readEvent) ;
+       phosLoader2->CleanDigits() ;
+       phosLoader2->LoadDigits("READ") ;
+       digs = phosLoader2->Digits() ;
+       toMakeNoise=0 ; //Do not add noise, it is already in stream
+    }
+    else{
+      AliInfo(Form("Adding event %d (SDigits) from input stream %d %s %s",
+                 readEvent, i, fInputFileNames[i].Data(), tempo.Data())) ;
+       rl2->GetEvent(readEvent) ;
+       phosLoader2->CleanSDigits() ; 
+       phosLoader2->LoadSDigits("READ") ;
+       digs = phosLoader2->SDigits() ;
+    } 
+    sdigArray->AddAt(digs, i) ;
   }
-  for(absID = 1; absID <= nEMC; absID++){
-    Float_t noise = gRandom->Gaus(0., fPinNoise) ; 
-    new((*digits)[absID-1]) AliPHOSDigit( -1,absID,sDigitizer->Digitize(noise) ) ;
+
+  //Find the first crystal with signal
+  Int_t nextSig = 200000 ; 
+  TClonesArray * sdigits ;  
+  for(Int_t i = 0 ; i < fInput ; i++){
+    sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
+    if ( !sdigits->GetEntriesFast() )
+      continue ; 
+    Int_t curNext = dynamic_cast<AliPHOSDigit *>(sdigits->At(0))->GetId() ;
+    if(curNext < nextSig) 
+      nextSig = curNext ;
   }
   
-  for(absID = nEMC+1; absID <= nCPV; absID++){
-    Float_t noise = gRandom->Gaus(0., fCPVNoise) ; 
-    new((*digits)[absID-1]) AliPHOSDigit( -1,absID,sDigitizer->Digitize(noise) ) ;
-  }
+  TArrayI index(fInput) ;
+  index.Reset() ;  //Set all indexes to zero
   
-  for(absID = nCPV+1; absID <= nPPSD; absID++){
-    Float_t noise = gRandom->Gaus(0., fPPSDNoise) ; 
-    new((*digits)[absID-1]) AliPHOSDigit( -1,absID,sDigitizer->Digitize(noise) ) ;
-  }
+  AliPHOSDigit * digit ;
+  AliPHOSDigit * curSDigit ;
+  
+//  TClonesArray * ticks = new TClonesArray("AliPHOSTick",1000) ;
   
-  // loop through the sdigits posted to the White Board and add them to the noise
-  TCollection * folderslist = ((TFolder*)gROOT->FindObjectAny("YSAlice/WhiteBoard/SDigits/PHOS"))->GetListOfFolders() ; 
-  TIter next(folderslist) ; 
-  TFolder * folder = 0 ; 
-  TClonesArray * sdigits = 0 ;  
-  TString eventS ; 
-  eventS += event ;
-  while ( (folder = (TFolder*)next()) ) {
-    if ( (strcmp(folder->GetTitle(), eventS.Data()) == 0) || (strcmp(folder->GetTitle(), "") == 0) ) {
-      Int_t numberoffiles = 0 ; 
-      if ( (sdigits = (TClonesArray*)folder->FindObject(GetName()) ) ) {
-       cout << "INFO: AliPHOSDigitizer::Digitize -> Adding SDigits " << GetName() << " from " << folder->GetName() << endl ; 
-       numberoffiles++ ; 
-       Int_t index ; 
-       AliPHOSDigit * curSDigit ; 
-       AliPHOSDigit * digit ; 
-       for ( index = 0 ; index < sdigits->GetEntriesFast(); index++) { 
-         curSDigit = (AliPHOSDigit*)sdigits->At(index) ; 
-         curSDigit->ShiftPrimary(numberoffiles) ;
-         digit = (AliPHOSDigit*)digits->At(curSDigit->GetId() - 1 ) ; 
-         *digit = *digit + *curSDigit ; 
-       }
+  //Put Noise contribution
+  Double_t apdNoise = 0. ;
+  if(toMakeNoise)
+     apdNoise = AliPHOSSimParam::GetInstance()->GetAPDNoise() ; 
+
+  Int_t emcpermod=geom->GetNPhi()*geom->GetNZ();
+  Int_t idigit= 0;
+  for(Int_t imod=0; imod<5; imod++){
+    if(!isPresent[imod])
+      continue ;
+    Int_t firstAbsId=imod*emcpermod+1 ;
+    Int_t lastAbsId =(imod+1)*emcpermod ; 
+    for(absID = firstAbsId ; absID <= lastAbsId ; absID++){
+      Float_t noise = gRandom->Gaus(0.,apdNoise) ; 
+      new((*digits)[idigit]) AliPHOSDigit( -1, absID, noise, TimeOfNoise() ) ;
+      //look if we have to add signal?
+      digit = dynamic_cast<AliPHOSDigit *>(digits->At(idigit)) ;
+      idigit++ ;
+    
+      if(absID==nextSig){
+      //Add SDigits from all inputs 
+//      ticks->Clear() ;
+//      Int_t contrib = 0 ;
+
+//New Timing model is necessary
+//      Float_t a = digit->GetEnergy() ;
+//      Float_t b = TMath::Abs( a / fTimeSignalLength) ;
+//      //Mark the beginning of the signal
+//      new((*ticks)[contrib++]) AliPHOSTick(digit->GetTime(),0, b);  
+//      //Mark the end of the signal     
+//      new((*ticks)[contrib++]) AliPHOSTick(digit->GetTime()+fTimeSignalLength, -a, -b); 
+
+// Calculate time as time of the largest digit
+        Float_t time = digit->GetTime() ;
+        Float_t eTime= digit->GetEnergy() ;
+      
+        //loop over inputs
+        for(Int_t i = 0 ; i < fInput ; i++){
+         if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] ){
+           curSDigit = dynamic_cast<AliPHOSDigit*>(dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i])) ;     
+            if(AliPHOSSimParam::GetInstance()->IsStreamDigits(i)){ //This is Digits Stream
+              curSDigit->SetEnergy(Calibrate(curSDigit->GetEnergy(),curSDigit->GetId())) ;
+              curSDigit->SetTime(CalibrateT(curSDigit->GetTime(),curSDigit->GetId())) ;
+            }
+          }
+         else
+           curSDigit = 0 ;
+         //May be several digits will contribute from the same input
+         while(curSDigit && curSDigit->GetId() == absID){         
+           //Shift primary to separate primaries belonging different inputs
+           Int_t primaryoffset ;
+           if(fManager)
+             primaryoffset = fManager->GetMask(i) ; 
+           else
+             primaryoffset = 10000000*i ;
+           curSDigit->ShiftPrimary(primaryoffset) ;
+         
+//New Timing model is necessary
+//       a = curSDigit->GetEnergy() ;
+//       b = a /fTimeSignalLength ;
+//       new((*ticks)[contrib++]) AliPHOSTick(curSDigit->GetTime(),0, b);  
+//       new((*ticks)[contrib++]) AliPHOSTick(curSDigit->GetTime()+fTimeSignalLength, -a, -b); 
+          if(curSDigit->GetEnergy()>eTime){
+            eTime=curSDigit->GetEnergy() ;
+            time=curSDigit->GetTime() ;
+          }
+           *digit += *curSDigit ;  //add energies
+
+           index[i]++ ;
+           if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+             curSDigit = dynamic_cast<AliPHOSDigit*>(dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i])) ;   
+           else
+             curSDigit = 0 ;
+         }
+        }
+      
+        //calculate and set time
+//New Timing model is necessary
+//      Float_t time = FrontEdgeTime(ticks) ;
+        digit->SetTime(time) ;
+      
+        //Find next signal module
+        nextSig = 200000 ;
+        for(Int_t i = 0 ; i < fInput ; i++){
+         sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
+         Int_t curNext = nextSig ;
+         if(sdigits->GetEntriesFast() > index[i] ){
+           curNext = dynamic_cast<AliPHOSDigit *>(sdigits->At(index[i]))->GetId() ;
+         }
+         if(curNext < nextSig) nextSig = curNext ;
+        }
       }
     }
   }
-  //remove digits below thresholds
-  for(absID = 0; absID < nEMC ; absID++)
-    if(sDigitizer->Calibrate(((AliPHOSDigit*)digits->At(absID))->GetAmp()) < fEMCDigitThreshold)
-      digits->RemoveAt(absID) ;
+
+  //distretize energy if necessary
+  if(AliPHOSSimParam::GetInstance()->IsEDigitizationOn()){
+    Float_t adcW=AliPHOSSimParam::GetInstance()->GetADCchannelW() ;
+    for(Int_t i = 0 ; i < nEMC ; i++){                                                                                                       
+      digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ;
+      digit->SetEnergy(adcW*ceil(digit->GetEnergy()/adcW)) ;
+    } 
+  }
+  //Apply decalibration if necessary
+  for(Int_t i = 0 ; i < nEMC ; i++){
+    digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ;
+    Decalibrate(digit) ;
+  }
   
-  for(absID = nEMC; absID < nCPV ; absID++)
-    if(sDigitizer->Calibrate(((AliPHOSDigit*)digits->At(absID))->GetAmp()) < fCPVDigitThreshold)
-      digits->RemoveAt(absID) ;
+//  ticks->Delete() ;
+//  delete ticks ;
   
-  for(absID = nCPV; absID < nPPSD ; absID++)
-    if(sDigitizer->Calibrate(((AliPHOSDigit *)digits->At(absID))->GetAmp()) < fPPSDDigitThreshold)
-      digits->RemoveAt(absID) ;
+  //Now CPV digits (different noise and no timing)
+  Int_t cpvpermod = geom->GetNumberOfCPVPadsZ() * geom->GetNumberOfCPVPadsPhi() ;
+  Int_t nEMCtotal=emcpermod*5 ;
+  Float_t cpvNoise = AliPHOSSimParam::GetInstance()->GetCPVNoise() ;
+  if(isCPVpresent){  //CPV is present in current geometry
+    for(Int_t imod=0; imod<5; imod++){ //module is present in current geometry
+      if(!isPresent[imod])
+        continue ;
+      Int_t firstAbsId=nEMCtotal+imod*cpvpermod+1 ;
+      Int_t lastAbsId =nEMCtotal+(imod+1)*cpvpermod ;
+      for(absID = firstAbsId; absID <= lastAbsId; absID++){
+        Float_t noise = gRandom->Gaus(0., cpvNoise) ; 
+        new((*digits)[idigit]) AliPHOSDigit( -1,absID,noise, TimeOfNoise() ) ;
+        idigit++ ;
+        //look if we have to add signal?
+        if(absID==nextSig){
+          digit = dynamic_cast<AliPHOSDigit *>(digits->At(idigit-1)) ;
+          //Add SDigits from all inputs
+          for(Int_t i = 0 ; i < fInput ; i++){
+            if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+              curSDigit = dynamic_cast<AliPHOSDigit*>( dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i])) ;         
+            else
+              curSDigit = 0 ;
+
+            //May be several digits will contribute from the same input
+            while(curSDigit && curSDigit->GetId() == absID){      
+              //Shift primary to separate primaries belonging different inputs
+              Int_t primaryoffset ;
+              if(fManager)
+                primaryoffset = fManager->GetMask(i) ; 
+              else
+                primaryoffset = 10000000*i ;
+              curSDigit->ShiftPrimary(primaryoffset) ;
+
+              //add energies
+              *digit += *curSDigit ;  
+              index[i]++ ;
+              if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+                curSDigit = dynamic_cast<AliPHOSDigit*>( dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i]) ) ;      
+              else
+                curSDigit = 0 ;
+            }
+          }
+
+          //Find next signal module
+          nextSig = 200000 ;
+          for(Int_t i = 0 ; i < fInput ; i++){
+           sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
+           Int_t curNext = nextSig ;
+           if(sdigits->GetEntriesFast() > index[i] )
+             curNext = dynamic_cast<AliPHOSDigit *>( sdigits->At(index[i]) )->GetId() ;
+           if(curNext < nextSig) nextSig = curNext ;
+          }
+      
+        }
+      }
+    }
+  }
+
+  delete sdigArray ; //We should not delete its contents 
   
+  Int_t relId[4];
+
+  //set amplitudes in bad channels to zero
+
+  for(Int_t i = 0 ; i <digits->GetEntriesFast(); i++){
+    digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ;
+    geom->AbsToRelNumbering(digit->GetId(),relId);
+    if(relId[1] == 0) // Emc
+      if(fcdb->IsBadChannelEmc(relId[0],relId[3],relId[2])) digit->SetEnergy(0.); 
+  }
+
+  //remove digits below thresholds
+  Float_t emcThreshold = AliPHOSSimParam::GetInstance()->GetEmcDigitsThreshold() ;
+  for(Int_t i = 0 ; i < nEMC ; i++){
+    digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ;
+
+    if(digit->GetEnergy() < emcThreshold){
+      digits->RemoveAt(i) ;
+      continue ;
+    }
+
+    geom->AbsToRelNumbering(digit->GetId(),relId);
+
+    digit->SetEnergy(TMath::Ceil(digit->GetEnergy())-0.9999) ;
+
+    Float_t tres = TimeResolution(digit->GetEnergy()) ; 
+    digit->SetTime(gRandom->Gaus(digit->GetTime(), tres) ) ;
+
+    fPulse->Reset();
+    fPulse->SetAmplitude(digit->GetEnergy()/
+                        fcdb->GetADCchannelEmc(relId[0],relId[3],relId[2]));
+    fPulse->SetTZero(digit->GetTimeR());
+    fPulse->MakeSamples();
+    fPulse->GetSamples(fADCValuesHG, fADCValuesLG) ; 
+    Int_t nSamples = fPulse->GetRawFormatTimeBins();
+    digit->SetALTROSamplesHG(nSamples,fADCValuesHG);
+    digit->SetALTROSamplesLG(nSamples,fADCValuesLG);
+  }
+
+  Float_t cpvDigitThreshold = AliPHOSSimParam::GetInstance()->GetCpvDigitsThreshold() ;
+  for(Int_t i = nEMC; i < nCPV ; i++){
+    if( dynamic_cast<AliPHOSDigit*>(digits->At(i))->GetEnergy() < cpvDigitThreshold )
+      digits->RemoveAt(i) ;
+  } 
+    
   digits->Compress() ;  
-  
   Int_t ndigits = digits->GetEntriesFast() ;
-  digits->Expand(ndigits) ;
-
-  //Set indexes in list of digits
-  Int_t i ;
-  for (i = 0 ; i < ndigits ; i++) { 
-    AliPHOSDigit * digit = (AliPHOSDigit *) digits->At(i) ; 
+  
+  //Set indexes in list of digits and make true digitization of the energy
+  for (Int_t i = 0 ; i < ndigits ; i++) { 
+    digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ; 
     digit->SetIndexInList(i) ;     
+    if(digit->GetId() > fEmcCrystals){ //digitize CPV only
+      digit->SetAmp(DigitizeCPV(digit->GetEnergy(),digit->GetId()) ) ;
+    }
+  }
+
+}
+//____________________________________________________________________________
+Float_t AliPHOSDigitizer::Calibrate(Float_t amp,Int_t absId){
+  //Apply calibration
+  const AliPHOSGeometry *geom = AliPHOSGeometry::GetInstance() ;
+
+  //Determine rel.position of the cell absolute ID
+  Int_t relId[4];
+  geom->AbsToRelNumbering(absId,relId);
+  Int_t module=relId[0];
+  Int_t row   =relId[2];
+  Int_t column=relId[3];
+  if(relId[1]==0){ //This Is EMC
+    Float_t calibration = fcdb->GetADCchannelEmc(module,column,row);
+    return amp*calibration ;
   }
+  return 0 ;
+}
+//____________________________________________________________________________
+void AliPHOSDigitizer::Decalibrate(AliPHOSDigit *digit)
+{
+  // Decalibrate EMC digit, i.e. change its energy by a factor read from CDB
+
+  const AliPHOSGeometry *geom = AliPHOSGeometry::GetInstance() ;
+
+  //Determine rel.position of the cell absolute ID
+  Int_t relId[4];
+  geom->AbsToRelNumbering(digit->GetId(),relId);
+  Int_t module=relId[0];
+  Int_t row   =relId[2];
+  Int_t column=relId[3];
+  if(relId[1]==0){ //This Is EMC
+    Float_t calibration = fcdb->GetADCchannelEmc(module,column,row);
+    Float_t energy = digit->GetEnergy()/calibration;
+    digit->SetEnergy(energy); //Now digit measures E in ADC counts
+    Float_t time = digit->GetTime() ;
+    time-=fcdb->GetTimeShiftEmc(module,column,row);
+    digit->SetTime(time) ;
+  }
+}
+//____________________________________________________________________________
+Float_t AliPHOSDigitizer::CalibrateT(Float_t time,Int_t absId){
+  //Apply time calibration
+  const AliPHOSGeometry *geom = AliPHOSGeometry::GetInstance() ;
+
+  //Determine rel.position of the cell absolute ID
+  Int_t relId[4];
+  geom->AbsToRelNumbering(absId,relId);
+  Int_t module=relId[0];
+  Int_t row   =relId[2];
+  Int_t column=relId[3];
+  time += fcdb->GetTimeShiftEmc(module,column,row);
+  return time ;
+}
+//____________________________________________________________________________
+Int_t AliPHOSDigitizer::DigitizeCPV(Float_t charge, Int_t absId)
+{
+  // Returns digitized value of the CPV charge in a pad absId
+
+  const AliPHOSGeometry *geom = AliPHOSGeometry::GetInstance() ;
+
+  //Determine rel.position of the cell absId
+  Int_t relId[4];
+  geom->AbsToRelNumbering(absId,relId);
+  Int_t module=relId[0];
+  Int_t row   =relId[2];
+  Int_t column=relId[3];
+  
+  Int_t channel = 0;
+  
+  if(absId > fEmcCrystals){ //digitize CPV only
 
+    //reading calibration data for cell absId.
+    Float_t adcPedestalCpv = fcdb->GetADCpedestalCpv(module,column,row);
+    Float_t adcChanelCpv   = fcdb->GetADCchannelCpv( module,column,row);
+
+    channel = (Int_t) TMath::Ceil((charge - adcPedestalCpv)/adcChanelCpv) ;       
+    Int_t nMax = AliPHOSSimParam::GetInstance()->GetNADCcpv() ;
+    if(channel > nMax ) channel = nMax ;
+  }
+  return channel ;
 }
 
 //____________________________________________________________________________
 void AliPHOSDigitizer::Exec(Option_t *option) 
 { 
-  // Managing method
+  // Steering method to process digitization for events
+  // in the range from fFirstEvent to fLastEvent.
+  // This range is optionally set by SetEventRange().
+  // if fLastEvent=-1, then process events until the end.
+  // by default fLastEvent = fFirstEvent (process only one event)
+
+  if (!fInit) { // to prevent overwrite existing file
+    AliError(Form("Give a version name different from %s", 
+                 fEventFolderName.Data() )) ;
+    return ;
+  }   
 
-  if( strcmp(GetName(), "") == 0 )    
-    Init() ;
-  
   if (strstr(option,"print")) {
-    Print("");
+    Print();
     return ; 
   }
   
-  if(strstr(option,"tim"))
-    gBenchmark->Start("PHOSDigitizer");
-
-  //Check, if this branch already exits
-  TObjArray * lob = (TObjArray*)gAlice->TreeD()->GetListOfBranches() ;
-  TIter next(lob) ; 
-  TBranch * branch = 0 ;  
-  Bool_t phosfound = kFALSE, digitizerfound = kFALSE ; 
+ if(strstr(option,"tim"))
+     gBenchmark->Start("PHOSDigitizer");
   
-  while ( (branch = (TBranch*)next()) && (!phosfound || !digitizerfound) ) {
-    if ( (strcmp(branch->GetName(), "PHOS")==0) && (strcmp(branch->GetTitle(), GetName())==0) ) 
-      phosfound = kTRUE ;
-    
-    else if ( (strcmp(branch->GetName(), "AliPHOSDigitizer")==0) && (strcmp(branch->GetTitle(), GetName())==0) ) 
-      digitizerfound = kTRUE ; 
-  }
-
-  if ( phosfound || digitizerfound ) {
-    cerr << "WARNING: AliPHOSDigitizer::WriteDigits -> Digits and/or Digitizer branch with name " << GetName() 
-        << " already exits" << endl ;
-    return ; 
-  }   
+  AliRunLoader* rl = AliRunLoader::GetRunLoader(fEventFolderName) ;
+  AliPHOSLoader * phosLoader = dynamic_cast<AliPHOSLoader*>(rl->GetLoader("PHOSLoader"));
 
-  Int_t nevents = (Int_t) gAlice->TreeE()->GetEntries() ;
+  // Post Digitizer to the white board
+  phosLoader->PostDigitizer(this) ;
+  
+  if (fLastEvent == -1) 
+    fLastEvent = rl->GetNumberOfEvents() - 1 ;
+  else if (fManager) 
+    fLastEvent = fFirstEvent ; 
+  Int_t nEvents   = fLastEvent - fFirstEvent + 1;
+  
   Int_t ievent ;
 
-  for(ievent = 0; ievent < nevents; ievent++){
-    gAlice->SetEvent(ievent) ;
-    if(!ReadSDigits(ievent)) //read sdigits event(s) evaluated by Combinator() from file(s)
-      continue ;    
-    
+  for (ievent = fFirstEvent; ievent <= fLastEvent; ievent++) {
+    fEventCounter++ ; 
+
     Digitize(ievent) ; //Add prepared SDigits to digits and add the noise
 
-    WriteDigits(ievent) ;
-   
+    WriteDigits() ;
+
     if(strstr(option,"deb"))
       PrintDigits(option);
-  }
+    
+    //increment the total number of Digits per run 
+    fDigitsInRun += phosLoader->Digits()->GetEntriesFast() ;  
+ }
+  phosLoader->CleanDigitizer();
 
   if(strstr(option,"tim")){
     gBenchmark->Stop("PHOSDigitizer");
-    cout << "AliPHOSDigitizer:" << endl ;
-    cout << "  took " << gBenchmark->GetCpuTime("PHOSDigitizer") << " seconds for Digitizing " 
-        <<  gBenchmark->GetCpuTime("PHOSDigitizer")/nevents << " seconds per event " << endl ;
-    cout << endl ;
-  }
-  
+    TString message ; 
+    message = "  took %f seconds for Digitizing %f seconds per event\n" ; 
+    AliInfo(Form( message.Data(), 
+        gBenchmark->GetCpuTime("PHOSDigitizer"), 
+        gBenchmark->GetCpuTime("PHOSDigitizer")/nEvents )); 
+  } 
 }
-
 //____________________________________________________________________________ 
-void AliPHOSDigitizer::Init()
-{
-  // Makes all memory allocations
-  // Adds Digitizer task to the folder of PHOS tasks
-   //============================================================= YS
-  //  The initialisation is now done by AliPHOSGetter
-    
-  if( strcmp(GetTitle(), "") == 0 )
-    SetTitle("galice.root") ;
-  
-   
-  // the SDigits name is stored by AliPHOSGetter as the name of the TClones Array 
-  // //YSAlice/WhiteBoard/SDigits/PHOS/headerFile/branchname and has branchTitle as title.    
-    
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance(GetTitle(), GetName()) ; 
-  if ( gime == 0 ) {
-    cerr << "ERROR: AliPHOSDigitizer::Init -> Could not obtain the Getter object !" << endl ; 
-    return ;
-  } 
-   
-//   fIevent    = new TArrayI(1) ;
-//   fIevent->AddAt(-1,0 ) ; 
-//   fIeventMax = new TArrayI(1) ;
-  
-//   fIeventMax->AddAt((Int_t) gAlice->TreeE()->GetEntries(), 0 );
-  
-  //add Task to //YSAlice/tasks/Digitizer/PHOS
-  TTask * aliceSD  = (TTask*)gROOT->FindObjectAny("YSAlice/tasks/Digitizer") ; 
-  TTask * phosSD   = (TTask*)aliceSD->GetListOfTasks()->FindObject("PHOS") ;
-  phosSD->Add(this) ; 
-  // create a folder on the white board //YSAlice/WhiteBoard/Digits/PHOS/headerFile/digitsTitle
-  gime->Post(GetTitle(), "D",  GetName() ) ;   
-
+Float_t AliPHOSDigitizer::TimeResolution(Float_t e){
+  //calculate TOF resolution using beam-test resutls
+  Float_t a=AliPHOSSimParam::GetInstance()->GetTOFa() ;
+  Float_t b=AliPHOSSimParam::GetInstance()->GetTOFb() ;
+  return TMath::Sqrt(a*a+b*b/e) ;
 }
 
-//__________________________________________________________________
-void AliPHOSDigitizer::MixWith(const char* headerFile)
+////____________________________________________________________________________ 
+//Float_t AliPHOSDigitizer::FrontEdgeTime(TClonesArray * ticks) const
+//{
+//  // Returns the shortest time among all time ticks
+//
+//  ticks->Sort() ; //Sort in accordance with times of ticks
+//  TIter it(ticks) ;
+//  AliPHOSTick * ctick = (AliPHOSTick *) it.Next() ;
+//  Float_t time = ctick->CrossingTime(fTimeThreshold) ;    
+//
+//  AliPHOSTick * t ;  
+//  while((t=(AliPHOSTick*) it.Next())){
+//    if(t->GetTime() < time)  //This tick starts before crossing
+//      *ctick+=*t ;
+//    else
+//      return time ;
+//
+//    time = ctick->CrossingTime(fTimeThreshold) ;    
+//  }
+//  return time ;
+//}
+
+//____________________________________________________________________________ 
+Bool_t AliPHOSDigitizer::Init()
 {
-  // Allows to produce digits by superimposing background and signal event.
-  // It is assumed, that headers file with SIGNAL events is opened in 
-  // the constructor. 
-  // Sets the BACKGROUND event, with which the SIGNAL event is to be mixed 
-  // Thus we avoid writing (changing) huge and expensive 
-  // backgound files: all output will be writen into SIGNAL, i.e. 
-  // opened in constructor file. 
-  //
-  // One can open as many files to mix with as one needs.
-  // However only Sdigits with the same name (i.e. constructed with the same SDigitizer)
-  // can be mixed.
+  // Makes all memory allocations
+  fInit = kTRUE ; 
 
-  if( strcmp(GetName(), "") == 0 )
-    Init() ;
+  AliPHOSGeometry *geom;
+  if (!(geom = AliPHOSGeometry::GetInstance())) 
+        geom = AliPHOSGeometry::GetInstance("IHEP","");
+//   const AliPHOSGeometry *geom = AliPHOSGeometry::GetInstance() ;
 
-  const char* sDigitsTitle = GetName() ; 
+  fEmcCrystals = geom->GetNModules() * geom->GetNCristalsInModule() ;
   
-  // check if the specified SDigits do not already exist on the White Board:
-  // //YSAlice/WhiteBoard/SDigits/PHOS/headerFile/sDigitsTitle
-
-  TString path = "YSAlice/WhiteBoard/SDigits/PHOS/" ; 
-  path += headerFile ; 
-  path += "/" ; 
-  path += sDigitsTitle ;
-  if ( gROOT->FindObjectAny(path.Data()) ) {
-    cerr << "WARNING: AliPHOSDigitizer::MixWith -> Entry already exists, do not add" << endl ;
-    return;
+  fFirstEvent = 0 ; 
+  fLastEvent = fFirstEvent ; 
+  if (fManager) 
+    fInput = fManager->GetNinputs() ; 
+  else 
+    fInput           = 1 ;
+  
+  fInputFileNames  = new TString[fInput] ; 
+  fEventNames      = new TString[fInput] ; 
+  fInputFileNames[0] = GetTitle() ; 
+  fEventNames[0]     = fEventFolderName.Data() ; 
+  Int_t index ; 
+  for (index = 1 ; index < fInput ; index++) {
+    fInputFileNames[index] = dynamic_cast<AliStream*>(fManager->GetInputStream(index))->GetFileName(0); 
+    TString tempo = fManager->GetInputFolderName(index) ;
+    fEventNames[index] = tempo.Remove(tempo.Length()-1) ; // strip of the stream number added by fManager
   }
-  // check if the requested file is already open or exist and if SDigits Branch exist
-  TFile * file = (TFile*)gROOT->FindObject(headerFile); 
-  if ( !file ) { 
-    file = new TFile(headerFile, "READ") ; 
-    if (!file) { 
-      cerr << "ERROR: AliPHOSDigitizer::MixWith -> File " << headerFile << " does not exist!" << endl ; 
-      return ; 
-    }
+
+  //to prevent cleaning of this object while GetEvent is called
+  AliRunLoader* rl = AliRunLoader::GetRunLoader(fEventFolderName) ;
+  if(!rl){
+    rl = AliRunLoader::Open(GetTitle(), fEventFolderName) ; 
   }
+  AliPHOSLoader * phosLoader = dynamic_cast<AliPHOSLoader*>(rl->GetLoader("PHOSLoader"));
+  phosLoader->GetDigitsDataLoader()->GetBaseTaskLoader()->SetDoNotReload(kTRUE);
 
-  // Read the first event with SDigits from the file-to-mix and post it to SDigits folder
+  return fInit ; 
+}
 
-  Int_t ievent =0 ; 
-  TString tsname("TreeS") ; 
-  tsname += ievent ; 
-  TTree * ts = (TTree*)file->Get(tsname.Data()) ;
-  if ( !ts ) {
-    cerr << "ERROR: AliPHOSDigitizer::MixWith -> TreeS0 " << " does not exist in " << headerFile << endl ; 
-    return ;
-  }
-    
-  TObjArray * lob = (TObjArray*)ts->GetListOfBranches() ;
-  TIter next(lob) ; 
-  TBranch * branch = 0 ; 
-  TBranch * sdigitsbranch = 0 ; 
-  TBranch * sdigitizerbranch = 0 ; 
-  Bool_t phosfound = kFALSE, sdigitizerfound = kFALSE ; 
-    
-  while ( (branch = (TBranch*)next()) && (!phosfound || !sdigitizerfound) ) {
-    if ( (strcmp(branch->GetName(), "PHOS")==0) && (strcmp(branch->GetTitle(), sDigitsTitle)==0) ) {
-      sdigitsbranch = branch ; 
-      phosfound = kTRUE ;
-    }
-    else if ( (strcmp(branch->GetName(), "AliPHOSSDigitizer")==0) && (strcmp(branch->GetTitle(), sDigitsTitle)==0) ) {
-      sdigitizerbranch = branch ; 
-      sdigitizerfound = kTRUE ; 
-    }
-  }
-    
-  if ( !phosfound || !sdigitizerfound ) {
-    cerr << "WARNING: AliPHOSDigitizer::MixWith -> Cannot find SDigits and/or SDigitizer with name " << sDigitsTitle << endl ;
-    return ; 
-  }   
-    
-  // post the new SDigits to the White Board
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ; 
-  gime->Post(headerFile, "S", sDigitsTitle) ; 
+//____________________________________________________________________________ 
+void AliPHOSDigitizer::InitParameters()
+{
+  // Set initial parameters Digitizer
 
+  fDigitsInRun  = 0 ; 
+  SetEventRange(0,-1) ;
+  fPulse = new AliPHOSPulseGenerator();
+  fADCValuesLG = new Int_t[fPulse->GetRawFormatTimeBins()];
+  fADCValuesHG = new Int_t[fPulse->GetRawFormatTimeBins()];
+    
 }
 
 //__________________________________________________________________
-void AliPHOSDigitizer::Print(Option_t* option)const {
+void AliPHOSDigitizer::Print(const Option_t *)const 
+{
   // Print Digitizer's parameters
-  if( strcmp(GetName(), "") != 0 ){
+  AliInfo(Form("\n------------------- %s -------------", GetName() )) ; 
+  if( strcmp(fEventFolderName.Data(), "") != 0 ){
+    printf(" Writing Digits to branch with title  %s\n", fEventFolderName.Data()) ;
     
-    cout << "------------------- "<< GetName() << " -------------" << endl ;
-    cout << "Digitizing sDigits from file(s): " <<endl ;
+    Int_t nStreams ; 
+    if (fManager) 
+      nStreams =  GetNInputStreams() ;
+    else 
+      nStreams = fInput ; 
     
-     TCollection * folderslist = ((TFolder*)gROOT->FindObjectAny("YSAlice/WhiteBoard/SDigits/PHOS"))->GetListOfFolders() ; 
-    TIter next(folderslist) ; 
-    TFolder * folder = 0 ; 
-    
-    while ( (folder = (TFolder*)next()) ) {
-      if ( folder->FindObject(GetName())  ) 
-       cout << "Adding SDigits " << GetName() << " from " << folder->GetName() << endl ; 
+    Int_t index = 0 ;  
+    for (index = 0 ; index < nStreams ; index++) {  
+      TString tempo(fEventNames[index]) ; 
+      tempo += index ;
+      printf ("Adding SDigits from %s \n", fInputFileNames[index].Data()) ; 
     }
-    cout << endl ;
-    cout << "Writing digits to " << GetTitle() << endl ;
     
-    cout << endl ;
-    cout << "With following parameters: " << endl ;
-    cout << "     Electronics noise in EMC (fPinNoise) = " << fPinNoise << endl ;
-    cout << "  Threshold  in EMC  (fEMCDigitThreshold) = " << fEMCDigitThreshold  << endl ; ;
-    cout << "                 Noise in CPV (fCPVNoise) = " << fCPVNoise << endl ; 
-    cout << "    Threshold in CPV (fCPVDigitThreshold) = " << fCPVDigitThreshold << endl ; 
-    cout << "               Noise in PPSD (fPPSDNoise) = " << fPPSDNoise << endl ;
-    cout << "  Threshold in PPSD (fPPSDDigitThreshold) = " << fPPSDDigitThreshold << endl ;
-    cout << "---------------------------------------------------" << endl ;
+ //   printf("\nWith following parameters:\n") ;
+ //   printf("  Electronics noise in EMC (fPinNoise)    = %f GeV\n", fPinNoise ) ; 
+ //   printf("  Threshold  in EMC  (fEMCDigitThreshold) = %f GeV\n", fEMCDigitThreshold ) ;  
+ //   printf("  Noise in CPV (fCPVNoise)                = %f aux units\n", fCPVNoise ) ; 
+ //   printf("  Threshold in CPV (fCPVDigitThreshold)   = %f aux units\n",fCPVDigitThreshold ) ;  
+    printf(" ---------------------------------------------------\n") ;   
   }
   else
-    cout << "AliPHOSDigitizer not initialized " << endl ;
+    AliInfo(Form("AliPHOSDigitizer not initialized" )) ;
   
 }
+
 //__________________________________________________________________
-void AliPHOSDigitizer::PrintDigits(Option_t * option){
+ void AliPHOSDigitizer::PrintDigits(Option_t * option)
+{
   // Print a table of digits
+  
 
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ; 
-  TClonesArray * digits = gime->Digits() ; 
+  AliRunLoader* rl = AliRunLoader::GetRunLoader(fEventFolderName) ;
+  AliPHOSLoader * phosLoader = dynamic_cast<AliPHOSLoader*>(rl->GetLoader("PHOSLoader"));
+  TClonesArray * digits = phosLoader->Digits() ; 
+  const AliPHOSGeometry *geom = AliPHOSGeometry::GetInstance() ;
+  
+  AliInfo(Form("%d", digits->GetEntriesFast())) ; 
+  printf("\nevent %d", gAlice->GetEvNumber()) ;
+  printf("\n       Number of entries in Digits list %d", digits->GetEntriesFast() )  ;  
 
-  cout << "AliPHOSDigitiser: event " << gAlice->GetEvNumber() << endl ;
-  cout << "       Number of entries in Digits list " << digits->GetEntriesFast() << endl ;
-  cout << endl ;
-  if(strstr(option,"all")){
-    
+  if(strstr(option,"all")||strstr(option,"EMC")){  
     //loop over digits
     AliPHOSDigit * digit;
-    cout << "Digit Id " << " Amplitude " <<  " Index "  <<  " Nprim " << " Primaries list " <<  endl;      
+    printf("\nEMC digits (with primaries):\n")  ;
+    printf("\n   Id  Amplitude    Time          Index Nprim: Primaries list \n") ;    
+    Int_t maxEmc = geom->GetNModules()*geom->GetNCristalsInModule() ;
     Int_t index ;
-    for (index = 0 ; index < digits->GetEntries() ; index++) {
+    for (index = 0 ; (index < digits->GetEntriesFast()) && 
+          (dynamic_cast<AliPHOSDigit *>(digits->At(index))->GetId() <= maxEmc) ; index++) {
       digit = (AliPHOSDigit * )  digits->At(index) ;
-      cout << setw(8)  <<  digit->GetId() << " "  <<   setw(3)  <<  digit->GetAmp() <<   "  "  
-          << setw(6)  <<  digit->GetIndexInList() << "  "   
-          << setw(5)  <<  digit->GetNprimary() <<"  ";
-      
+      if(digit->GetNprimary() == 0) 
+       continue;
+//       printf("%6d  %8d    %6.5e %4d      %2d :",
+//           digit->GetId(), digit->GetAmp(), digit->GetTime(), digit->GetIndexInList(), digit->GetNprimary()) ;  // YVK
+      printf("%6d  %.4f    %6.5e %4d      %2d :",
+             digit->GetId(), digit->GetEnergy(), digit->GetTime(), digit->GetIndexInList(), digit->GetNprimary()) ;  
       Int_t iprimary;
-      for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++)
-       cout << setw(5)  <<  digit->GetPrimary(iprimary+1) << " ";
-      cout << endl;     
+      for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
+       printf("%d ",digit->GetPrimary(iprimary+1) ) ; 
+      }    
+      printf("\n") ;
     }
-    
   }
-}
-
-//__________________________________________________________________
-void AliPHOSDigitizer::SetSDigitsBranch(const char* title)
-{
-  // we set title (comment) of the SDigits branch in the first! header file
-  if( strcmp(GetName(), "") == 0 )
-    Init() ;
-
-  AliPHOSGetter::GetInstance()->SDigits()->SetName(title) ; 
-}
-
-//__________________________________________________________________
-Bool_t AliPHOSDigitizer::ReadSDigits(Int_t event)
-{
-  // Reads summable digits from the opened files for the particular set of events given by fIevent
-
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ; 
   
-  // loop over all opened files and read their SDigits to the White Board
-  TCollection * folderslist = ((TFolder*)gROOT->FindObjectAny("YSAlice/WhiteBoard/SDigits/PHOS"))->GetListOfFolders() ; 
-  TIter next(folderslist) ; 
-  TFolder * folder = 0 ; 
-  TClonesArray * sdigits = 0 ; 
-  TFile * file; 
-  TTree * treeS = 0;
-  while ( (folder = (TFolder*)next()) ) {
-    printf("Reading folder %s\n",folder->GetName());
-    file = (TFile*)gROOT->GetFile(folder->GetName()); 
-    file->cd() ;
-
-    // Get SDigits Tree header from file
-    TString treeName("TreeS") ;
-    treeName += event ; 
-    treeS = (TTree*)gDirectory->Get(treeName.Data());
-    
-    if(treeS==0){
-      cerr << "ERROR: AliPHOSDigitizer::ReadSDigits There is no SDigit Tree" << endl;
-      return kFALSE;
-    }
-
-    //set address of the SDigits and SDigitizer
-    TBranch   * sdigitsBranch    = 0;
-    TBranch   * sdigitizerBranch = 0;
-    TBranch   * branch           = 0 ;  
-    TObjArray * lob = (TObjArray*)treeS->GetListOfBranches() ;
-    TIter next(lob) ; 
-    Bool_t phosfound = kFALSE, sdigitizerfound = kFALSE ; 
+  if(strstr(option,"all")||strstr(option,"CPV")){
     
-    while ( (branch = (TBranch*)next()) && (!phosfound || !sdigitizerfound) ) {
-      if ( (strcmp(branch->GetName(), "PHOS")==0) && (strcmp(branch->GetTitle(), GetName())==0) ) {
-       phosfound = kTRUE ;
-       sdigitsBranch = branch ; 
-      }
-      
-      else if ( (strcmp(branch->GetName(), "AliPHOSSDigitizer")==0) && (strcmp(branch->GetTitle(), GetName())==0) ) {
-       sdigitizerfound = kTRUE ; 
-       sdigitizerBranch = branch ;
+    //loop over CPV digits
+    AliPHOSDigit * digit;
+    printf("\nCPV digits (with primaries):\n")  ;
+    printf("\n   Id  Amplitude    Time          Index Nprim: Primaries list \n") ;    
+    Int_t maxEmc = geom->GetNModules()*geom->GetNCristalsInModule() ;
+    Int_t index ;
+    for (index = 0 ; index < digits->GetEntriesFast(); index++) {
+      digit = (AliPHOSDigit * )  digits->At(index) ;
+      if(digit->GetId() > maxEmc){
+       printf("%6d  %8d    %4d      %2d :",
+               digit->GetId(), digit->GetAmp(), digit->GetIndexInList(), digit->GetNprimary()) ;  
+       Int_t iprimary;
+       for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
+         printf("%d ",digit->GetPrimary(iprimary+1) ) ; 
+       }    
+       printf("\n") ;
       }
     }
-    if ( !phosfound || !sdigitizerfound ) {
-      cerr << "WARNING: AliPHOSDigitizer::ReadSDigits -> Digits and/or Digitizer branch with name " << GetName() 
-          << " not found" << endl ;
-      return kFALSE ; 
-    }   
-    
-    if ( (sdigits = (TClonesArray*)folder->FindObject(GetName()) ) ) {
-      sdigitsBranch->SetAddress(&sdigits) ;
-      sdigits->Clear();
-      
-      AliPHOSSDigitizer * sdigitizer = gime->SDigitizer() ; 
-      sdigitizerBranch->SetAddress(&sdigitizer) ;
-      
-      sdigitsBranch->GetEntry(0) ;
-      sdigitizerBranch->GetEntry(0) ;
-      
-      fPedestal = sdigitizer->GetPedestalParameter() ;
-      fSlope    = sdigitizer->GetCalibrationParameter() ;
-    }
-    if (treeS) { delete treeS; treeS = 0;}
-  }    
-
-  // After SDigits have been read from all files, return to the first one
-
-  next.Reset();
-  folder = (TFolder*)next();
-  file   = (TFile*)gROOT->GetFile(folder->GetName()); 
-  file   ->cd() ;
-
-  return kTRUE ;
+  }
 
 }
 
-//____________________________________________________________________________
-void AliPHOSDigitizer::Reset() 
-{ 
-  // sets current event number to the first simulated event
-
-  if( strcmp(GetName(), "") == 0 )
-    Init() ;
+//__________________________________________________________________
+Float_t AliPHOSDigitizer::TimeOfNoise(void) const
+{  // Calculates the time signal generated by noise
+  //PH  Info("TimeOfNoise", "Change me") ; 
+  return gRandom->Rndm() * 1.28E-5;
+}
 
- //  Int_t inputs ;
-//   for(inputs = 0; inputs < fNinputs ;inputs++)
-//       fIevent->AddAt(-1, inputs ) ;
+//__________________________________________________________________
+void AliPHOSDigitizer::Unload() 
+{  
+  
+  Int_t i ; 
+  for(i = 1 ; i < fInput ; i++){
+    TString tempo(fEventNames[i]) ; 
+    tempo += i ;
+    AliRunLoader* rl = AliRunLoader::GetRunLoader(tempo) ; 
+    AliPHOSLoader * phosLoader = dynamic_cast<AliPHOSLoader*>(rl->GetLoader("PHOSLoader"));
+    phosLoader->UnloadSDigits() ; 
+  }
   
+  AliRunLoader* rl = AliRunLoader::GetRunLoader(fEventFolderName) ;
+  AliPHOSLoader * phosLoader = dynamic_cast<AliPHOSLoader*>(rl->GetLoader("PHOSLoader"));
+  phosLoader->UnloadDigits() ; 
 }
 
 //____________________________________________________________________________
-void AliPHOSDigitizer::WriteDigits(Int_t event)
+void AliPHOSDigitizer::WriteDigits()
 {
 
   // Makes TreeD in the output file. 
@@ -598,58 +1007,25 @@ void AliPHOSDigitizer::WriteDigits(Int_t event)
   //      and branch "AliPHOSDigitizer", with the same title to keep all the parameters
   //      and names of files, from which digits are made.
 
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ; 
-  TClonesArray * digits = gime->Digits() ; 
-
-  TTree * treeD = 0;
-  TString treeName("TreeD") ;
-  treeName += event ; 
-  treeD = (TTree*)gDirectory->Get(treeName.Data());
-
-  if(treeD==0)
-    gAlice->MakeTree("D") ;  
-
-  // create new branches
-  // -- generate file name if necessary
-  char * file =0;
-  if(gSystem->Getenv("CONFIG_SPLIT_FILE")){ //generating file name
-    file = new char[strlen(gAlice->GetBaseFile())+20] ;
-    sprintf(file,"%s/PHOS.Digits.root",gAlice->GetBaseFile()) ;
+  AliRunLoader* rl = AliRunLoader::GetRunLoader(fEventFolderName) ;
+  AliPHOSLoader * phosLoader = dynamic_cast<AliPHOSLoader*>(rl->GetLoader("PHOSLoader"));
+  const TClonesArray * digits = phosLoader->Digits() ; 
+  TTree * treeD = phosLoader->TreeD();
+  if(!treeD){
+    phosLoader->MakeTree("D");
+    treeD = phosLoader->TreeD();
   }
-
-  TDirectory *cwd = gDirectory;
+  
   // -- create Digits branch
   Int_t bufferSize = 32000 ;    
-  TBranch * digitsBranch = treeD->Branch("PHOS",&digits,bufferSize);
-  digitsBranch->SetTitle(GetName());
-  if (file) {
-    digitsBranch->SetFile(file);
-    TIter next( digitsBranch->GetListOfBranches());
-    TBranch * sbr ;
-    while ((sbr=(TBranch*)next())) {
-      sbr->SetFile(file);
-    }   
-    cwd->cd();
-  } 
-    
-  // -- Create Digitizer branch
-  Int_t splitlevel = 0 ;
-  AliPHOSDigitizer * d = gime->Digitizer(GetName()) ;
-  TBranch * digitizerBranch = treeD->Branch("AliPHOSDigitizer", "AliPHOSDigitizer", &d,bufferSize,splitlevel); 
-  digitizerBranch->SetTitle(GetName());
-  if (file) {
-    digitizerBranch->SetFile(file);
-    TIter next( digitizerBranch->GetListOfBranches());
-    TBranch * sbr;
-    while ((sbr=(TBranch*)next())) {
-      sbr->SetFile(file);
-    }   
-    cwd->cd();
-  }
+  TBranch * digitsBranch = treeD->Branch("PHOS","TClonesArray",&digits,bufferSize);
+  digitsBranch->SetTitle(fEventFolderName);
+  digitsBranch->Fill() ;
+  
+  phosLoader->WriteDigits("OVERWRITE");
+  phosLoader->WriteDigitizer("OVERWRITE");
 
-  digitsBranch->Fill() ;      
-  digitizerBranch->Fill() ;
+  Unload() ; 
 
-  treeD->Write(0,kOverwrite) ;  
-  treeD->Delete("");
 }