/[PAMELA software]/PamelaLevel2/src/PamLevel2.cpp

Diff of /PamelaLevel2/src/PamLevel2.cpp

Parent Directory | Revision Log | View Patch Patch

-revision 1.6 by pam-fi,
Tue Oct 24 10:24:27 2006 UTC
+revision 1.29 by mocchiut,
Sat Mar 17 08:41:09 2007 UTC
 Line 7
   * Default constructor
   */
  PamTrack::PamTrack(){
-     trk_track  = this->TrkTrack::GetTrkTrack();
+     trk_track  = 0;
-     calo_track = this->CaloTrkVar::GetCaloTrkVar();
+     calo_track = 0;
-     tof_track  = this->ToFTrkVar::GetToFTrkVar();
+     tof_track  = 0;
+     candeleteobj = 0;
  };
  //--------------------------------------
  //
-Line 19 
 PamTrack::PamTrack(){
+Line 20 
 PamTrack::PamTrack(){
   * Constructor
   */
  PamTrack::PamTrack(TrkTrack* t, CaloTrkVar* c, ToFTrkVar* o){
-     trk_track  = this->TrkTrack::GetTrkTrack();
-     calo_track = this->CaloTrkVar::GetCaloTrkVar();
+     trk_track  = 0;
-     tof_track  = this->ToFTrkVar::GetToFTrkVar();
+     calo_track = 0;
-     if(t) *trk_track  = *t;
+     tof_track  = 0;
-     if(c) *calo_track = *c;
+ //     if(t)trk_track  = new TrkTrack(*t);
-     if(o) *tof_track  = *o;
+ //     if(c)calo_track = new CaloTrkVar(*c);
+ //     if(o)tof_track  = new ToFTrkVar(*o);
+     if(t)trk_track  = t;
+     if(c)calo_track = c;
+     if(o)tof_track  = o;
+     candeleteobj = 0;
  };
+ PamTrack::PamTrack(const PamTrack& track){
+     TrkTrack   *t = track.trk_track;
+     CaloTrkVar *c = track.calo_track;
+     ToFTrkVar  *o = track.tof_track;
+     trk_track  = 0;
+     calo_track = 0;
+     tof_track  = 0;
+     if(t)trk_track  = new TrkTrack(*t);
+     if(c)calo_track = new CaloTrkVar(*c);
+     if(o)tof_track  = new ToFTrkVar(*o);
+     candeleteobj = 1;
+ }
+ void PamTrack::Clear(){
+ //    cout << "PamTrack::Clear() "<<candeleteobj<<endl;
+     if(candeleteobj){
+         if(trk_track)  trk_track->TrkTrack::Clear();
+         if(calo_track) calo_track->CaloTrkVar::Clear();//???
+         if(tof_track)  tof_track->ToFTrkVar::Clear();//???
+     }else{
+         trk_track  = 0;
+         calo_track = 0;
+         tof_track  = 0;
+     }
+ }
+ void PamTrack::Delete(){
+ //    cout << "PamTrack::Delete() "<<candeleteobj<<endl;
+     if(candeleteobj){
+         if(trk_track)  {
+             trk_track->TrkTrack::Clear();
+             delete trk_track;
+         }
+         if(calo_track){
+             calo_track->CaloTrkVar::Clear();//???
+             delete calo_track;
+         }
+         if(tof_track){
+             tof_track->ToFTrkVar::Clear();//???
+             delete tof_track;
+         }
+     }else{
+         Clear();
+     }
+ }
  //--------------------------------------
  //
  //
-Line 36 
 PamTrack::PamTrack(TrkTrack* t, CaloTrkV
+Line 89 
 PamTrack::PamTrack(TrkTrack* t, CaloTrkV
   */
  PamLevel2::PamLevel2(){
-     trk_l1_obj  = this->TrkLevel1::GetTrkLevel1();
+ //     trk2_obj  = TrkLevel2::GetTrkLevel2();
-     trk_obj     = this->TrkLevel2::GetTrkLevel2();
+ //     trk1_obj  = TrkLevel1::GetTrkLevel1();
-     calo_obj    = this->CaloLevel2::GetCaloLevel2();
+ //     trkh_obj  = TrkHough::GetTrkHough();
-     tof_obj     = this->ToFLevel2::GetToFLevel2();
+ //     calo1_obj = CaloLevel1::GetCaloLevel1();
-     trig_obj    = this->TrigLevel2::GetTrigLevel2();
+ //     calo2_obj = CaloLevel2::GetCaloLevel2();
-     s4_obj      = this->S4Level2::GetS4Level2();
+ //     tof_obj   = ToFLevel2::GetToFLevel2();
-     nd_obj      = this->NDLevel2::GetNDLevel2();
+ //     trig_obj  = TrigLevel2::GetTrigLevel2();
-     ac_obj      = this->AcLevel2::GetAcLevel2();
+ //     s4_obj    = S4Level2::GetS4Level2();
-     orb_obj     = this->OrbitalInfo::GetOrbitalInfo();
+ //     nd_obj    = NDLevel2::GetNDLevel2();
+ //     ac_obj    = AcLevel2::GetAcLevel2();
-     run_obj     = new GL_RUN();
+ //     orb_obj   = OrbitalInfo::GetOrbitalInfo();
-     sorted_tracks = new TRefArray();
+     h0_obj    = 0;
+     trk0_obj  = 0;
-     CAL = true;
-     TRK = true;
+     trk2_obj  = 0;
-     TRG = true;
+     trk1_obj  = 0;
-     TOF = true;
+     trkh_obj  = 0;
-     S4  = true;
+     calo1_obj = 0;
-     ND  = true;
+     calo2_obj = 0;
-     AC  = true;
+     tof_obj   = 0;
-     ORB = true;
+     trig_obj  = 0;
+     s4_obj    = 0;
+     nd_obj    = 0;
+     ac_obj    = 0;
+     orb_obj   = 0;
+     run_obj   = 0;//new GL_RUN();
+     soft_obj   = 0;// Emiliano
+     irun = -1;
+     runfirstentry = 0ULL;
+     runlastentry = 0ULL;
+     l0_file = NULL;
+     l0_tree = NULL;
+     iroot   = -1;
+     dbc     = 0;
+     irun = -1;
+     run_tree = NULL;
+     run_tree_clone = NULL;
+     sel_tree = NULL;
+     sel_tree_clone = NULL;
+     irunentry = -1;
+     pam_tree = NULL;
+     for(Int_t i=0; i<NCLONES; i++ )pam_tree_clone[i]=NULL;
+     host = "mysql://localhost/pamelaprod";
+     user = "anonymous";
+     psw = "";
+     const char *pamdbhost=gSystem->Getenv("PAM_DBHOST");
+     const char *pamdbuser=gSystem->Getenv("PAM_DBUSER");
+     const char *pamdbpsw=gSystem->Getenv("PAM_DBPSW");
+     if ( !pamdbhost ) pamdbhost = "";
+     if ( !pamdbuser ) pamdbuser = "";
+     if ( !pamdbpsw ) pamdbpsw = "";
+     if ( strcmp(pamdbhost,"") ) host = pamdbhost;
+     if ( strcmp(pamdbuser,"") ) user = pamdbuser;
+     if ( strcmp(pamdbpsw,"") ) psw = pamdbpsw;
+ //    sorted_tracks = 0;//new TRefArray();
+     CAL0 = false;
+     CAL1 = true;
+     CAL2 = true;
+     TRK2 = true;
+     TRK1 = false;
+     TRKh = false;
+     TRKh = false;
+     TRG  = true;
+     TOF  = true;
+     TOF0 = false;
+     S4   = true;
+     ND   = true;
+     AC   = true;
+     ORB  = true;
-     TRK_L1 = false;
+     RUN  = true;
-     Tout  = NULL;
+     SELLI = -1;
+     tsorted=0;
+     timage=0;
  };
  /**
-  * Destructor
+  * Delete the event (act as Dtor)
   */
- PamLevel2::~PamLevel2(){
+ void PamLevel2::Delete(){
-     TrkLevel1::Clear();
+     if(run_obj)delete run_obj;
+     if(soft_obj)delete soft_obj; //Emiliano
-     TrkLevel2::Clear();
-     CaloLevel2::Clear();
+ //    cout << "void PamLevel2::Clear()"<<endl;
-     ToFLevel2::Clear();
+     if(h0_obj)   delete h0_obj;
-     TrigLevel2::Clear();
+     if(trk0_obj) delete trk0_obj;
-     S4Level2::Clear();
+     if(trk1_obj) delete trk1_obj;
-     NDLevel2::Clear();
+     if(trk2_obj) delete trk2_obj;
-     AcLevel2::Clear();
+     if(trkh_obj) delete trkh_obj;
-     OrbitalInfo::Clear();
+     if(calo1_obj)delete calo1_obj;
+     if(calo2_obj)delete calo2_obj;
+     if(tof_obj)  delete tof_obj;
+     if(trig_obj) delete trig_obj;
+     if(s4_obj)   delete s4_obj;
+     if(nd_obj)   delete nd_obj;
+     if(ac_obj)   delete ac_obj;
+     if(orb_obj)  delete orb_obj;
+     if(tsorted){
+         tsorted->Delete();
+         delete tsorted;
+     }
+     if(timage){
+         timage->Delete();
+         delete timage;
+     }
+     if(dbc){
+         dbc->Close();
+         delete dbc;
+     }
-     delete run_obj;
+     if(l0_file)l0_file->Close();
+     if(pam_tree)pam_tree->Delete();;
+     if(run_tree)run_tree->Delete();;
+     if(sel_tree)sel_tree->Delete();;
+     for(Int_t i=0; i<NCLONES; i++ )if(pam_tree_clone[i])pam_tree_clone[i]->Delete();;
+     if(run_tree_clone)run_tree_clone->Delete();;
+     if(sel_tree_clone)sel_tree_clone->Delete();;
- //      delete sorted_tracks;
-     sorted_tracks->Delete(); // clean the reference array
-     if(Tout)Tout->Delete(); // delete loaded tree from memory
  };
  /**
-  * Clear the event
+  * Clear the event (NB! does not deallocate objects)
   */
  void PamLevel2::Clear(){
-     TrkLevel1::Clear();
+ //    cout << "void PamLevel2::Clear()"<<endl;
-     TrkLevel2::Clear();
+ //
-     CaloLevel2::Clear();
+ // This method is called once for every entry but RunInfo and SoftInfo do not change until the next run so we cannot clear them here unless we don't
-     ToFLevel2::Clear();
+ // want to load them for each event even if they are the same...
-     TrigLevel2::Clear();
+ //
-     S4Level2::Clear();
+ //    if(run_obj)delete run_obj;
-     NDLevel2::Clear();
+ //    if(run_obj) run_obj->Clear();  // Emiliano: Do not deallocate run_obj here, it will give segmentation fault! call clear instead
-     AcLevel2::Clear();
+ //    if(soft_obj) soft_obj->Clear();
-     OrbitalInfo::Clear();
+     if(h0_obj)   h0_obj->Clear();
+     if(trk0_obj) trk0_obj->Clear();
+     if(trk1_obj) trk1_obj->Clear();
+     if(trk2_obj) trk2_obj->Clear();
+     if(trkh_obj) trkh_obj->Clear();
+     if(calo1_obj)calo1_obj->Clear();
+     if(calo2_obj)calo2_obj->Clear();
+     if(tof_obj)  tof_obj->Clear();
+     if(trig_obj) trig_obj->Clear();
+     if(s4_obj)   s4_obj->Clear();
+     if(nd_obj)   nd_obj->Clear();
+     if(ac_obj)   ac_obj->Clear();
+     if(orb_obj)  orb_obj->Clear();
-     sorted_tracks->Delete(); // clean the reference array
+ //    if(sorted_tracks)sorted_tracks->Clear();
+ //    sorted_tracks.Clear();
+     if(tsorted){
+         tsorted->Delete();
+     }
+     if(timage){
+         timage->Delete();
+     }
  };
-Line 112 
 void PamLevel2::Clear(){
+Line 271 
 void PamLevel2::Clear(){
  //
  //
  //--------------------------------------
+ void *PamLevel2::GetPointerTo(const char* c ){
+     TString objname = c;
+     if(!objname.CompareTo("TrkLevel1"))  {
+         if(!trk1_obj){
+             trk1_obj  = new TrkLevel1();
+             trk1_obj->Set();
+         }
+         return &trk1_obj;
+     };
+     if(!objname.CompareTo("TrkLevel2"))  {
+         if(!trk2_obj){
+             trk2_obj  = new TrkLevel2();
+             trk2_obj->Set();
+         }
+         return &trk2_obj;
+     };
+     if(!objname.CompareTo("TrkHough"))   {
+         if(!trkh_obj)  trkh_obj  = new TrkHough();
+         return &trkh_obj;
+     };
+     if(!objname.CompareTo("CaloLevel1")) {
+         if(!calo1_obj) calo1_obj = new CaloLevel1();
+         return &calo1_obj;
+     };
+     if(!objname.CompareTo("CaloLevel2")) {
+         if(!calo2_obj){
+             calo2_obj = new CaloLevel2();
+             calo2_obj->Set();
+         };
+         return &calo2_obj;
+     };
+     if(!objname.CompareTo("ToFLevel2"))  {
+         if(!tof_obj){
+             tof_obj   = new ToFLevel2();
+             tof_obj->Set();
+         }
+         return &tof_obj;
+     };
+     if(!objname.CompareTo("TrigLevel2")) {
+         if(!trig_obj)  trig_obj  = new TrigLevel2();
+         return &trig_obj;
+     };
+     if(!objname.CompareTo("S4Level2"))   {
+         if(!s4_obj)    s4_obj    = new S4Level2();
+         return &s4_obj;
+     };
+     if(!objname.CompareTo("NDLevel2"))   {
+         if(!nd_obj)    nd_obj    = new NDLevel2();
+         return &nd_obj;
+     };
+     if(!objname.CompareTo("AcLevel2"))   {
+         if(!ac_obj)    ac_obj    = new AcLevel2();
+         return &ac_obj;
+     };
+     if(!objname.CompareTo("OrbitalInfo")){
+         if(!orb_obj)   orb_obj   = new OrbitalInfo();
+         return &orb_obj;
+     };
+     if(!objname.CompareTo("RunInfo"))return &run_obj;
+     if(!objname.CompareTo("SoftInfo"))return &soft_obj; // Emiliano
+     return NULL;
+ };
+ //--------------------------------------
+ //
+ //
+ //--------------------------------------
  /**
   * Retrieves the calorimeter track matching the seqno-th tracker stored track.
   * (If seqno = -1 retrieves the self-trigger calorimeter track)
   */
   CaloTrkVar *PamLevel2::GetCaloStoredTrack(int seqno){
-      if( CaloLevel2::ntrk()==0 ){
+      if( !calo2_obj )return 0;
+      if( calo2_obj->CaloLevel2::ntrk()==0 ){
           cout << "PamLevel2::GetCaloStoredTrack(int) : requested tracker SeqNo "<< seqno <<" but no Calorimeter tracks are stored"<<endl;
           return NULL;
       };
-Line 127 
 void PamLevel2::Clear(){
+Line 359 
 void PamLevel2::Clear(){
       Int_t it_calo=0;
       do{
-          c = CaloLevel2::GetCaloTrkVar(it_calo);
+          c = calo2_obj->CaloLevel2::GetCaloTrkVar(it_calo);
           it_calo++;
-      } while( c && seqno != c->trkseqno && it_calo < CaloLevel2::ntrk());
+      } while( c && seqno != c->trkseqno && it_calo < calo2_obj->CaloLevel2::ntrk());
       if(!c || seqno != c->trkseqno){
           c = 0;
-Line 148 
 void PamLevel2::Clear(){
+Line 380 
 void PamLevel2::Clear(){
   */
   ToFTrkVar *PamLevel2::GetToFStoredTrack(int seqno){
-      if( ToFLevel2::ntrk()==0 ){
+      if( !tof_obj )return 0;
+      if( tof_obj->ToFLevel2::ntrk()==0 ){
           cout << "PamLevel2::GetToFStoredTrack(int) : requested tracker SeqNo "<< seqno <<" but no ToF tracks are stored"<<endl;
           return NULL;
       };
-Line 157 
 void PamLevel2::Clear(){
+Line 391 
 void PamLevel2::Clear(){
       Int_t it_tof=0;
       do{
-          c = ToFLevel2::GetToFTrkVar(it_tof);
+          c = tof_obj->ToFLevel2::GetToFTrkVar(it_tof);
           it_tof++;
-      } while( c && seqno != c->trkseqno && it_tof < ToFLevel2::ntrk());
+      } while( c && seqno != c->trkseqno && it_tof < tof_obj->ToFLevel2::ntrk());
       if(!c || seqno != c->trkseqno){
           c = 0;
-Line 177 
 void PamLevel2::Clear(){
+Line 411 
 void PamLevel2::Clear(){
   * Give the pamela track associated to a tracker track, retrieving related calorimeter and tof track information.
   */
   PamTrack* PamLevel2::GetPamTrackAlong(TrkTrack* t){
+      cout <<"PamLevel2::GetPamTrackAlong(TrkTrack* t) **obsolete** "<<endl;
+      cout <<"(if you use it, remember to delete the PamTrack object)"<<endl;
       CaloTrkVar *c = 0;
       ToFTrkVar  *o = 0;
-      if(CAL) c = GetCaloStoredTrack(t->GetSeqNo());
+      if(CAL2) c = GetCaloStoredTrack(t->GetSeqNo());
       if(TOF) o = GetToFStoredTrack(t->GetSeqNo());
  //    if(t && c && o)track = new PamTrack(t,c,o);
-Line 202 
 void PamLevel2::Clear(){
+Line 439 
 void PamLevel2::Clear(){
  PamTrack* PamLevel2::GetStoredTrack(Int_t itrk){
+     cout <<"PamLevel2::GetStoredTrack(Int_t itrk) **to-be-updated** "<<endl;
+     cout <<"for the moment, better use separately the methods: TrkLevel2::GetStoredTrack(seqno) CaloLevel2::GetCaloTrkVar(Int_t notrack) ToFLevel2::GetToFTrkVar(Int_t notrack)"<<endl;
+     cout <<"(if you use it, remember to delete the PamTrack object)"<<endl;
      PamTrack *track = 0;
-     if( itrk >=0 && itrk < TrkLevel2::ntrk() ){
+     if( itrk >=0 && itrk < trk2_obj->TrkLevel2::ntrk() ){
-         TrkTrack *t = TrkLevel2::GetStoredTrack(itrk);
+         TrkTrack *t = trk2_obj->TrkLevel2::GetStoredTrack(itrk);
          track = GetPamTrackAlong(t);
      }else{
-         cout << "PamLevel2::GetStoredTrack(int) : tracker track SeqNo "<< itrk <<" does not exist (GetNTracks() = "<<TrkLevel2::GetNTracks()<<")"<<endl;
+         cout << "PamLevel2::GetStoredTrack(int) : tracker track SeqNo "<< itrk <<" does not exist (GetNTracks() = "<<trk2_obj->TrkLevel2::GetNTracks()<<")"<<endl;
      };
      return track;
-Line 224 
 PamTrack* PamLevel2::GetStoredTrack(Int_
+Line 466 
 PamTrack* PamLevel2::GetStoredTrack(Int_
   * Sort physical (tracker) tracks and stores them in the TRefArray (of TrkTrack objects) which pointer is  PamLevel2::sorted_tracks.
   * @param how String to set the sorting cryterium (es: "CAL" or "TRK+CAL+TOF" ecc...).
   * Sorting cryteria:
   * TRK: lower chi**2
   * CAL: lower Y spatial residual on the first calorimeter plane
   * TOF: bigger numebr of hit PMTs along the track, on S12 S21 S32 (where paddles are along the Y axis).
   * The default sorting cryterium is "TOF+CAL".
-Line 233 
 PamTrack* PamLevel2::GetStoredTrack(Int_
+Line 475 
 PamTrack* PamLevel2::GetStoredTrack(Int_
   */
  void PamLevel2::SortTracks(TString how){
+ //    cout <<" PamLevel2::SortTracks(TString how) "<<endl;
+     if( !trk2_obj ){
+         cout << "void PamLevel2::SortTracks(TString how):  TrkLevel2 not loaded !!!";
+         return;
+     };
+ //    cout << "call SortTracs() "<<endl;
    //Save current Object count
      Int_t ObjectNumber = TProcessID::GetObjectCount();
-     sorted_tracks->Delete(); //temporaneo???
+ //    cout << "ObjectNumber  "<<ObjectNumber <<endl;
+ //     if(!sorted_tracks)sorted_tracks = new TRefArray();
+ //     sorted_tracks->Clear();
+ //    sorted_tracks.Clear();
+     if(!tsorted)tsorted = new TClonesArray("PamTrack",trk2_obj->GetNTracks());
+     tsorted->Delete();
+     TClonesArray &ttsorted = *tsorted;
+     if(!timage)timage = new TClonesArray("PamTrack",trk2_obj->GetNTracks());
+     timage->Delete();
+     TClonesArray &ttimage = *timage;
      // loop over the tracks sorted by the tracker
      Bool_t use_TRK = how.Contains("TRK", TString::kIgnoreCase);
      Bool_t use_CAL = how.Contains("CAL", TString::kIgnoreCase);
      Bool_t use_TOF = how.Contains("TOF", TString::kIgnoreCase);
-     if( !CAL &&  use_CAL) use_CAL = false;
+     if( !CAL2 &&  use_CAL) use_CAL = false;
      if( !TOF &&  use_TOF) use_TOF = false;
-     if( !TRK ){
+     if( !TRK2 ){
-         cout << "SortTracks() : without tracker does not work!!! (not yet)" << endl;
+ //      cout << "SortTracks() : without tracker does not work!!! (not yet)" << endl;
          return;
      };
+     //   cout << "use_CAL "<<use_CAL<<" use_TOF "<<use_TOF<<" use_TRK "<<use_TRK <<endl;
-     for(Int_t i=0; i < TrkLevel2::GetNTracks(); i++){
+     for(Int_t i=0; i < trk2_obj->TrkLevel2::GetNTracks(); i++){
-         TrkTrack *ts = 0;
+         TrkTrack   *ts = 0;
+         CaloTrkVar *cs = 0;
+         ToFTrkVar  *os = 0;
          // get tracker tracks
-         TrkTrack   *tp = TrkLevel2::GetTrack(i);                    //tracker
+         TrkTrack   *tp = trk2_obj->TrkLevel2::GetTrack(i);                    //tracker
- //              CaloTrkVar *cp = GetCaloStoredTrack(tp->GetSeqNo());
+         CaloTrkVar *cp = GetCaloStoredTrack(tp->GetSeqNo());
- //              ToFTrkVar  *op = GetToFStoredTrack(tp->GetSeqNo());
+         ToFTrkVar  *op = GetToFStoredTrack(tp->GetSeqNo());
-         CaloTrkVar *cp = 0;
-         ToFTrkVar  *op = 0;
+         TrkTrack   *ti = 0;              //tracker (image)
+         CaloTrkVar *ci = 0;
+         ToFTrkVar  *oi = 0;
+ //      cout << "trk track n. "<<i << " "<<hex<< tp <<dec<< endl;
          // if track has an image, check image selection
          if(tp->HasImage()){
-             TrkTrack   *ti = TrkLevel2::GetTrackImage(i);              //tracker (image)
+             ti = trk2_obj->TrkLevel2::GetTrackImage(i);              //tracker (image)
- //                      CaloTrkVar *ci = GetCaloStoredTrack(ti->GetSeqNo());
+             ci = GetCaloStoredTrack(ti->GetSeqNo());
- //                      ToFTrkVar  *oi = GetToFStoredTrack(ti->GetSeqNo());
+             oi = GetToFStoredTrack(ti->GetSeqNo());
-             CaloTrkVar *ci = 0;
-             ToFTrkVar  *oi = 0;
+ //          cout << "its image "<<i << " "<<hex<< ti <<dec<< endl;
              //assign starting scores
              Int_t tp_score = 0;  //main track sorted by the tracker
              Int_t ti_score = 0;  //image track
-Line 280 
 void PamLevel2::SortTracks(TString how){
+Line 546 
 void PamLevel2::SortTracks(TString how){
              // ------------------------
              // check the Y spatial residual on the first calorimeter plane
              // (cut on calorimeter variables from Emiliano)
+             if( use_CAL && !calo2_obj ){
+                 cout << "void PamLevel2::SortTracks(TString how): how= "<<how<<" but CaloLevel2 not loaded !!!";
+                 return;
+             };
              if(
                  use_CAL            &&
-                 npcfit[1] > 15     &&   //no. of fit planes on Y view
+                 calo2_obj->npcfit[1] > 15     &&   //no. of fit planes on Y view
-                 varcfit[1] < 1000. &&  //fit variance on Y view
+                 calo2_obj->varcfit[1] < 1000. &&  //fit variance on Y view
+                 cp && ci &&
                  true){
-                 cp = GetCaloStoredTrack(tp->GetSeqNo());
+                 Float_t resy_p = cp->tbar[0][1] - calo2_obj->cbar[0][1]; if(resy_p < 0)resy_p= - resy_p;
-                 ci = GetCaloStoredTrack(ti->GetSeqNo());
+                 Float_t resy_i = ci->tbar[0][1] - calo2_obj->cbar[0][1]; if(resy_i < 0)resy_i= - resy_i;
-                 Float_t resy_p = cp->tbar[0][1] - cbar[0][1]; if(resy_p < 0)resy_p= - resy_p;
-                 Float_t resy_i = ci->tbar[0][1] - cbar[0][1]; if(resy_i < 0)resy_i= - resy_i;
                  if(resy_p <= resy_i) tp_score++;
                  else                 ti_score++;
+ //              cout << "CALO "<<tp_score<<ti_score<<endl;
              };
              // ------------------------
              // TOF check
              // ------------------------
              // check the number of hit pmts along the track
              // on S12 S21 and S32, where paddles are parallel to Y axis
-             if( use_TOF ){
+             if( use_TOF && !tof_obj ){
+                 cout << "void PamLevel2::SortTracks(TString how): how= "<<how<<" but ToFLevel2 not loaded !!!";
+                 return;
+             };
+             if( use_TOF && op && oi ){
                  Int_t nphit_p =0;
                  Int_t nphit_i =0;
-                 op = GetToFStoredTrack(tp->GetSeqNo());
-                 oi = GetToFStoredTrack(ti->GetSeqNo());
  /*                              cout << "track: npmtadc "<< op->npmtadc << endl;
                                  cout << "track: npmttdc "<< op->npmttdc << endl;
-Line 314 
 void PamLevel2::SortTracks(TString how){
+Line 588 
 void PamLevel2::SortTracks(TString how){
                                  cout << "image: npmttdc "<< oi->npmttdc << endl;*/
                  for (Int_t ih=0; ih < op->npmtadc; ih++){
-                     Int_t pl = GetPlaneIndex( (op->pmtadc).At(ih) );
+                     Int_t pl = tof_obj->GetPlaneIndex( (op->pmtadc).At(ih) );
                      if(pl == 1 || pl == 2 || pl == 5)nphit_p++;
                  };
                  for (Int_t ih=0; ih < oi->npmtadc; ih++){
-                     Int_t pl = GetPlaneIndex( (oi->pmtadc).At(ih) );
+                     Int_t pl = tof_obj->GetPlaneIndex( (oi->pmtadc).At(ih) );
                      if(pl == 1 || pl == 2 || pl == 5)nphit_i++;
                  };
-Line 331 
 void PamLevel2::SortTracks(TString how){
+Line 605 
 void PamLevel2::SortTracks(TString how){
                      if( nphit_p >= nphit_i) tp_score++;
                      else ti_score++;
                  };
+ //              cout << "TOF "<<tp_score<<ti_score<<endl;
              };
              if(tp_score == ti_score) use_TRK = true;
              // ------------------------
-Line 342 
 void PamLevel2::SortTracks(TString how){
+Line 617 
 void PamLevel2::SortTracks(TString how){
              if(use_TRK){
                  if(      tp->chi2 > 0 && tp->chi2 < ti->chi2 ) tp_score++ ;
                  else if( ti->chi2 > 0 && ti->chi2 < tp->chi2 ) ti_score++ ;
+ //              cout << "TRK "<<tp_score<<ti_score<<endl;
              };
              // ------------------------
              // the winner is....
              // ------------------------
-             if      (tp_score > ti_score) ts = tp;//the track sorted by the tracker!!
+             if      (tp_score > ti_score) {
-             else if (tp_score < ti_score) ts = ti;//its image!!
+ //              ts = tp;//the track sorted by the tracker!!
-             else {
+ //              cs = cp;
-                 ts = tp;
+ //              os = op;
+             }else if (tp_score < ti_score) {
+                 ts = ti;//its image!!
+                 cs = ci;
+                 os = oi;
+                 ti = tp;//its image!!
+                 ci = cp;
+                 oi = op;
+                 tp = ts;//its image!!
+                 cp = cs;
+                 op = os;
+             }else {
+ //              ts = tp;
+ //              cs = cp;
+ //              os = op;
  //                              cout << "Warning - track image ambiguity not solved" << endl;
  //                              cout << ts->GetNtot() << " "<< ts->chi2 << " " << npcfit[1] << " "<< nphit_p << endl;
              };
          }else{
-             ts = tp;
+ //          ts = tp;
+ //          cs = cp;
+ //          os = op;
          };
- //              cout <<" SortTracks() "<<i<<" -- "<<ts<<endl;
+ //      cout <<" SortTracks() "<<i<<" -- "<<ts<<endl;
-         sorted_tracks->Add(ts);//save the track in the sorted array
+ //      sorted_tracks->Add(ts);//save the track in the sorted array
- //              cout << "SortTracks:: sorted_tracks->Add(it) "<<i<<" "<<ts<<endl;
+ //      sorted_tracks.Add(ts);//save the track in the sorted array
+ //      sorted_tracks.Add(tp);//save the track in the sorted array
-     };
+ //      cout << "SortTracks:: sorted_tracks->Add(it) "<<i<<" "<<ts<<endl;
+ //      cout<<"o "<<tp<<endl;
+ //      cout<<"o "<<cp<<endl;
+ //      cout<<"o "<<op<<endl;
+         new(ttsorted[i]) PamTrack(tp,cp,op);
+         new(ttimage[i])  PamTrack(ti,ci,oi);
+     };
+     if( tsorted->GetEntries() != trk2_obj->GetNTracks() ){
+         cout << "void PamLevel2::SortTracks(TString how): tsorted->GetEntries() "<<tsorted->GetEntries()<<" != trk2_obj->GetNTracks() = "<<trk2_obj->GetNTracks() <<endl;
+         tsorted->Delete(); tsorted=0;
+         timage->Delete(); timage=0;
+     }
      //Restore Object count
      //To save space in the table keeping track of all referenced objects
-     //we assume that our events do not address each other. We reset the
+     //We reset the object count to what it was at the beginning of the event.
-     //object count to what it was at the beginning of the event.
      TProcessID::SetObjectCount(ObjectNumber);
  };
-Line 379 
 void PamLevel2::SortTracks(TString how){
+Line 687 
 void PamLevel2::SortTracks(TString how){
   * This method overrides TrkLevel2::GetTracks(), where sorting is done by decreasing number of fit points and increasing chi^2.
   * PamLevel2::GetTracks() keeps the same track order given by TrkLevel2::GetTracks(), but checks image selection by using calorimeter and ToF tracking information.
   */
-  TRefArray *PamLevel2::GetTracks(){
+ // TRefArray *PamLevel2::GetTracks(){
-          //
- //      SortTracks("+CAL+TOF");
+ // //  *-*-*-*-*-*-*-*-*-*-*-*-*
-          SortTracks("+CAL+TRK");//TEMP!!!!!!!!!!!!!
+ //     SortTracks("+CAL+TOF");
-         //
+ // //  *-*-*-*-*-*-*-*-*-*-*-*-*
-         return sorted_tracks;
+ // //   return  sorted_tracks;
+ //     return &sorted_tracks;
+ //  };
+ TClonesArray *PamLevel2::GetTracks(){
+ //  *-*-*-*-*-*-*-*-*-*-*-*-*
+     SortTracks("+CAL+TOF");
+ //  *-*-*-*-*-*-*-*-*-*-*-*-*
+     return tsorted;
   };
  //--------------------------------------
   //
-Line 396 
 void PamLevel2::SortTracks(TString how){
+Line 716 
 void PamLevel2::SortTracks(TString how){
   * @param it Track number, ranging from 0 to GetNTracks().
   */
  PamTrack *PamLevel2::GetTrack(int it){
+ //    if(!trk2_obj) return 0;
- //  *-*-*-*-*-*-*
+ // //  *-*-*-*-*-*-*-*-*-*-*-*-*
- //      SortTracks("+CAL+TOF");
+ //     SortTracks("+CAL+TOF");
-     SortTracks("+CAL+TRK");//TEMP!!!!!!!!!!!!!
+ // //  *-*-*-*-*-*-*-*-*-*-*-*-*
- //  *-*-*-*-*-*-*
+ // //    if(!sorted_tracks)return 0;
+ //     if(sorted_tracks.IsEmpty())return 0;
+ //     PamTrack *track = 0;
+ //     if( it >=0 && it < trk2_obj->TrkLevel2::GetNTracks() && it<sorted_tracks.GetEntriesFast() ){
+ //      TrkTrack   *t = (TrkTrack*)sorted_tracks.At(it);
+ //      track = GetPamTrackAlong(t);
+ //     }else{
+ //      cout << "PamLevel2::GetTrack(int) : tracker track SeqNo "<< it <<" does not exist (GetNTracks() = "<<trk2_obj->TrkLevel2::GetNTracks()<<")"<<endl;
+ //     };
+ //     return track;
+ //    cout << "PamLevel2::GetTrack(int it) "<<endl;
+ //  *-*-*-*-*-*-*-*-*-*-*-*-*
+     SortTracks("+CAL+TOF");
+ //  *-*-*-*-*-*-*-*-*-*-*-*-*
+     if(!tsorted)return 0;
+     if(!tsorted->GetEntries())return 0;
      PamTrack *track = 0;
-     if( it >=0 && it < TrkLevel2::GetNTracks() && it<sorted_tracks->GetEntriesFast() ){
+     if( it >=0 && it < trk2_obj->TrkLevel2::GetNTracks()){
-         TrkTrack   *t = (TrkTrack*)sorted_tracks->At(it);
+ //      TrkTrack   *t = (TrkTrack*)sorted_tracks.At(it);
-         track = GetPamTrackAlong(t);
+ //      track = GetPamTrackAlong(t);
+         TClonesArray &t = *(tsorted);
+         track = (PamTrack*)t[it];
      }else{
-         cout << "PamLevel2::GetTrack(int) : tracker track SeqNo "<< it <<" does not exist (GetNTracks() = "<<TrkLevel2::GetNTracks()<<")"<<endl;
+         cout << "PamLevel2::GetTrack(int) : tracker track SeqNo "<< it <<" does not exist (GetNTracks() = "<<trk2_obj->TrkLevel2::GetNTracks()<<")"<<endl;
      };
      return track;
-Line 425 
 PamTrack *PamLevel2::GetTrack(int it){
+Line 769 
 PamTrack *PamLevel2::GetTrack(int it){
   */
  PamTrack *PamLevel2::GetTrackImage(int it){
- //      SortTracks("+CAL+TOF");
+ //     if(!trk2_obj) return 0;
-         SortTracks("+CAL+TRK");//TEMP!!!!!!!!!!!!!
-         PamTrack *image = 0;
-         if( it >=0 && it < TrkLevel2::GetNTracks() ){
+ // //  *-*-*-*-*-*-*-*-*-*-*-*-*
-                 TrkTrack *temp = (TrkTrack*)sorted_tracks->At(it);
+ //     SortTracks("+CAL+TOF");
-                 if( temp->HasImage() ){
+ // //  *-*-*-*-*-*-*-*-*-*-*-*-*
-                         TrkTrack   *t = TrkLevel2::GetStoredTrack(temp->GetImageSeqNo());
+ // //    if(!sorted_tracks)return 0;
-                         image = GetPamTrackAlong(t);
+ //     if(sorted_tracks.IsEmpty())return 0;
-                 }else{
-                         cout <<"PamLevel2::GetTrackImage(int) : Track SeqNo "<<it<<" does not have image"<<endl;
+ //     PamTrack *image = 0;
-                 };
+ //     if( it >=0 && it < trk2_obj->TrkLevel2::GetNTracks() ){
+ //      TrkTrack *temp = (TrkTrack*)sorted_tracks.At(it);
+ //      if( temp->HasImage() ){
+ //          TrkTrack   *t = trk2_obj->TrkLevel2::GetStoredTrack(temp->GetImageSeqNo());
+ //          image = GetPamTrackAlong(t);
+ //      }else{
+ //          cout <<"PamLevel2::GetTrackImage(int) : Track SeqNo "<<it<<" does not have image"<<endl;
+ //      };
+ //     }else{
+ //      cout << "PamLevel2::GetTrackImage(int) : Tracker track SeqNo "<< it <<" does not exist (GetNTracks() = "<<trk2_obj->TrkLevel2::GetNTracks()<<")"<<endl;
+ //     };
+ //     return image;
+ //  *-*-*-*-*-*-*-*-*-*-*-*-*
+     SortTracks("+CAL+TOF");
+ //  *-*-*-*-*-*-*-*-*-*-*-*-*
+     if(!timage)return 0;
+     if(!timage->GetEntries())return 0;
+     PamTrack *image = 0;
+     if( it >=0 && it < trk2_obj->TrkLevel2::GetNTracks() ){
+         TClonesArray &t = *(tsorted);
+         PamTrack *temp = (PamTrack*)t[it];
+         if( temp->GetTrkTrack()->HasImage() ){
+             TClonesArray &t = *(timage);
+             image = (PamTrack*)t[it];
          }else{
-                 cout << "PamLevel2::GetTrackImage(int) : Tracker track SeqNo "<< it <<" does not exist (GetNTracks() = "<<TrkLevel2::GetNTracks()<<")"<<endl;
+ //          cout <<"PamLevel2::GetTrackImage(int) : Track SeqNo "<<it<<" does not have image"<<endl;
          };
+     }else{
+         cout << "PamLevel2::GetTrackImage(int) : Tracker track SeqNo "<< it <<" does not exist (GetNTracks() = "<<trk2_obj->TrkLevel2::GetNTracks()<<")"<<endl;
+     };
-         return image;
+     return image;
  }
  //--------------------------------------
-Line 455 
 PamTrack *PamLevel2::GetTrackImage(int i
+Line 828 
 PamTrack *PamLevel2::GetTrackImage(int i
   * @param detlist String to select trees to be included
   * @return Pointer to a TTree
   */
- TTree *PamLevel2::GetPamTree(TFile *f, TString detlist="+ALL"){
+ TTree *PamLevel2::GetPamTree(TFile *f, TString detlist ){
- //      cout << "WARNING!!! -- obsolete method -- \n";
+ //     if( !detlist.IsNull() ) SetWhichTrees(detlist);
- //      cout << "better use TChain *PamLevel2::GetPamTree(TList*, TString) \n";
+ //     else                    GetWhichTrees(f);
-     TTree *Trout =0;
+     cout << "TTree *PamLevel2::GetPamTree(TFile *f, TString detlist ) -- obsolte "<<endl;
      SetWhichTrees(detlist);
+     TTree *Trout =0;
+     TString fname = f->GetName();
+     if(!CheckLevel2File(fname))return NULL;
+ //    UInt_t *found=0;
+     cout<< "GetPamTree(TFile*,TString): detector list --> ";
+     if(TRK1)cout<<"TRK1 ";
+     if(TRK2)cout<<"TRK2 ";
+     if(TRKh)cout<<"TRKH ";
+     if(CAL1)cout<<"CAL1 ";
+     if(CAL2)cout<<"CAL2 ";
+     if(TOF)cout<<"TOF ";
+     if(TRG)cout<<"TRG ";
+     if(AC)cout<<"AC ";
+     if(ND)cout<<"ND ";
+     if(S4)cout<<"S4 ";
+     if(ORB)cout<<"ORB ";
+     cout << endl;
+     if(SELLI)cout<<">>> Found selection-list <<<"<<endl;
+     f->cd();
  // Tracker
      TTree *T = (TTree*)f->Get("Tracker");
-     if(T && TRK) {
+     if(T && (TRK2||TRK1||TRKh)) {
-         if(TRK_L1){
+         if(TRK2)T->SetBranchAddress("TrkLevel2", GetPointerTo("TrkLevel2"));
-             T->SetBranchAddress("TrkLevel1", GetPointerToTrk(1));
+ //      else    T->SetBranchStatus("TrkLevel2",0,found);
-             cout << "Tracker      : set branch address TrkLevel1"<<endl;
+         if(TRK2)cout << "Tracker      : set branch address TrkLevel2"<<endl;
-         };
+         if(TRK1)T->SetBranchAddress("TrkLevel1", GetPointerTo("TrkLevel1"));
-         T->SetBranchAddress("TrkLevel2", GetPointerToTrk(2));
+ //      else    T->SetBranchStatus("TrkLevel1",0,found);
-         cout << "Tracker      : set branch address TrkLevel2"<<endl;
+         if(TRK1)cout << "Tracker      : set branch address TrkLevel1"<<endl;
-         Trout=T;
+         if(TRKh)T->SetBranchAddress("TrkHough", GetPointerTo("TrkHough"));
+ //      else    T->SetBranchStatus("TrkHough",0,found);
+         if(TRKh)cout << "Tracker      : set branch address TrkHough"<<endl;
+         if(!Trout)Trout=T;
+         else Trout->AddFriend(T);
      }else{
          cout << "Tracker      : missing tree"<<endl;
      };
      // Calorimeter
      TTree *C = (TTree*)f->Get("Calorimeter");
-     if(C && CAL) {
+     if(C && (CAL2||CAL1)) {
-         C->SetBranchAddress("CaloLevel2", GetPointerToCalo());
+         if(CAL2)C->SetBranchAddress("CaloLevel2", GetPointerTo("CaloLevel2"));
-         cout << "Calorimeter  : set branch address CaloLevel2"<<endl;
+ //      else    C->SetBranchStatus("CaloLevel2",0,found);
+         if(CAL2)cout << "Calorimeter  : set branch address CaloLevel2"<<endl;
+         if(CAL1)C->SetBranchAddress("CaloLevel1", GetPointerTo("CaloLevel1"));
+ //      else    C->SetBranchStatus("CaloLevel1",0,found);
+         if(CAL1)cout << "Calorimeter  : set branch address CaloLevel1"<<endl;
          if(!Trout)Trout=C;
          else Trout->AddFriend(C);
      }else{
          cout << "Calorimeter  : missing tree"<<endl;
      };
      // ToF
      TTree *O = (TTree*)f->Get("ToF");
      if(O && TOF) {
-         O->SetBranchAddress("ToFLevel2", GetPointerToToF());
+         O->SetBranchAddress("ToFLevel2", GetPointerTo("ToFLevel2"));
          cout << "ToF          : set branch address ToFLevel2"<<endl;
          if(!Trout)Trout=O;
          else Trout->AddFriend(O);
-Line 499 
 TTree *PamLevel2::GetPamTree(TFile *f, T
+Line 906 
 TTree *PamLevel2::GetPamTree(TFile *f, T
      // Trigger
      TTree *R = (TTree*)f->Get("Trigger");
      if(R && TRG) {
-         R->SetBranchAddress("TrigLevel2", GetPointerToTrig());
+         R->SetBranchAddress("TrigLevel2", GetPointerTo("TrigLevel2"));
          cout << "Trigger      : set branch address TrigLevel2"<<endl;
          if(!Trout)Trout=O;
          else Trout->AddFriend(R);
-Line 509 
 TTree *PamLevel2::GetPamTree(TFile *f, T
+Line 916 
 TTree *PamLevel2::GetPamTree(TFile *f, T
      // S4
      TTree *S = (TTree*)f->Get("S4");
      if(S && S4) {
-         S->SetBranchAddress("S4Level2", GetPointerToS4());
+         S->SetBranchAddress("S4Level2", GetPointerTo("S4Level2"));
          cout << "S4           : set branch address S4Level2"<<endl;
          if(!Trout)Trout=O;
          else Trout->AddFriend(S);
-Line 519 
 TTree *PamLevel2::GetPamTree(TFile *f, T
+Line 926 
 TTree *PamLevel2::GetPamTree(TFile *f, T
      // Neutron Detector
      TTree *N = (TTree*)f->Get("NeutronD");
      if(N && ND) {
-         N->SetBranchAddress("NDLevel2", GetPointerToND());
+         N->SetBranchAddress("NDLevel2", GetPointerTo("NDLevel2"));
          cout << "NeutronD     : set branch address NDLevel2"<<endl;
          if(!Trout)Trout=O;
          else Trout->AddFriend(N);
-Line 529 
 TTree *PamLevel2::GetPamTree(TFile *f, T
+Line 936 
 TTree *PamLevel2::GetPamTree(TFile *f, T
      // Anticounters
      TTree *A = (TTree*)f->Get("Anticounter");
      if(A && AC) {
-         A->SetBranchAddress("AcLevel2", GetPointerToAc());
+         A->SetBranchAddress("AcLevel2", GetPointerTo("AcLevel2"));
          cout << "Anticounter  : set branch address AcLevel2"<<endl;
          if(!Trout)Trout=O;
          else Trout->AddFriend(A);
-Line 537 
 TTree *PamLevel2::GetPamTree(TFile *f, T
+Line 944 
 TTree *PamLevel2::GetPamTree(TFile *f, T
          cout << "Anticounter  : missing tree"<<endl;
      };
      // Orbital Info
-         TTree *B = (TTree*)f->Get("OrbitalInfo");
+     TTree *B = (TTree*)f->Get("OrbitalInfo");
-         if(B && ORB) {
+     if(B && ORB) {
-                 B->SetBranchAddress("OrbitalInfo", GetPointerToOrb());
+         B->SetBranchAddress("OrbitalInfo", GetPointerTo("OrbitalInfo"));
-                 cout << "OrbitalInfo  : set branch address OrbitalInfo"<<endl;
+         cout << "OrbitalInfo  : set branch address OrbitalInfo"<<endl;
-                 if(!Trout)Trout=O;
+         if(!Trout)Trout=O;
-                 else Trout->AddFriend(B);
+         else Trout->AddFriend(B);
-         }else{
+     }else{
-                 cout << "OrbitalInfo  : missing tree"<<endl;
+         cout << "OrbitalInfo  : missing tree"<<endl;
-         };
+     };
+     TTree *L = (TTree*)f->Get("SelectionList");
+     if(L && SELLI==1) {
+ //      L->SetBranchAddress("RunEntry",&irun);
+ //      cout << "SelectionList: set branch address RunEntry"<<endl;
+ //      L->SetBranchAddress("EventEntry",&irunentry);
+ //      cout << "SelectionList: set branch address EventEntry"<<endl;
+ //      if(!Trout)Trout=O;
+ //      else Trout->AddFriend("SelectionList");
+         cout << " TTree *PamLevel2::GetPamTree(TFile, TString) >>> SelectionList not implemente!!!!"<<endl;
+         sel_tree = 0;
+     }else{
+         cout << "SelectionList  : missing tree"<<endl;
+     };
-         cout<<endl<<" Number of entries: "<<Trout->GetEntries()<<endl<<endl;
+     cout<<endl<<" Number of entries: "<<Trout->GetEntries()<<endl<<endl;
-         return Trout;
+     pam_tree = (TChain*)Trout;
+     return Trout;
  }
  //--------------------------------------
-Line 574 
 TList*  PamLevel2::GetListOfLevel2Files(
+Line 997 
 TList*  PamLevel2::GetListOfLevel2Files(
      TList *contents  = new TList; // create output list
      contents->SetOwner();
-     char *fullpath;
+ //    char *fullpath;
+ //    const char *fullpath;
      // if no input file list is given:
      if ( flisttxt != "" ){
-         if( !gSystem->IsFileInIncludePath(flisttxt,&fullpath) )return 0;
+ //      if( !gSystem->IsFileInIncludePath(flisttxt,&fullpath) ){
+ //      if( !(fullpath = gSystem->FindFile("./",flisttxt)) ){
- //              flisttxt = gSystem->ConcatFileName(gSystem->DirName(flisttxt),gSystem->BaseName(flisttxt));
+ //          cout <<"File "<<flisttxt<<" not found"<<endl;
-         flisttxt = fullpath;
+ //          return 0;
+ //      }
-         if( !gSystem->ChangeDirectory(ddir) )return 0;
+ //      flisttxt = fullpath;
+       if ( !flisttxt.EndsWith(".root") ){
+         flisttxt = gSystem->ConcatFileName(gSystem->DirName(flisttxt),gSystem->BaseName(flisttxt));
+         if( !gSystem->ChangeDirectory(ddir) ){
+             cout << "Cannot change directory : "<<ddir<<endl;
+             return 0;
+         }
          cout <<"Input file list : " << flisttxt <<endl;
          ifstream in;
          in.open(flisttxt, ios::in); //open input file list
+         if(!in.good()){
+             cout <<" ERROR opening the file "<<endl;
+             gSystem->ChangeDirectory(wdir); // back to the working directory
+             return 0;
+         }
+         int line=0;
          while (1) {
              TString file;
              in >> file;
              if (!in.good()) break;
-             if( gSystem->IsFileInIncludePath(file,&fullpath) ){
+             line++;
- //                              contents->Add(new TSystemDirectory(fullpath,ddir)); // add file to the list
+ //          cout <<"(1) " << file << endl;
- //                              contents->Add(new TSystemFile(fullpath,ddir)); // add file to the list
+             if(file.IsNull()){
+                 cout << "-- list interrupted at line "<<line <<endl;
+                 break;
+             }
+             if(file.Contains("#"))file = file(0,file.First("#"));
+ //          cout <<"(2) " << file << endl;
+ //          if( gSystem->IsFileInIncludePath(file,&fullpath) ){
+ //          if( (fullpath = gSystem->FindFile(ddir,file)) ){
+             if( file.EndsWith(".root") ){
+                 char *fullpath = gSystem->ConcatFileName(gSystem->DirName(ddir),gSystem->BaseName(file));
                  contents->Add(new TSystemFile(fullpath,gSystem->DirName(fullpath)));// add file to the list
-             }else{
+                 delete fullpath;
-                 cout << "warning! --- File "<<file<<" does not exists"<< endl;
+             }
-             };
+ //          }else{
+ //              if(file.Data()!="")cout << "File: "<<file<<" ---> missing "<< endl;
+ //          };
          };
          in.close();
+       } else {
+           char *fullpath = gSystem->ConcatFileName(gSystem->DirName(flisttxt),gSystem->BaseName(flisttxt));
+           contents->Add(new TSystemFile(fullpath,gSystem->DirName(fullpath)));// add file to the list
+           delete fullpath;
+       };
      }else{
          cout << "No input file list given."<<endl;
-Line 621 
 TList*  PamLevel2::GetListOfLevel2Files(
+Line 1074 
 TList*  PamLevel2::GetListOfLevel2Files(
          while ( (questo = (TSystemFile*) next()) ) {
              TString name =  questo-> GetName();
              if( name.EndsWith(".root") ){
-                 char *fullpath;
+ //              const char *fullpath = gSystem->FindFile(ddir,name);
-                 gSystem->IsFileInIncludePath(name,&fullpath);
+ //              char *fullpath;
+ //              gSystem->IsFileInIncludePath(name,&fullpath);
+                 char *fullpath = gSystem->ConcatFileName(gSystem->DirName(ddir),gSystem->BaseName(name));
                  contents->Add(new TSystemFile(fullpath,gSystem->DirName(fullpath)));
+                 delete fullpath;
              };
          }
          delete temp;
-Line 633 
 TList*  PamLevel2::GetListOfLevel2Files(
+Line 1089 
 TList*  PamLevel2::GetListOfLevel2Files(
      gSystem->ChangeDirectory(wdir); // back to the working directory
  //      cout << endl << "Selected files:" << endl;
  //      contents->Print();
-     cout << contents->GetEntries()<<" files selected\n";
+     cout << contents->GetEntries()<<" files \n";
  //      cout << endl;
  //      cout << "Working directory: "<< gSystem->WorkingDirectory()<< endl;
      return contents;
-Line 648 
 TList*  PamLevel2::GetListOfLevel2Files(
+Line 1104 
 TList*  PamLevel2::GetListOfLevel2Files(
   * @param detlist String to select trees to be included
   * @return Pointer to a TChain
   */
- TChain *PamLevel2::GetPamTree(TList *fl, TString detlist="+ALL"){
+ TChain *PamLevel2::GetPamTree(TList *fl, TString detlist ){
- //      TChain *Tout=0;
-     if(Tout)Tout->Delete();
-     Tout = NULL;
+     TChain *Trout =0;
+ //    if( !detlist.IsNull() )SetWhichTrees(detlist);
      SetWhichTrees(detlist);
+     cout<< "GetPamTree(TList*,TString): input detector list --> ";
+     if(TRK1)cout<<"TRK1 ";
+     if(TRK2)cout<<"TRK2 ";
+     if(TRKh)cout<<"TRKH ";
+     if(CAL1)cout<<"CAL1 ";
+     if(CAL2)cout<<"CAL2 ";
+     if(TOF)cout<<"TOF ";
+     if(TRG)cout<<"TRG ";
+     if(AC)cout<<"AC ";
+     if(ND)cout<<"ND ";
+     if(S4)cout<<"S4 ";
+     if(ORB)cout<<"ORB ";
+     cout << endl;
      TChain *T = 0;
      TChain *C = 0;
      TChain *O = 0;
-Line 664 
 TChain *PamLevel2::GetPamTree(TList *fl,
+Line 1133 
 TChain *PamLevel2::GetPamTree(TList *fl,
      TChain *N = 0;
      TChain *A = 0;
      TChain *B = 0;
+     TChain *L = 0;
-     if(TRK) T = new TChain("Tracker");
+     if(TRK2||TRK1||TRKh) T = new TChain("Tracker");
-     if(CAL) C = new TChain("Calorimeter");
+     if(CAL2||CAL1)       C = new TChain("Calorimeter");
-     if(TOF) O = new TChain("ToF");
+     if(TOF)              O = new TChain("ToF");
-     if(TRG) R = new TChain("Trigger");
+     if(TRG)              R = new TChain("Trigger");
-     if(S4)  S = new TChain("S4");
+     if(S4)               S = new TChain("S4");
-     if(ND)  N = new TChain("NeutronD");
+     if(ND)               N = new TChain("NeutronD");
-     if(AC)  A = new TChain("Anticounter");
+     if(AC)               A = new TChain("Anticounter");
-     if(ORB) B = new TChain("OrbitalInfo");
+     if(ORB)              B = new TChain("OrbitalInfo");
+      L = new TChain("SelectionList");
      // loop over files and create chains
      TIter next(fl);
      TSystemFile *questo = 0;
      while ( (questo = (TSystemFile*) next()) ) {
          TString name =  questo->GetName();
- //              cout << "File: "<< name << endl;
+         cout << "File: "<< name << endl;
          if( CheckLevel2File(name) ){
-             if(TRK) T->Add(name);
+             if(TRK2||TRK1||TRKh) T->Add(name);
-             if(CAL) C->Add(name);
+             if(CAL1||CAL2)       C->Add(name);
-             if(TOF) O->Add(name);
+             if(TOF)              O->Add(name);
-             if(TRG) R->Add(name);
+             if(TRG)              R->Add(name);
-             if(S4)  S->Add(name);
+             if(S4)               S->Add(name);
-             if(ND)  N->Add(name);
+             if(ND)               N->Add(name);
-             if(AC)  A->Add(name);
+             if(AC)               A->Add(name);
-             if(ORB) B->Add(name);
+             if(ORB)              B->Add(name);
+             if(SELLI==1)         L->Add(name);
          };
      }
      cout << "done chain \n";
+ //    UInt_t *found=0;
+ // Tracker
+     if(T && (TRK2||TRK1||TRKh)) {
+         if(TRK2)T->SetBranchAddress("TrkLevel2", GetPointerTo("TrkLevel2"));
+ //      else    T->SetBranchStatus("TrkLevel2",0,found);
+         if(TRK2)cout << "Tracker      : set branch address TrkLevel2"<<endl;
+         if(TRK1)T->SetBranchAddress("TrkLevel1", GetPointerTo("TrkLevel1"));
+ //      else    T->SetBranchStatus("TrkLevel1",0,found);
+         if(TRK1)cout << "Tracker      : set branch address TrkLevel1"<<endl;
+         if(TRKh)T->SetBranchAddress("TrkHough", GetPointerTo("TrkHough"));
+ //      else    T->SetBranchStatus("TrkHough",0,found);
+         if(TRKh)cout << "Tracker      : set branch address TrkHough"<<endl;
+         if(!Trout)Trout=T;
+         else Trout->AddFriend("Tracker");
+     }else{
+         cout << "Tracker      : missing tree"<<endl;
+     };
+     // Calorimeter
+     if(C && (CAL2||CAL1)) {
+         if(CAL2)C->SetBranchAddress("CaloLevel2", GetPointerTo("CaloLevel2"));
+ //      else    C->SetBranchStatus("CaloLevel2",0,found);
+         if(CAL2)cout << "Calorimeter  : set branch address CaloLevel2"<<endl;
+         if(CAL1)C->SetBranchAddress("CaloLevel1", GetPointerTo("CaloLevel1"));
+ //      else    C->SetBranchStatus("CaloLevel1",0,found);
+         if(CAL1)cout << "Calorimeter  : set branch address CaloLevel1"<<endl;
+         if(!Trout)Trout=C;
+         else Trout->AddFriend("Calorimeter");
+     }else{
+         cout << "Calorimeter  : missing tree"<<endl;
+     };
+     // ToF
+     if(O && TOF) {
+         O->SetBranchAddress("ToFLevel2", GetPointerTo("ToFLevel2"));
+         cout << "ToF          : set branch address ToFLevel2"<<endl;
+         if(!Trout)Trout=O;
+         else Trout->AddFriend("ToF");
+     }else{
+         cout << "ToF         : missing tree"<<endl;
+     };
+     // Trigger
+     if(R && TRG) {
+         R->SetBranchAddress("TrigLevel2", GetPointerTo("TrigLevel2"));
+         cout << "Trigger      : set branch address TrigLevel2"<<endl;
+         if(!Trout)Trout=O;
+         else Trout->AddFriend("Trigger");
+     }else{
+         cout << "Trigger      : missing tree"<<endl;
+     };
+     // S4
+     if(S && S4) {
+         S->SetBranchAddress("S4Level2", GetPointerTo("S4Level2"));
+         cout << "S4           : set branch address S4Level2"<<endl;
+         if(!Trout)Trout=O;
+         else Trout->AddFriend("S4");
+     }else{
+         cout << "S4           : missing tree"<<endl;
+     };
+     // Neutron Detector
+     if(N && ND) {
+         N->SetBranchAddress("NDLevel2", GetPointerTo("NDLevel2"));
+         cout << "NeutronD     : set branch address NDLevel2"<<endl;
+         if(!Trout)Trout=O;
+         else Trout->AddFriend("NeutronD");
+     }else{
+         cout << "NeutronD     : missing tree"<<endl;
+     };
+     // Anticounters
+     if(A && AC) {
+         A->SetBranchAddress("AcLevel2", GetPointerTo("AcLevel2"));
+         cout << "Anticounter  : set branch address AcLevel2"<<endl;
+         if(!Trout)Trout=O;
+         else Trout->AddFriend("Anticounter");
+     }else{
+         cout << "Anticounter  : missing tree"<<endl;
+     };
+     // Orbital Info
+     if(B && ORB) {
+         B->SetBranchAddress("OrbitalInfo", GetPointerTo("OrbitalInfo"));
+         cout << "OrbitalInfo  : set branch address OrbitalInfo"<<endl;
+         if(!Trout)Trout=O;
+         else Trout->AddFriend("OrbitalInfo");
+     }else{
+         cout << "OrbitalInfo  : missing tree"<<endl;
+     };
+     // Selection List
+     if(L && SELLI==1) {
+         cout<<">>> Found selection-list <<<"<<endl;
+         L->SetBranchAddress("RunEntry",&irun);
+         cout << "SelectionList: set branch address RunEntry"<<endl;
+         L->SetBranchAddress("EventEntry",&irunentry);
+         cout << "SelectionList: set branch address EventEntry"<<endl;
+         sel_tree = L;
+ //      if(!Trout)Trout=O;
+ //      else Trout->AddFriend("SelectionList");
+     }else{
+ //      cout << "SelectionList  : missing tree"<<endl;
+         if(L)L->Delete();
+     };
+ //    cout<<endl<<" Number of entries: "<<Trout->GetEntries()<<endl<<endl;
+     pam_tree = Trout;
+     return Trout;
+ }
+ //--------------------------------------
+ //
+ //
+ //--------------------------------------
+ /**
+  * Set branch addresses for Pamela friend trees
+  */
+ void PamLevel2::SetBranchAddress(TTree *t){
+     TRK2    = TRK2 & t->GetBranchStatus("TrkLevel2");
+     TRK1    = TRK1 & t->GetBranchStatus("TrkLevel1");
+     TRKh    = TRKh & t->GetBranchStatus("TrkHough");
+     CAL2    = CAL2 & t->GetBranchStatus("CaloLevel2");
+     CAL1    = CAL1 & t->GetBranchStatus("CaloLevel1");
+     TOF    = TOF & t->GetBranchStatus("ToFLevel2");
+     TRG    = TRG & t->GetBranchStatus("TrigLevel2");
+     S4     = S4  & t->GetBranchStatus("S4Level2");
+     ND     = ND  & t->GetBranchStatus("NDLevel2");
+     AC     = AC  & t->GetBranchStatus("AcLevel2");
+     ORB    = ORB & t->GetBranchStatus("OrbitalInfo");
      // Tracker
-     if(TRK) if(!Tout)Tout=T;
+     if(TRK1) {
+         t->SetBranchAddress("TrkLevel1", GetPointerTo("TrkLevel2"));
+         cout << "Tracker      : set branch address TrkLevel1"<<endl;
+     };
+     if(TRK2) {
+         t->SetBranchAddress("TrkLevel2", GetPointerTo("TrkLevel1"));
+         cout << "Tracker      : set branch address TrkLevel2"<<endl;
+     };
+     if(TRKh) {
+         t->SetBranchAddress("TrkHough", GetPointerTo("TrkHough"));
+         cout << "Tracker      : set branch address TrkHough"<<endl;
+     };
      // Calorimeter
-     if(CAL) {
+     if(CAL1) {
-         if(!Tout)Tout=C;
+         t->SetBranchAddress("CaloLevel1", GetPointerTo("CaloLevel1"));
-         else Tout->AddFriend("Calorimeter");
+         cout << "Calorimeter  : set branch address CaloLevel1"<<endl;
+     };
+     if(CAL2) {
+         t->SetBranchAddress("CaloLevel2", GetPointerTo("CaloLevel2"));
+         cout << "Calorimeter  : set branch address CaloLevel2"<<endl;
      };
      // ToF
      if(TOF) {
-         if(!Tout)Tout=O;
+         t->SetBranchAddress("ToFLevel2", GetPointerTo("ToFLevel2"));
-         else Tout->AddFriend("ToF");
+         cout << "ToF          : set branch address ToFLevel2"<<endl;
      };
      // Trigger
      if(TRG) {
-         if(!Tout)Tout=O;
+         t->SetBranchAddress("TrigLevel2", GetPointerTo("TrigLevel2"));
-         else Tout->AddFriend("Trigger");
+         cout << "Trigger      : set branch address TrigLevel2"<<endl;
      };
      // S4
      if(S4) {
-         if(!Tout)Tout=O;
+         t->SetBranchAddress("S4Level2", GetPointerTo("S4Level2"));
-         else Tout->AddFriend("S4");
+         cout << "S4           : set branch address S4Level2"<<endl;
      };
      // Neutron Detector
      if(ND) {
-         if(!Tout)Tout=O;
+         t->SetBranchAddress("NDLevel2", GetPointerTo("NDLevel2"));
-         else Tout->AddFriend("NeutronD");
+         cout << "NeutronD     : set branch address NDLevel2"<<endl;
      };
      // Anticounters
      if(AC) {
-         if(!Tout)Tout=O;
+         t->SetBranchAddress("AcLevel2", GetPointerTo("AcLevel2"));
-         else Tout->AddFriend("Anticounter");
+         cout << "Anticounter  : set branch address AcLevel2"<<endl;
      };
      // OrbitalInfo
      if(ORB) {
-         if(!Tout)Tout=O;
+         t->SetBranchAddress("OrbitalInfo", GetPointerTo("OrbitalInfo"));
-         else Tout->AddFriend("OrbitalInfo");
+         cout << "OrbitalInfo  : set branch address OrbitalInfo"<<endl;
+     };
+     // SelectionList
+     if(SELLI==1) {
+         t->SetBranchAddress("RunEntry", &irun);
+         cout << "SelectionList: set branch address RunEntry"<<endl;
+         t->SetBranchAddress("EventEntry", &irunentry);
+         cout << "SelectionList: set branch address EventEntry"<<endl;
      };
- //    cout<<endl<<" Number of entries: "<<Tout->GetEntries()<<endl<<endl;
-     if( Tout->GetEntries() )PamLevel2::SetBranchAddress();
-     return Tout;
  }
- //--------------------------------------
- //
- //
- //--------------------------------------
  /**
   * Set branch addresses for Pamela friend trees
   */
- void PamLevel2::SetBranchAddress(){
+ void PamLevel2::SetBranchAddress(TChain *t){
+     TRK2    = TRK2 & t->GetBranchStatus("TrkLevel2");
+     TRK1    = TRK1 & t->GetBranchStatus("TrkLevel1");
+     TRKh    = TRKh & t->GetBranchStatus("TrkHough");
+     CAL1    = CAL1 & t->GetBranchStatus("CaloLevel1");
+     CAL2    = CAL2 & t->GetBranchStatus("CaloLevel2");
+     TOF    = TOF & t->GetBranchStatus("ToFLevel2");
+     TRG    = TRG & t->GetBranchStatus("TrigLevel2");
+     S4     = S4  & t->GetBranchStatus("S4Level2");
+     ND     = ND  & t->GetBranchStatus("NDLevel2");
+     AC     = AC  & t->GetBranchStatus("AcLevel2");
+     ORB    = ORB & t->GetBranchStatus("OrbitalInfo");
      // Tracker
-     if(TRK) {
+      if(TRK2) {
-         if(TRK_L1){
+         t->SetBranchAddress("TrkLevel2", GetPointerTo("TrkLevel2"));
-             Tout->SetBranchAddress("TrkLevel1", GetPointerToTrk(1));
-             cout << "Tracker      : set branch address TrkLevel1"<<endl;
-         };
-         Tout->SetBranchAddress("TrkLevel2", GetPointerToTrk(2));
          cout << "Tracker      : set branch address TrkLevel2"<<endl;
      };
+     if(TRK1) {
+         t->SetBranchAddress("TrkLevel1", GetPointerTo("TrkLevel1"));
+         cout << "Tracker      : set branch address TrkLevel1"<<endl;
+     };
+      if(TRKh) {
+         t->SetBranchAddress("TrkHough", GetPointerTo("TrkHough"));
+         cout << "Tracker      : set branch address TrkHough"<<endl;
+      };
      // Calorimeter
-     if(CAL) {
+     if(CAL2) {
-         Tout->SetBranchAddress("CaloLevel2", GetPointerToCalo());
+         t->SetBranchAddress("CaloLevel2", GetPointerTo("CaloLevel2"));
          cout << "Calorimeter  : set branch address CaloLevel2"<<endl;
+     };
+     if(CAL1) {
+         t->SetBranchAddress("CaloLevel1", GetPointerTo("CaloLevel1"));
+         cout << "Calorimeter  : set branch address CaloLevel1"<<endl;
      };
      // ToF
      if(TOF) {
-         Tout->SetBranchAddress("ToFLevel2", GetPointerToToF());
+         t->SetBranchAddress("ToFLevel2", GetPointerTo("ToFLevel2"));
          cout << "ToF          : set branch address ToFLevel2"<<endl;
      };
      // Trigger
      if(TRG) {
-         Tout->SetBranchAddress("TrigLevel2", GetPointerToTrig());
+         t->SetBranchAddress("TrigLevel2", GetPointerTo("TrigLevel2"));
          cout << "Trigger      : set branch address TrigLevel2"<<endl;
      };
      // S4
      if(S4) {
-         Tout->SetBranchAddress("S4Level2", GetPointerToS4());
+         t->SetBranchAddress("S4Level2", GetPointerTo("S4Level2"));
          cout << "S4           : set branch address S4Level2"<<endl;
      };
      // Neutron Detector
      if(ND) {
-         Tout->SetBranchAddress("NDLevel2", GetPointerToND());
+         t->SetBranchAddress("NDLevel2", GetPointerTo("NDLevel2"));
          cout << "NeutronD     : set branch address NDLevel2"<<endl;
      };
      // Anticounters
      if(AC) {
-         Tout->SetBranchAddress("AcLevel2", GetPointerToAc());
+         t->SetBranchAddress("AcLevel2", GetPointerTo("AcLevel2"));
          cout << "Anticounter  : set branch address AcLevel2"<<endl;
      };
      // OrbitalInfo
      if(ORB) {
-         Tout->SetBranchAddress("OrbitalInfo", GetPointerToOrb());
+         t->SetBranchAddress("OrbitalInfo", GetPointerTo("OrbitalInfo"));
          cout << "OrbitalInfo  : set branch address OrbitalInfo"<<endl;
      };
+     // SelectionList
+     if(SELLI==1) {
+         t->SetBranchAddress("RunEntry", &irun);
+         cout << "SelectionList: set branch address RunEntry"<<endl;
+         t->SetBranchAddress("EventEntry", &irunentry);
+         cout << "SelectionList: set branch address EventEntry"<<endl;
+     };
  }
- //--------------------------------------
- //
- //
- //--------------------------------------
- void *PamLevel2::GetPointerTo(const char* c ){
- //      cout << "objname "<< objname << endl;
-     TString objname = c;
-     if(!objname.CompareTo("TrkLevel1"))return &trk_l1_obj;
-     if(!objname.CompareTo("TrkLevel2"))return &trk_obj;
-     return NULL;
- };
  //--------------------------------------
  //
  //
-Line 830 
 TChain *PamLevel2::GetRunTree(TList *fl)
+Line 1467 
 TChain *PamLevel2::GetRunTree(TList *fl)
              R->Add(name);
          };
      }
+     if(R->GetNtrees()){
-     R->SetBranchAddress("RunInfo", GetPointerToRun());
+         R->SetBranchAddress("RunInfo", GetPointerTo("RunInfo"));
-     cout << "Run         : set branch address RunInfo"<<endl;
+         cout << "Run         : set branch address RunInfo"<<endl;
+         R->SetBranchAddress("SoftInfo", GetPointerTo("SoftInfo")); // Emiliano
+         cout << "Software    : set branch address SoftInfo"<<endl; // Emiliano
+     }else{
+         delete R;
+         R=0;
+     }
+     run_tree = R;
      return R;
  }
-Line 848 
 TChain *PamLevel2::GetRunTree(TList *fl)
+Line 1495 
 TChain *PamLevel2::GetRunTree(TList *fl)
   */
  TTree *PamLevel2::GetRunTree(TFile *f){
+     cout << "TTree *PamLevel2::GetRunTree(TFile *f) -- obsolte "<<endl;
      TTree *R = (TTree*)f->Get("Run");
-     R->SetBranchAddress("RunInfo", GetPointerToRun());
+     if(R){
-     cout << "Run         : set branch address RunInfo"<<endl;
+         R->SetBranchAddress("RunInfo", GetPointerTo("RunInfo"));
+         cout << "Run         : set branch address RunInfo"<<endl;
+         R->SetBranchAddress("SoftInfo", GetPointerTo("SoftInfo")); // Emiliano
+         cout << "Software    : set branch address SoftInfo"<<endl; // Emiliano
+     }
+     run_tree = (TChain*)R;
      return R;
  }
+ /**
+  * Update the runinfo informations (to be used to have Run infos event by event basis)
+  * @param run Pointer to the chain/tree which contains run infos
+  * @return true if a new run has been read, false if it is still the same run
+  */
+ Bool_t PamLevel2::UpdateRunInfo(TChain *run, ULong64_t iev){
+   //
+   // check if we have already called once GetEntry, if not call it
+   //
+   if ( run->GetEntries() <= 0 ) return(false);
+   //
+   Int_t oldrun = irun;
+   // --------------------------------------
+   // if it is a full file (not preselected)
+   // --------------------------------------
+   if(SELLI==0){
+       if ( irun < 0 ){
+           irun = 0;
+           run->GetEntry(irun);
+           runfirstentry = 0ULL;
+           runlastentry += (ULong64_t)(this->GetRunInfo()->NEVENTS) - 1ULL;
+           return(true);
+       };
+       if( !GetOrbitalInfo() ){
+           cout << "Bool_t PamLevel2::UpdateRunInfo(TChain *run, ULong64_t iev) -- ERROR -- missing OrbitalInfo "<<endl;
+           return(false);
+       }
+       // modificato il controllo sull'aggiornamento del run, per evitare problemi
+       // dovuti agli eventi annidati (NB! NEVENTS conta anche questi!!)
+       while ( GetOrbitalInfo()->absTime > GetRunInfo()->RUNTRAILER_TIME && irun < run->GetEntries() ){
+ //      while ( iev > (runfirstentry+(ULong64_t)(this->GetRunInfo()->NEVENTS-1)) && irun < run->GetEntries() ){
+           //    printf(" iev %llu %u %llu \n",iev,this->GetRunInfo()->NEVENTS,(ULong64_t)(runfirstentry+(ULong64_t)(this->GetRunInfo()->NEVENTS)));
+           irun++;
+           run->GetEntry(irun);
+           runfirstentry = runlastentry+1ULL;
+           runlastentry += (ULong64_t)(this->GetRunInfo()->NEVENTS);
+       };
+       //
+       if
+  ( irun == oldrun || irun >= run->GetEntries() ) return(false);
+       //
+       //  printf(" iev %llu irun %i nevents %u 1st %llu last %llu \n",iev,irun,this->GetRunInfo()->NEVENTS,(ULong64_t)runfirstentry,(ULong64_t)runlastentry);
+       //
+       return(true);
+   };
+   // ----------------------------------------------------
+   // if it is a preselected file (there is SelectionList)
+   // NBNB - the event tree MUST be read first
+   // ----------------------------------------------------
+   if(SELLI==1){
+       sel_tree->GetEntry(iev);
+       if(irun != oldrun){
+           run->GetEntry(irun);
+           return true;
+       }
+       return false;
+   }
+   return false;
+   //
+ };
+ /**
+  * Update the runinfo informations (to be used to have Run infos event by event basis)
+  * @param run Pointer to the chain/tree which contains run infos
+  * @return true if a new run has been read, false if it is still the same run
+  */
+ Bool_t PamLevel2::UpdateRunInfo(TTree *run, ULong64_t iev){
+   return(UpdateRunInfo((TChain*)run,iev));
+ };
  //--------------------------------------
  //
  //
  //--------------------------------------
  /**
-  * Set which trees should be analysed
+  * Set which trees shoul be analysed
   * @param detlist TString containing the sequence of trees required
  */
  void PamLevel2::SetWhichTrees(TString detlist){
-     if(detlist.Contains("+ALL", TString::kIgnoreCase)){
+     if(detlist.IsNull() || detlist.Contains("+ALL", TString::kIgnoreCase)){
-         CAL = true;
+         CAL0 = false;
-         TRK = true;
+         CAL1 = true;
-         TRK_L1 = false;
+         CAL2 = true;
+         TRK2 = true;
+         TRK1 = false;
+         TRKh = false;
+         TRK0 = false;
          TRG = true;
          TOF = true;
+         TOF0 = false;
          S4  = true;
          ND  = true;
          AC  = true;
          ORB = true;
      }else if( detlist.Contains("-ALL", TString::kIgnoreCase) ){
-         CAL = false;
+         CAL0 = false;
-         TRK = false;
+         CAL1 = false;
-         TRK_L1 = false;
+         CAL2 = false;
+         TRK2 = false;
+         TRK1 = false;
+         TRKh = false;
+         TRK0 = false;
          TRG = false;
          TOF = false;
+         TOF0 = false;
          S4  = false;
          ND  = false;
          AC  = false;
          ORB = false;
      };
-     if( detlist.Contains("-CAL", TString::kIgnoreCase) )CAL = false;
+ //  -------------------------------------------------------------------------
-     else if( detlist.Contains("+CAL", TString::kIgnoreCase) )CAL = true;
+     if( detlist.Contains("CAL1", TString::kIgnoreCase) ){
+         if ( detlist.Contains("-CAL1", TString::kIgnoreCase) )CAL1=false;
-     if( detlist.Contains("-TRK", TString::kIgnoreCase) )TRK = false;
+         if ( detlist.Contains("+CAL1", TString::kIgnoreCase) )CAL1=true;
-     else if( detlist.Contains("+TRK", TString::kIgnoreCase) )TRK = true;
+     };
-     if( detlist.Contains("-TRK1", TString::kIgnoreCase) )TRK_L1 = false;
+     if( detlist.Contains("CAL0", TString::kIgnoreCase) ){
-     else if( detlist.Contains("+TRK1", TString::kIgnoreCase) )TRK_L1 = true;
+         if ( detlist.Contains("-CAL0", TString::kIgnoreCase) )CAL0=false;
+         if ( detlist.Contains("+CAL0", TString::kIgnoreCase) )CAL0=true;
+     };
+     if( detlist.Contains("CAL2", TString::kIgnoreCase)){
+         if ( detlist.Contains("-CAL2", TString::kIgnoreCase) )CAL2=false;
+         if ( detlist.Contains("+CAL2", TString::kIgnoreCase) )CAL2=true;
+     };
+     if( detlist.Contains("+CAL", TString::kIgnoreCase) && !CAL1 && !CAL2 )CAL2=true;
+     if( detlist.Contains("-CAL", TString::kIgnoreCase) && CAL1 && CAL2 ){
+         CAL2=false;
+         CAL1=false;
+     }
+ //  -------------------------------------------------------------------------
+     if( detlist.Contains("TRK0", TString::kIgnoreCase) ){
+         if ( detlist.Contains("-TRK0", TString::kIgnoreCase) )TRK0=false;
+         if ( detlist.Contains("+TRK0", TString::kIgnoreCase) )TRK0=true;
+     };
+     if( detlist.Contains("TRK1", TString::kIgnoreCase) ){
+         if ( detlist.Contains("-TRK1", TString::kIgnoreCase) )TRK1=false;
+         if ( detlist.Contains("+TRK1", TString::kIgnoreCase) )TRK1=true;
+     };
+     if( detlist.Contains("TRK2", TString::kIgnoreCase)){
+         if ( detlist.Contains("-TRK2", TString::kIgnoreCase) )TRK2=false;
+         if ( detlist.Contains("+TRK2", TString::kIgnoreCase) )TRK2=true;
+     };
+     if( detlist.Contains("TRKh", TString::kIgnoreCase)){
+         if ( detlist.Contains("-TRKh", TString::kIgnoreCase) )TRKh=false;
+         if ( detlist.Contains("+TRKh", TString::kIgnoreCase) )TRKh=true;
+     };
+     if( detlist.Contains("+TRK", TString::kIgnoreCase) && !TRK1 && !TRK2 && !TRKh )TRK2=true;
+     if( detlist.Contains("-TRK", TString::kIgnoreCase) && TRK1 && TRK2 && TRKh){
+         TRK2=false;
+         TRK1=false;
+         TRKh=false;
+     }
+ //  -------------------------------------------------------------------------
      if( detlist.Contains("-TRG", TString::kIgnoreCase) )TRG = false;
      else if( detlist.Contains("+TRG", TString::kIgnoreCase) )TRG = true;
      if( detlist.Contains("-TOF", TString::kIgnoreCase) )TOF = false;
      else if( detlist.Contains("+TOF", TString::kIgnoreCase) )TOF = true;
+     if( detlist.Contains("-TOF0", TString::kIgnoreCase) )TOF0 = false;
+     else if( detlist.Contains("+TOF0", TString::kIgnoreCase) )TOF0 = true;
      if( detlist.Contains("-S4",  TString::kIgnoreCase) )S4  = false;
      else if( detlist.Contains("+S4",  TString::kIgnoreCase) )S4  = true;
-Line 915 
 void PamLevel2::SetWhichTrees(TString de
+Line 1696 
 void PamLevel2::SetWhichTrees(TString de
      if( detlist.Contains("-ORB", TString::kIgnoreCase) )ORB = false;
      else if( detlist.Contains("+ORB", TString::kIgnoreCase) )ORB = true;
+ //     cout<< "Set detector list --> ";
+ //     if(TRK1)cout<<"TRK1 ";
+ //     if(TRK2)cout<<"TRK2 ";
+ //     if(TRKh)cout<<"TRKH ";
+ //     if(CAL1)cout<<"CAL1 ";
+ //     if(CAL2)cout<<"CAL2 ";
+ //     if(TOF)cout<<"TOF ";
+ //     if(TRG)cout<<"TRG ";
+ //     if(AC)cout<<"AC ";
+ //     if(ND)cout<<"ND ";
+ //     if(S4)cout<<"S4 ";
+ //     if(ORB)cout<<"ORB ";
+ //     cout << endl;
  };
+ /**
+  * Set tree/branch detector flags from the content of a tree
+  */
+ void  PamLevel2::GetWhichTrees(TFile* f){
+     cout << "void  PamLevel2::GetWhichTrees(TFile* f) --- WARNING!! --- ...potrebbe non funzionare "<<endl;
+     // -----------
+     // reset flags
+     // -----------
+     CAL1   = false;
+     CAL2   = false;
+     TRK2   = false;
+     TRK1   = false;
+     TRKh   = false;
+     TRG    = false;
+     TOF    = false;
+     S4     = false;
+     ND     = false;
+     AC     = false;
+     ORB    = false;
+     RUN    = false;
+     cout << "Checking file: "<<f->GetName()<<endl;
+     if( !f || f->IsZombie() ){
+         cout << "File: "<< f->GetName() <<" Non valid root file"<< endl;
+         return;
+     }
+     TList *lk = f->GetListOfKeys();
+     TIter next(lk);
+     TKey *key =0;
+     Int_t nev = 0;
+     while( (key = (TKey*)next()) ){
+         if( !strcmp(key->GetName(),"Run"        ) )RUN = true;
+         //=========================================================
+         if( !strcmp(key->GetName(),"Trigger"    ) ){
+             TRG = true;
+             Int_t nevt = ((TTree*)f->Get("Trigger"))->GetEntries();
+             if( nev && nevt!=nev){
+                 cout << "File: "<< f->GetName() <<" Trigger tree has "<<nevt<<" events instead of "<<nev<< endl;
+                 TRG = false;
+             }else nev=nevt;
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"ToF"        ) ){
+             TOF = true;
+             Int_t nevt = ((TTree*)f->Get("ToF"))->GetEntries();
+             if( nev && nevt!=nev){
+                 cout << "File: "<< f->GetName() <<"     ToF tree has "<<nevt<<" events instead of "<<nev<< endl;
+                 TOF = false;
+             }else nev=nevt;
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"S4"         ) ){
+             S4 = true;
+             Int_t nevt = ((TTree*)f->Get("S4"))->GetEntries();
+             if( nev && nevt!=nev){
+                 cout << "File: "<< f->GetName() <<"      S4 tree has "<<nevt<<" events instead of "<<nev<< endl;
+                 S4 = false;
+             }else nev=nevt;
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"NeutronD"   ) ){
+             ND = true;
+             Int_t nevt = ((TTree*)f->Get("NeutronD"))->GetEntries();
+             if( nev && nevt!=nev){
+                 cout << "File: "<< f->GetName() <<"NeutronD tree has "<<nevt<<" events instead of "<<nev<< endl;
+                 ND =false;
+             }else nev=nevt;
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"Anticounter") ){
+             AC = true;
+             Int_t nevt = ((TTree*)f->Get("Anticounter"))->GetEntries();
+             if( nev && nevt!=nev){
+                 cout << "File: "<< f->GetName() <<" Anticounter tree has "<<nevt<<" events instead of "<<nev<< endl;
+                 AC =false;
+             }else nev=nevt;
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"OrbitalInfo") ){
+             ORB = true;
+             Int_t nevt = ((TTree*)f->Get("OrbitalInfo"))->GetEntries();
+             if( nev && nevt!=nev){
+                 cout << "File: "<< f->GetName() <<" OrbitalInfo tree has "<<nevt<<" events instead of "<<nev<< endl;
+                 ORB = false;
+             }else nev=nevt;
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"Tracker"    ) ){
+             TTree *T = (TTree*)f->Get("Tracker");
+             for(Int_t i=0; i<T->GetListOfBranches()->GetEntries(); i++){
+                 TString name = T->GetListOfBranches()->At(i)->GetName();
+                 if( !name.CompareTo("TrkLevel1") )TRK1=true;
+                 if( !name.CompareTo("TrkLevel2") )TRK2=true;
+                 if( !name.CompareTo("TrkHough") )TRKh=true;
+             };
+             Int_t nevt = T->GetEntries();
+             if( nev && nevt!=nev){
+                 cout << "File: "<< f->GetName() <<" Tracker tree has "<<nevt<<" events instead of "<<nev<< endl;
+                 TRK1 = false;
+                 TRK2 = false;
+                 TRKh = false;
+             }else nev=nevt;
+             T->Delete();
+         };
+         //=========================================================
+         if( !strcmp(key->GetName(),"Calorimeter"    ) ){
+             TTree *T = (TTree*)f->Get("Calorimeter");
+             for(Int_t i=0; i<T->GetListOfBranches()->GetEntries(); i++){
+                 TString name = T->GetListOfBranches()->At(i)->GetName();
+                 if( !name.CompareTo("CaloLevel1") )CAL1=true;
+                 if( !name.CompareTo("CaloLevel2") )CAL2=true;
+             };
+             Int_t nevt = T->GetEntries();
+             if( nev && nevt!=nev){
+                 cout << "File: "<< f->GetName() <<"  Calorimeter tree has "<<nevt<<" events instead of "<<nev<< endl;
+                 CAL1 = false;
+                 CAL2 = false;
+             }else nev=nevt;
+             T->Delete();
+         };
+     };
+     delete lk;
+ //     cout<< "Get detector list from input file --> ";
+ //     if(TRK1)cout<<"TRK1 ";
+ //     if(TRK2)cout<<"TRK2 ";
+ //     if(TRKh)cout<<"TRKH ";
+ //     if(CAL1)cout<<"CAL1 ";
+ //     if(CAL2)cout<<"CAL2 ";
+ //     if(TOF)cout<<"TOF ";
+ //     if(TRG)cout<<"TRG ";
+ //     if(AC)cout<<"AC ";
+ //     if(ND)cout<<"ND ";
+ //     if(S4)cout<<"S4 ";
+ //     if(ORB)cout<<"ORB ";
+ //     cout << endl;
+     return ;
+ };
  //--------------------------------------
  //
  //
-Line 928 
 void PamLevel2::SetWhichTrees(TString de
+Line 1879 
 void PamLevel2::SetWhichTrees(TString de
   */
  Bool_t  PamLevel2::CheckLevel2File(TString name){
-     Bool_t CAL__ok = false;
+     Bool_t CAL1__ok   = false;
-     Bool_t TRK__ok = false;
+     Bool_t CAL2__ok   = false;
-     Bool_t TRK_L1__ok = false;
+     Bool_t TRK2__ok   = false;
-     Bool_t TRG__ok = false;
+     Bool_t TRK1__ok   = false;
-     Bool_t TOF__ok = false;
+     Bool_t TRKh__ok   = false;
-     Bool_t S4__ok  = false;
+     Bool_t TRG__ok    = false;
-     Bool_t ND__ok  = false;
+     Bool_t TOF__ok    = false;
-     Bool_t AC__ok  = false;
+     Bool_t S4__ok     = false;
-     Bool_t ORB__ok = false;
+     Bool_t ND__ok     = false;
+     Bool_t AC__ok     = false;
+     Bool_t ORB__ok    = false;
-     Bool_t RUN__ok = false;
+     Bool_t RUN__ok    = false;
- //    cout << "Checking file: "<<name<<endl;
+     Bool_t SELLI__ok  = false;
+     cout << "Checking file: "<<name<<endl;
      TFile *f = new TFile(name.Data());
      if( !f || f->IsZombie() ){
          cout << "File: "<< f->GetName() <<" discarded ---- Non valid root file"<< endl; return false;
      }
-     //   cout << "Get list of keys: "<<f<<endl;
+ //    cout << "Get list of keys: "<<f<<endl;
      TList *lk = f->GetListOfKeys();
- //      lk->Print();
+ //    lk->Print();
      TIter next(lk);
      TKey *key =0;
-     Int_t nev =0;
-     Int_t nev_previous =0;
+     Int_t nev = 0;
      while( (key = (TKey*)next()) ){
-         nev_previous = nev;
+ //      cout << key->GetName() << endl;
-         nev = ((TTree*)f->Get(key->GetName()))->GetEntries();
+ //      cout << key->GetName() << ""<<key->GetClassName()<<endl;
-         if( key->GetClassName()=="TTree" && nev_previous && nev != nev_previous ){
+ //              cout << " Get tree: " << f->Get(key->GetName())<<endl;
-             cout << "File: "<< f->GetName() <<" discarded ---- "<< key->GetName() << " tree: n.entries does not match "<<nev<<" "<<nev_previous<< endl;
+ //      nev_previous = nev;
-             return false;
+ //      cout << " n.entries  "<< nev <<endl;
-         };
+ //      if( key->GetClassName()=="TTree" && nev_previous && nev != nev_previous ){
+ //          nev = ((TTree*)f->Get(key->GetName()))->GetEntries();
+ //          cout << "File: "<< f->GetName() <<" discarded ---- "<< key->GetName() << " tree: n.entries does not match "<<nev<<" "<<nev_previous<< endl;
+ //          return false;
+ //      };
-         if( !strcmp(key->GetName(),"Calorimeter") )CAL__ok = true;
-         if( !strcmp(key->GetName(),"Trigger"    ) )TRG__ok = true;
-         if( !strcmp(key->GetName(),"ToF"        ) )TOF__ok = true;
-         if( !strcmp(key->GetName(),"S4"         ) )S4__ok = true;
-         if( !strcmp(key->GetName(),"NeutronD"   ) )ND__ok = true;
-         if( !strcmp(key->GetName(),"Anticounter") )AC__ok = true;
-         if( !strcmp(key->GetName(),"OrbitalInfo") )ORB__ok = true;
          if( !strcmp(key->GetName(),"Run"        ) )RUN__ok = true;
+         //=========================================================
+         if( !strcmp(key->GetName(),"SelectionList"    ) ){
+             SELLI__ok = true;
+             if(SELLI==1){
+                 Int_t nevt = ((TTree*)f->Get("SelectionList"))->GetEntries();
+                 if( nev && nevt!=nev){
+                     cout << "File: "<< f->GetName() <<" discarded ---- SelectionList tree has "<<nevt<<" events instead of "<<nev<< endl;
+                     return false;
+                 }
+                 nev=nevt;
+             }
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"Trigger"    ) ){
+             TRG__ok = true;
+             if(TRG){
+                 Int_t nevt = ((TTree*)f->Get("Trigger"))->GetEntries();
+                 if( nev && nevt!=nev){
+                     cout << "File: "<< f->GetName() <<" discarded ---- Trigger tree has "<<nevt<<" events instead of "<<nev<< endl;
+                     return false;
+                 }
+                 nev=nevt;
+             }
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"ToF"        ) ){
+             TOF__ok = true;
+             if(TOF){
+                 Int_t nevt = ((TTree*)f->Get("ToF"))->GetEntries();
+                 if( nev && nevt!=nev){
+                     cout << "File: "<< f->GetName() <<" discarded ---- ToF tree has "<<nevt<<" events instead of "<<nev<< endl;
+                     return false;
+                 }
+                 nev=nevt;
+             }
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"S4"         ) ){
+             S4__ok = true;
+             if(S4){
+                 Int_t nevt = ((TTree*)f->Get("S4"))->GetEntries();
+                 if( nev && nevt!=nev){
+                     cout << "File: "<< f->GetName() <<" discarded ---- S4 tree has "<<nevt<<" events instead of "<<nev<< endl;
+                     return false;
+                 }
+                 nev=nevt;
+             }
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"NeutronD"   ) ){
+             ND__ok = true;
+             if(ND){
+                 Int_t nevt = ((TTree*)f->Get("NeutronD"))->GetEntries();
+                 if( nev && nevt!=nev){
+                     cout << "File: "<< f->GetName() <<" discarded ---- NeutronD tree has "<<nevt<<" events instead of "<<nev<< endl;
+                     return false;
+                 }
+                 nev=nevt;
+             }
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"Anticounter") ){
+             AC__ok = true;
+             if(AC){
+                 Int_t nevt = ((TTree*)f->Get("Anticounter"))->GetEntries();
+                 if( nev && nevt!=nev){
+                     cout << "File: "<< f->GetName() <<" discarded ---- Anticounter tree has "<<nevt<<" events instead of "<<nev<< endl;
+                     return false;
+                 }
+                 nev=nevt;
+             }
+         }
+         //=========================================================
+         if( !strcmp(key->GetName(),"OrbitalInfo") ){
+             ORB__ok = true;
+             if(ORB){
+                 Int_t nevt = ((TTree*)f->Get("OrbitalInfo"))->GetEntries();
+                 if( nev && nevt!=nev){
+                     cout << "File: "<< f->GetName() <<" discarded ---- OrbitalInfo tree has "<<nevt<<" events instead of "<<nev<< endl;
+                     return false;
+                 }
+                 nev=nevt;
+             }
+         }
+         //=========================================================
          if( !strcmp(key->GetName(),"Tracker"    ) ){
-             TRK__ok = true;
              TTree *T = (TTree*)f->Get("Tracker");
+             if(TRK1||TRK2||TRKh){
+                 Int_t nevt = T->GetEntries();
+                 if( nev && nevt!=nev){
+                     cout << "File: "<< f->GetName() <<" discarded ---- Tracker tree has "<<nevt<<" events instead of "<<nev<< endl;
+                     return false;
+                 }
+                 nev=nevt;
+             }
              for(Int_t i=0; i<T->GetListOfBranches()->GetEntries(); i++){
                  TString name = T->GetListOfBranches()->At(i)->GetName();
-                 if( !name.CompareTo("TrkLevel1") )TRK_L1__ok=true;
+                 if( !name.CompareTo("TrkLevel1") )TRK1__ok=true;
-             };
+                 if( !name.CompareTo("TrkLevel2") )TRK2__ok=true;
+                 if( !name.CompareTo("TrkHough") )TRKh__ok=true;
+             };
+             T->Delete();
          };
+         //=========================================================
+         if( !strcmp(key->GetName(),"Calorimeter"    ) ){
+             TTree *T = (TTree*)f->Get("Calorimeter");
+             if(CAL1||CAL2){
+                 Int_t nevt = T->GetEntries();
+                 if( nev && nevt!=nev){
+                     cout << "File: "<< f->GetName() <<" discarded ---- Calorimeter tree has "<<nevt<<" events instead of "<<nev<< endl;
+                     return false;
+                 }
+                 nev=nevt;
+             }
+             for(Int_t i=0; i<T->GetListOfBranches()->GetEntries(); i++){
+                 TString name = T->GetListOfBranches()->At(i)->GetName();
+                 if( !name.CompareTo("CaloLevel1") )CAL1__ok=true;
+                 if( !name.CompareTo("CaloLevel2") )CAL2__ok=true;
+             };
+             T->Delete();
+         };
      };
+     if( SELLI==-1 )SELLI = (Int_t)SELLI__ok;
+     if( SELLI==0 && SELLI__ok ){
+         cout << "File: "<< f->GetName() <<" discarded ---- found SelectionList (it is not a full-event file)" << endl;
+         return false;
+     }
+     if( SELLI==1 && !SELLI__ok ){
+         cout << "File: "<< f->GetName() <<" discarded ---- SelectionList missing" << endl;
+         return false;
+     }
-     lk->Delete();
+ //    cout << "SELLI "<<SELLI<<endl;
-     f->Close();
+ //     cout<< "CheckLevel2File(TString): detector list --> ";
-     Bool_t FLAG = true;
+ //     if(TRK1__ok)cout<<"TRK1 ";
+ //     if(TRK2__ok)cout<<"TRK2 ";
+ //     if(TRKh__ok)cout<<"TRKH ";
+ //     if(CAL1__ok)cout<<"CAL1 ";
+ //     if(CAL2__ok)cout<<"CAL2 ";
+ //     if(TOF__ok)cout<<"TOF ";
+ //     if(TRG__ok)cout<<"TRG ";
+ //     if(AC__ok)cout<<"AC ";
+ //     if(ND__ok)cout<<"ND ";
+ //     if(S4__ok)cout<<"S4 ";
+ //     if(ORB__ok)cout<<"ORB ";
+ //     cout << endl;
+     if(TRK2 && TRK1__ok)TRK1=1;
+ // ----------------------------------------------------------------------------
+ // NOTA
+ // se c'e` il level1, lo devo necessarimente leggere.
+ // infatti (non ho capito perche`) i cluster vengono letti e allocati in memoria
+ // comunque, ma non vengono disallocati da PamLevel2::Clear()
+ // ----------------------------------------------------------------------------
      if(!RUN__ok) {
-         cout << "File: "<< f->GetName() <<" discarded ---- Missing RunInfo tree"<< endl; return false;
+         cout << "File: "<< f->GetName() <<" *WARNING* ---- Missing RunInfo tree"<< endl;
- //      FLAG = false;
+ //      return false;
      };
-     if(CAL && !CAL__ok){
-         cout << "File: "<< f->GetName() <<" discarded ---- Missing Calorimeter tree"<< endl; return false;
+     if(CAL1 && !CAL1__ok){
- //      FLAG = false;
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing CaloLevel1 branch"<< endl;
-     };
+         return false;
-     if(TRK && !TRK__ok){
-         cout << "File: "<< f->GetName() <<" discarded ---- Missing Tracker tree"<< endl; return false;
- //      FLAG = false;
-     };
-     if(TRK_L1 && !TRK_L1__ok){
-         cout << "File: "<< f->GetName() <<" discarded ---- Missing Tracker Level1 Branch"<< endl; return false;
- //      FLAG = false;
      };
-     if(TRG && !TRG__ok){
+     if(CAL2 && !CAL2__ok){
-         cout << "File: "<< f->GetName() <<" discarded ---- Missing Trigger tree"<< endl; return false;
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing CaloLevel2 branch"<< endl;
- //      FLAG = false;
+         return false;
      };
-     if(TOF && !TOF__ok){
+     if(TRK2 && !TRK2__ok){
-         cout << "File: "<< f->GetName() <<" discarded ---- Missing ToF tree"<< endl; return false;
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing TrkLevel2 branch"<< endl;
- //      FLAG = false;
+         return false;
      };
-     if(S4 && !S4__ok){
+     if(TRK1 && !TRK1__ok){
-         cout << "File: "<< f->GetName() <<" discarded ---- Missing S4 tree"<< endl; return false;
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing TrkLevel1 branch"<< endl;
- //      FLAG = false;
+         return false;
      };
-     if(ND && !ND__ok){
+     if(TRKh && !TRKh__ok){
-         cout << "File: "<< f->GetName() <<" discarded ---- Missing ND tree"<< endl; return false;
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing TrkHough branch"<< endl;
- //      FLAG = false;
+         return false;
+     };
+     if(ORB && !ORB__ok){
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing ORB tree"<< endl;
+         return false;
      };
      if(AC && !AC__ok){
-         cout << "File: "<< f->GetName() <<" discarded ---- Missing AC tree"<< endl; return false;
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing AC tree"<< endl;
- //      FLAG = false;
+         return false;
      };
-     if(ORB && !ORB__ok){
+     if(S4 && !S4__ok){
-         cout << "File: "<< f->GetName() <<" discarded ---- Missing ORB tree"<< endl; return false;
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing S4 tree"<< endl;
- //      FLAG = false;
+         return false;
+     };
+     if(TOF && !TOF__ok){
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing ToF tree"<< endl;
+         return false;
+     };
+     if(ND && !ND__ok){
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing ND tree"<< endl;
+         return false;
+     };
+     if(TRG && !TRG__ok){
+         cout << "File: "<< f->GetName() <<" discarded ---- Missing Trigger tree"<< endl;
+         return false;
      };
-     return FLAG;
+ //    lk->Delete();
+ //    delete lk;
+     f->Close();
+ //     cout<< "CheckLevel2File(TString): detector list --> ";
+ //     if(TRK1)cout<<"TRK1 ";
+ //     if(TRK2)cout<<"TRK2 ";
+ //     if(TRKh)cout<<"TRKH ";
+ //     if(CAL1)cout<<"CAL1 ";
+ //     if(CAL2)cout<<"CAL2 ";
+ //     if(TOF)cout<<"TOF ";
+ //     if(TRG)cout<<"TRG ";
+ //     if(AC)cout<<"AC ";
+ //     if(ND)cout<<"ND ";
+ //     if(S4)cout<<"S4 ";
+ //     if(ORB)cout<<"ORB ";
+ //     cout << endl;
+     return true;
  };
+ /**
+  * Create clone-trees
+  */
+ void PamLevel2::CreateCloneTrees0( TChain *fChain, TFile *ofile ){
+     cout << "+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+" <<endl;
+     cout << "Create clones of PAMELA trees "<<endl;
+     Int_t i=0;
+     pam_tree_clone[i] = fChain->GetTree()->CloneTree(0);
+     TString name =  pam_tree_clone[i]->GetName();
+     name.Append("_clone");
+ //    pam_tree_clone[i]->SetName(name.Data());
+     cout << pam_tree_clone[i]->GetName() <<endl;
+     i++;
+     TList *li = fChain->GetListOfFriends();
+     TIter next(li);
+     TFriendElement* T_friend=0;
+     ofile->cd();
+     while( (T_friend = (TFriendElement*)next()) ){
+ //      cout<<T_friend->IsA()->GetName()<<" "<<T_friend->GetName()<<hex << T_friend->GetTree() << dec<<endl;
+ //      cout<<T_friend->GetTree()->GetName()<< endl;
+         pam_tree_clone[i] = T_friend->GetTree()->CloneTree(0);
+         pam_tree_clone[i]->SetAutoSave(1000000);
+         name =  pam_tree_clone[i]->GetName();
+         name.Append("_clone");
+ //      pam_tree_clone[i]->SetName(name.Data());
+         cout << pam_tree_clone[i]->GetName() << endl;
+         i++;
+     }
+     delete li;
+     cout << "+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+" <<endl;
+ }
+ /**
+  * Create clone-trees
+  */
+ void PamLevel2::CreateCloneTrees(TFile *ofile){
+     ofile->cd();
+     cout << "+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+" <<endl;
+     cout << "Create new PAMELA trees "<<endl;
+     run_tree_clone = new TTree("Run","PAMELA Level2 data from the GL_RUN table ");
+     run_tree_clone->Branch("RunInfo","GL_RUN",GetPointerTo("RunInfo"));
+     cout << "Run          : branch RunInfo"<<endl;
+     run_tree_clone->Branch("SoftInfo","SoftInfo",GetPointerTo("SoftInfo"));
+     cout << "Run          : branch SoftInfo"<<endl;
+     sel_tree_clone = new TTree("SelectionList","List of selected events ");
+     sel_tree_clone->Branch("RunEntry",&irun,"runentry/I");
+     sel_tree_clone->Branch("EventEntry",&irunentry,"eventry/I");
+     Int_t i=0;
+     if(TRK1||TRK2||TRKh){
+         pam_tree_clone[i] = new TTree("Tracker","PAMELA tracker level2 data ");
+         if(TRK1) {
+             pam_tree_clone[i]->Branch("TrkLevel1","TrkLevel1", GetPointerTo("TrkLevel1"));
+             pam_tree_clone[i]->BranchRef();
+             cout << "Tracker      : branch TrkLevel1"<<endl;
+             cout << "CreateCloneTrees " << GetTrkLevel1()<<endl;
+         };
+         if(TRK2) {
+             pam_tree_clone[i]->Branch("TrkLevel2", "TrkLevel2",GetPointerTo("TrkLevel2"));
+             cout << "Tracker      : branch TrkLevel2"<<endl;
+         };
+         if(TRKh) {
+             pam_tree_clone[i]->Branch("TrkHough","TrkHough", GetPointerTo("TrkHough"));
+             cout << "Tracker      : branch TrkHough"<<endl;
+         };
+         i++;
+     }
+     // Calorimeter
+     if(CAL1||CAL2){
+         pam_tree_clone[i] = new TTree("Calorimeter","PAMELA calorimeter level2 data ");
+         if(CAL1) {
+             pam_tree_clone[i]->Branch("CaloLevel1", "CaloLevel1", GetPointerTo("CaloLevel1"));
+             cout << "Calorimeter  : branch CaloLevel1"<<endl;
+         };
+         if(CAL2) {
+             pam_tree_clone[i]->Branch("CaloLevel2","CaloLevel2", GetPointerTo("CaloLevel2"));
+             cout << "Calorimeter  : branch CaloLevel2"<<endl;
+         };
+         i++;
+     }
+     // ToF
+     if(TOF) {
+         pam_tree_clone[i] = new TTree("ToF","PAMELA ToF level2 data ");
+         pam_tree_clone[i]->Branch("ToFLevel2","ToFLevel2", GetPointerTo("ToFLevel2"));
+         cout << "ToF          : branch ToFLevel2"<<endl;
+         i++;
+     };
+     // Trigger
+     if(TRG) {
+         pam_tree_clone[i] = new TTree("Trigger","PAMELA trigger level2 data ");
+         pam_tree_clone[i]->Branch("TrigLevel2","TrigLevel2", GetPointerTo("TrigLevel2"));
+         cout << "Trigger      : branch TrigLevel2"<<endl;
+         i++;
+     };
+     // S4
+     if(S4) {
+         pam_tree_clone[i] = new TTree("S4","PAMELA S4 level2 data ");
+         pam_tree_clone[i]->Branch("S4Level2","S4Level2", GetPointerTo("S4Level2"));
+         cout << "S4           : branch S4Level2"<<endl;
+         i++;
+     };
+     // Neutron Detector
+     if(ND) {
+         pam_tree_clone[i] = new TTree("NeutronD","PAMELA neutron detector level2 data ");
+         pam_tree_clone[i]->Branch("NDLevel2","NDLevel2", GetPointerTo("NDLevel2"));
+         cout << "NeutronD     : branch NDLevel2"<<endl;
+         i++;
+     };
+     // Anticounters
+     if(AC) {
+         pam_tree_clone[i] = new TTree("Anticounter","PAMELA anticounter detector level2 data ");
+         pam_tree_clone[i]->Branch("AcLevel2","AcLevel2", GetPointerTo("AcLevel2"));
+         cout << "Anticounter  : branch AcLevel2"<<endl;
+         i++;
+     };
+     // OrbitalInfo
+     if(ORB) {
+         pam_tree_clone[i] = new TTree("OrbitalInfo","PAMELA oribital info  ");
+         pam_tree_clone[i]->Branch("OrbitalInfo","OrbitalInfo", GetPointerTo("OrbitalInfo"));
+         cout << "OrbitalInfo  : branch OrbitalInfo"<<endl;
+         i++;
+     };
+     cout << "+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+" <<endl;
+ }
+ /**
+  * Fill tree (created with CreateCloneTrees)
+  *
+  */
+ //void PamLevel2::FillNewPamTree(TTree *T){
+ void PamLevel2::FillCloneTrees(){
+ //    cout << "PamLevel2::FillCloneTrees()" << irunentry << endl;
+     for(Int_t i=0; i<NCLONES; i++){
+         if(pam_tree_clone[i])pam_tree_clone[i]->Fill();
+     }
+     if(sel_tree_clone)sel_tree_clone->Fill();
+ }
+ TTree* PamLevel2::GetCloneTree(TString name){
+     for(Int_t i=0; i<NCLONES; i++){
+         if(pam_tree_clone[i]){
+             TString na = pam_tree_clone[i]->GetName();
+             if(!name.CompareTo(na))return pam_tree_clone[i];
+         };
+     }
+     if(run_tree_clone){
+         TString na = run_tree_clone->GetName();
+         if(!name.CompareTo(na))return run_tree_clone;
+     }
+     if(sel_tree_clone){
+         TString na = sel_tree_clone->GetName();
+         if(!name.CompareTo(na))return sel_tree_clone;
+     }
+     return NULL;
+ }
+ void PamLevel2::WriteCloneTrees(){
+     cout << "+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+" <<endl;
+     cout << "Write clones of PAMELA trees "<<endl;
+     cout << run_tree_clone->GetName()<<endl;
+     run_tree_clone->Write();
+     cout << sel_tree_clone->GetName()<<endl;
+     sel_tree_clone->Write();
+     for(Int_t i=0; i<NCLONES; i++){
+         if(pam_tree_clone[i]){
+             cout << pam_tree_clone[i]->GetName()<<endl;
+             pam_tree_clone[i]->Write();
+         };
+     }
+     cout << "+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+" <<endl;
+ }
+ /**
+  * Method to get level2-trees entry, the corresponding run entry and (if required) the level0 entry.
+  */
+ Int_t PamLevel2::GetEntry(Int_t iee){
+     if(!pam_tree){
+         cout << " Int_t PamLevel2::GetEntry(Int_t) -- ERROR -- level2 trees not loaded"<<endl;
+         return 0;
+     }
+     //
+     // This is a sort of bug: if you don't have the run tree you don't want to exit here you want to have loaded the event anyway...
+     //
+     //    if(!run_tree ){
+     //  cout << " Int_t PamLevel2::GetEntry(Int_t) -- ERROR -- run tree not loeaded"<<endl;
+     //  return 0;
+     //    }
+     Int_t ii=0;
+     //-------------------------------
+     ii = iee;
+     if( !pam_tree->GetEntry(ii) ) return 0;
+     //
+     // ... that's way I put it here. Notice that nothing change in the code (is backward compatible) since in any case you return with 0.
+     // in theory one would like to return 1 if run is not loaded but now I don't have the will to add that 2 lines of code and it is not
+     // a problem if you don't check the return code of getentry.
+     //
+     if(!run_tree ){
+         if ( TRK0 || CAL0 || TOF0 || RUN ) { //forse cosi` va bene per tornare 1?
+                 cout << " Int_t PamLevel2::GetEntry(Int_t) -- ERROR -- run tree not loaded"<<endl;
+                 return 0;
+         }  else {
+                 return 1; //cosi` se non c'e` run esce qua...
+         }
+     }
+     //-------------------------------
+     ii = iee;
+     Bool_t UPDATED = UpdateRunInfo(run_tree,ii);
+     if(SELLI==0)irunentry = iee-runfirstentry;
+     if(UPDATED && run_tree_clone)run_tree_clone->Fill();
+ //    cout << "PamLevel2::GetEntry("<<iee<<") "<<irun<<" "<<runfirstentry<<" "<<irunentry<<endl;
+     if( TRK0 || CAL0 || TOF0 )GetYodaEntry( );
+     return 1;
+ }
+ /**
+  * Method to retrieve the level0 tree (YODA tree) that contains the current event.
+  * Given the run ID (...), if needed it query the DB and load the proper file.
+  * @return Pointer to the tree
+  */
+ TTree* PamLevel2::GetYodaTree( ){
+ //    cout << "TTree* PamLevel2::GetYodaTree( )"<<endl;
+     //===================================
+     // check if iroot has changed
+     //===================================
+     if( irun<0 ){
+         cout << "PamLevel2::GetYodaTree() -- ERROR "<<endl;
+         cout << "In order to use this method you have to load the RunInfo tree "<<endl;
+         cout << "with the method TChain* PamLevel2::GetRunTree(TString, TString)"<<endl;
+ //      cout << " - read the event with PamLevel2::GetEntry(Int_t)"<<endl;
+         return NULL;
+     }
+     Int_t irootnew = run_obj->ID_ROOT_L0;
+ //     cout << "iroot    "<<iroot<<endl;
+ //     cout << "irootnew "<<irootnew<<endl;
+     //===================================
+     // load the level0 file
+     // (if not already loaded)
+     //===================================
+     if( iroot != irootnew || !l0_tree){
+         iroot = irootnew;
+         //===================================
+         // open the DB connection
+         // (if not already opened)
+         //===================================
+         if(!dbc || (dbc && !dbc->IsConnected())){
+             cout<<"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"<<endl;
+             cout<<"Connecting to DB"<<endl;
+             cout<<"HOST "<<host<<endl;
+             cout<<"USER "<<user<<endl;
+             cout<<"PSW  "<<psw<<endl;
+             dbc = TSQLServer::Connect(host.Data(),user.Data(),psw.Data());
+             if( !dbc )return NULL;
+             if( !dbc->IsConnected() )return NULL;
+ //          cout<<"...done"<<endl;
+             cout<<"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"<<endl;
+         }else{
+ //          cout<<"DB already connected"<<endl;
+         }
+         GL_ROOT glroot = GL_ROOT();
+         if( glroot.Query_GL_ROOT(iroot,dbc) ){
+             cout << "TTree* PamLevel2::GetYodaTree( ) -- ERROR -- level0 file iroot = "<<iroot<< " does not exists"<<endl;
+             return NULL;
+         };
+         TString filename = glroot.PATH + glroot.NAME;
+         if(l0_file){
+             l0_file->Close();
+             l0_file->Delete();
+         }
+         cout << "Opening LEVEL0 file: "<< filename << endl;
+         FileStat_t t;
+         if( gSystem->GetPathInfo(filename.Data(),t) ){
+             cout << " PamLevel2::GetYodaTree() -- ERROR opening file "<<endl;
+             return NULL;
+         }
+         l0_file = new TFile(filename);
+         if( !l0_file )return NULL;
+         l0_tree = (TTree*)l0_file->Get("Physics");
+         if(!h0_obj)h0_obj = new EventHeader();
+         l0_tree->SetBranchAddress("Header" ,&h0_obj);
+         //---------------------------------------------------
+         // TRACKER:
+         if(TRK0){
+             if(!trk0_obj){
+                 trk0_obj = new TrkLevel0();
+                 trk0_obj->Set();
+             };
+             l0_tree->SetBranchAddress("Tracker" ,trk0_obj->GetPointerToTrackerEvent());
+         }
+         //---------------------------------------------------
+         // CALORIMETER:
+         if(CAL0){
+             cout << "PamLevel2::GetYodaTree() --- level0 calorimeter not implemented "<<endl;
+         }
+         //---------------------------------------------------
+         // TOF:
+         if(TOF0){
+             cout << "PamLevel2::GetYodaTree() --- level0 TOF not implemented "<<endl;
+         }
+     };
+     if(!dbc || (dbc && !dbc->IsConnected())){
+         cout << " TTree* PamLevel2::GetYodaTree( ) -- no DB connected... hai fatto qualche cazzata "<<endl;
+     }
+     TrkParams::SetCalib(run_obj,dbc);
+ //    cout << l0_tree << endl;
+     return l0_tree;
+ }
+ /**
+  * Method to retrieve the level0 tree (YODA tree) that contains the current event.
+  */
+ Int_t PamLevel2::GetYodaEntry(){
+ //    cout << "Int_t PamLevel2::GetYodaEntry()"<<endl;
+     if(!GetYodaTree())return 0;
+     // patch
+     if( (Int_t)irunentry < 0){
+         cout << "Int_t PamLevel2::GetYodaEntry() -- ATTENZIONE -- irunentry negativo?!?! "<<(Int_t)irunentry<<endl;
+         irunentry=0;
+     }
+     //  ---------------------------------
+     //  if file is NOT a preselected file
+     //  ---------------------------------
+     UInt_t quellagiusta = irunentry + run_obj->EV_FROM;
+ //     cout << " irun "<< irun << " irunentry "<< irunentry<<" run_obj->EV_FROM "<<run_obj->EV_FROM <<" quella giusta "<<quellagiusta << endl;
+ //     cout << " iroot "<<iroot<<" run_obj->ID_ROOT_L0 "<<run_obj->ID_ROOT_L0<<endl;
+ //     cout << " time "<< GetOrbitalInfo()->absTime << endl;
+ //     cout << " trk_calib_used "<<run_obj->TRK_CALIB_USED<< endl;
+     if( !GetOrbitalInfo() ){
+         cout << "Int_t PamLevel2::GetYodaEntry() -- ERROR -- missing OrbitalInfo "<<endl;
+         return 0;
+     }
+     // ---------------------------------------------------------------------
+     // ATTENTION!!!
+     // If data are not pre-processed with cleaner, the level0 tree may contain
+     // spurious nested physics packets.
+     // The GL_RUN variables EV_FROM, EV_TO and NEVENTS counts also these entries
+     // while level2 tree DOES NOT!!
+     // This means that "quellagiusta" in these cases is not correct.
+     // In order to retrieve the correct level0 event, I implemented a check
+     // of the OBT and pkt-number. In case of mismatch, the level0 entry number
+     // is shift forward until when the packets match.
+     // ---------------------------------------------------------------------
+     Int_t answer = 0;
+     Int_t shift =0;
+     do{
+         if(shift>0){
+             cout << " level0 <--> level2 mismatch ( irun "<<irun<<" irunentry "<<irunentry<<" shift "<<shift<<" )"<<endl;
+         }
+         answer = l0_tree->GetEntry(quellagiusta+shift);
+         shift++;
+         if( !GetEventHeader() ){
+             cout << "Int_t PamLevel2::GetYodaEntry() -- ERROR -- missing EventHeader "<<endl;
+             return 0;
+         }
+ //      if( (quellagiusta+shift) == l0_tree->GetEntries()+1 )cout << ">>> end of level0 tree <<<"<<endl;
+ //      cout << " GetOrbitalInfo()->OBT "<< GetOrbitalInfo()->OBT << endl;
+ //      cout << " GetEventHeader()->GetPscuHeader()->GetOrbitalTime() "<< GetEventHeader()->GetPscuHeader()->GetOrbitalTime() << endl;
+ //      cout << " GetOrbitalInfo()->pkt_num "<< GetOrbitalInfo()->pkt_num << endl;
+ //      cout << " GetEventHeader()->GetPscuHeader()->GetCounter() "<< GetEventHeader()->GetPscuHeader()->GetCounter() << endl;
+     }while( ( GetOrbitalInfo()->OBT != (UInt_t)(GetEventHeader()->GetPscuHeader()->GetOrbitalTime()) || GetOrbitalInfo()->pkt_num != (UInt_t)(GetEventHeader()->GetPscuHeader()->GetCounter())) && (quellagiusta+shift) < GetYodaTree()->GetEntries() );
+ //    cout << "LA ENTRY GIUSTA E`: "<<quellagiusta<<" (spero...)"<<endl;
+ //    return GetYodaTree()->GetEntry(quellagiusta);
+     return answer;
+ }

 Legend:



Removed from v.1.6
 


changed lines


 
Added in v.1.29
 Legend:



Removed from v.1.6
 


changed lines


 
Added in v.1.29
-Removed from v.1.6
+Added in v.1.29

	ViewVC Help
Powered by ViewVC 1.1.23