/[PAMELA software]/PadmeAmidala/src/RunGlue.cpp
ViewVC logotype

Diff of /PadmeAmidala/src/RunGlue.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.12 by mocchiut, Wed Dec 10 13:15:59 2008 UTC revision 1.23 by mocchiut, Fri Oct 17 14:04:04 2014 UTC
# Line 42  RunGlue::RunGlue(TSQLServer *da, UInt_t Line 42  RunGlue::RunGlue(TSQLServer *da, UInt_t
42      runmode = false;      runmode = false;
43      createlist = true;      createlist = true;
44    };    };
45      fUpgrade = true;
46    //    //
47    //  lList = new TList();    //  lList = new TList();
48    //    //
# Line 114  TList *RunGlue::GetRunList(){ Line 115  TList *RunGlue::GetRunList(){
115      TTimeStamp *llim = new TTimeStamp(YY,MM,DD,0,0,0,0,true,0);      TTimeStamp *llim = new TTimeStamp(YY,MM,DD,0,0,0,0,true,0);
116      //      //
117      UInt_t lowerlimit = llim->GetSec();      UInt_t lowerlimit = llim->GetSec();
118      UInt_t upperlimit = lowerlimit + 86401;      UInt_t upperlimit = lowerlimit + 86400;
119      //      //
120      if ( DebugMode() ) printf(" YY %u MM %u DD %u ll %u ul %u \n",YY,MM,DD,lowerlimit,upperlimit);      if ( DebugMode() ) printf(" YY %u MM %u DD %u ll %u ul %u \n",YY,MM,DD,lowerlimit,upperlimit);
121      //      //
# Line 281  TList *RunGlue::GetRunList(){ Line 282  TList *RunGlue::GetRunList(){
282      TTimeStamp *llim = new TTimeStamp(YY,MM,DD,0,0,0,0,true,0);      TTimeStamp *llim = new TTimeStamp(YY,MM,DD,0,0,0,0,true,0);
283      //      //
284      UInt_t lowerlimit = llim->GetSec();      UInt_t lowerlimit = llim->GetSec();
285      UInt_t upperlimit = lowerlimit + 86401;      UInt_t upperlimit = lowerlimit + 86400;
286      //      //
287      if ( DebugMode() ) printf(" YY %u MM %u DD %u ll %u ul %u \n",YY,MM,DD,lowerlimit,upperlimit);      if ( DebugMode() ) printf(" YY %u MM %u DD %u ll %u ul %u \n",YY,MM,DD,lowerlimit,upperlimit);
288      //      //
# Line 394  Bool_t RunGlue::OpenFile(){ Line 395  Bool_t RunGlue::OpenFile(){
395      return(false);      return(false);
396    } else {    } else {
397      //      //
398        // try to lock tables and work on a db level to avoid multiple file simultaneous access
399        //
400        stringstream oss;
401        //  
402        if ( fUpgrade ){
403          oss.str("");
404          oss << "lock table GL_ROOT write;";
405          TSQLResult *result = 0;
406          TSQLRow *row = 0;
407          result = dbc->Query(oss.str().c_str());
408          oss.str("");
409          oss << "select ID from GL_ROOT where NAME='" << ((TString)gSystem->BaseName(this->GetFilename())).Data() << "';";
410          result = dbc->Query(oss.str().c_str());
411          row = result->Next();
412          if ( row ){
413            printf("Error opening target file (does %s exist? already in the DB? are the permissions ok?)\n",(this->GetFilename()).Data());
414            return(false);
415          } else {
416            oss.str("");
417            oss << "insert into GL_ROOT (PATH,NAME) values ('$PAM_L2','" << ((TString)gSystem->BaseName(this->GetFilename())).Data() << "');";      
418            result = dbc->Query(oss.str().c_str());
419          };
420          oss.str("");
421          oss << "unlock tables;";
422          result = dbc->Query(oss.str().c_str());
423        };
424        //    Target = TFile::Open((this->GetFilename()).Data(), "RECREATE" );
425        Target = TFile::Open((this->GetFilename()).Data(), "NEW" );    
426        //    
427      printf(" Output file does not exist, creating it\n");      printf(" Output file does not exist, creating it\n");
428      //      //
429      Long64_t maxsize = 99900000000LL;        Long64_t maxsize = 99900000000LL;  
430      //      //
431      Target = TFile::Open((this->GetFilename()).Data(), "RECREATE" );      if ( !Target || Target->IsZombie()) {
432          printf("Error opening target file (does %s exist? are the permissions ok?)\n",(this->GetFilename()).Data());
433          //      exit(1);
434          return(false);
435        }
436        //
437        Target->Write();
438        //
439      //fastMethod = kTRUE;      //fastMethod = kTRUE;
440      fastMethod = kFALSE;      fastMethod = kFALSE;
441      //          //    
     //      
     if ( !Target || Target->IsZombie()) {  
       printf("Error opening target file (does %s exist?)\n",(this->GetFilename()).Data());  
       exit(1);  
     }  
442      //      //
443      TTree::SetMaxTreeSize(maxsize);      TTree::SetMaxTreeSize(maxsize);
444      Target->SetCompressionLevel(2);      //    Target->SetCompressionLevel(2);
445        Target->SetCompressionLevel(3);
446      //Target->SetCompressionLevel(5);      //Target->SetCompressionLevel(5);
447      //      //
448      fOpen = true;      fOpen = true;
# Line 472  void RunGlue::UpdateDB(TList *dlist){ Line 505  void RunGlue::UpdateDB(TList *dlist){
505    };    };
506    //    //
507    myquery.str("");    myquery.str("");
   //  myquery << "insert into GL_ROOT (ID_RAW,PATH,NAME) values (" << idr << ",'" << outdir.Data() << "','" << ((TString)gSystem->BaseName(this->GetFilename())).Data() << "');";  
   myquery << "insert into GL_ROOT (ID_RAW,PATH,NAME) values (" << idr << ",'$PAM_L2','" << ((TString)gSystem->BaseName(this->GetFilename())).Data() << "');";  
   if ( DebugMode() ) printf(" query is %s \n",myquery.str().c_str());  
   //  
   pResult = dbc->Query(myquery.str().c_str());  
   if ( !pResult ){  
     printf(" ERROR WRITING ON DB!\n");  
     return;  
   };  
   myquery.str("");  
508    myquery << "select ID from GL_ROOT where NAME='" << ((TString)gSystem->BaseName(this->GetFilename())).Data() << "';";    myquery << "select ID from GL_ROOT where NAME='" << ((TString)gSystem->BaseName(this->GetFilename())).Data() << "';";
509    if ( DebugMode() ) printf(" query is %s \n",myquery.str().c_str());    if ( DebugMode() ) printf(" query is %s \n",myquery.str().c_str());
510    //    //
# Line 497  void RunGlue::UpdateDB(TList *dlist){ Line 520  void RunGlue::UpdateDB(TList *dlist){
520    } else {    } else {
521      idl2 = (UInt_t)atoll(Row->GetField(0));      idl2 = (UInt_t)atoll(Row->GetField(0));
522    };    };
523      myquery.str("");
524      //  myquery << "insert into GL_ROOT (ID_RAW,PATH,NAME) values (" << idr << ",'" << outdir.Data() << "','" << ((TString)gSystem->BaseName(this->GetFilename())).Data() << "');";
525      //  myquery << "insert into GL_ROOT (ID_RAW,PATH,NAME) values (" << idr << ",'$PAM_L2','" << ((TString)gSystem->BaseName(this->GetFilename())).Data() << "');";
526      myquery << "update GL_ROOT set ID_RAW=" << idr << " where ID=" << idl2 << ";";
527      if ( DebugMode() ) printf(" query is %s \n",myquery.str().c_str());
528      //
529      pResult = dbc->Query(myquery.str().c_str());
530      if ( !pResult ){
531        printf(" ERROR WRITING ON DB!\n");
532        return;
533      };
534    //    //
535    //    //
536    //    //
# Line 531  void RunGlue::MergeRootfile(TList *sourc Line 565  void RunGlue::MergeRootfile(TList *sourc
565    //    //
566    merged = true;    merged = true;
567    //    //
568    if ( li ) li->Delete();    //  if ( li ) li->Delete();
569    li = new PamLevel2(wd,sourcelist,fDList);    PamLevel2 *nli = new PamLevel2(wd,sourcelist,fDList);
570      nli->SetSELLI(2);
571    //    //
572    Target->cd();    Target->cd();
573    //    //
574    li->CreateCloneTrees(Target);    nli->CreateCloneTrees(Target);
575    ULong64_t nevents = li->GetEntries();    //
576      /*  nli->GetCloneTree("Tracker")->SetAutoSave(900000000000000LL);
577      nli->GetCloneTree("Trigger")->SetAutoSave(900000000000000LL);
578      nli->GetCloneTree("Calorimeter")->SetAutoSave(900000000000000LL);
579      nli->GetCloneTree("S4")->SetAutoSave(900000000000000LL);
580      nli->GetCloneTree("Anticounter")->SetAutoSave(900000000000000LL);
581      nli->GetCloneTree("NeutronD")->SetAutoSave(900000000000000LL);
582      nli->GetCloneTree("OrbitalInfo")->SetAutoSave(900000000000000LL);
583      nli->GetCloneTree("Run")->SetAutoSave(900000000000000LL);
584      nli->GetCloneTree("ToF")->SetAutoSave(900000000000000LL);*/
585      //
586      ULong64_t nevents = nli->GetEntries();        
587    printf(" NEVENTS %llu \n",nevents);    printf(" NEVENTS %llu \n",nevents);
588    for(ULong64_t iev=0; iev<nevents; iev++){    for(ULong64_t iev=0; iev<nevents; iev++){
589      li->Clear();      nli->Clear();
590      if( li->GetEntry(iev) ){      if( nli->GetEntry(iev) ){
591        li->FillCloneTrees();        nli->FillCloneTrees();
592      };      };
593    };    };
594    Target->cd();    Target->cd();
595    li->WriteCloneTrees();    nli->WriteCloneTrees();
596    printf(" file %s \n",Target->GetName());    printf("Written file %s \n",Target->GetName());
597    //  Target->Write();    //  Target->Write();
598    TTree *slist = (TTree*)Target->Get("SelectionList");    //  TTree *slist = (TTree*)Target->Get("SelectionList");
599    slist->Delete("all");    //  slist->Delete("all");
600      if ( !nli->GetCloneTree("ProcessingInfo") ){
601        TChain *P = new TChain("ProcessingInfo");
602        // loop over files and create chains
603        TIter next(sourcelist);
604        TSystemFile *questo = 0;
605        while ((questo = (TSystemFile*) next())) {
606          TString name = questo->GetName();
607          P->Add(name);
608        }
609        if ( P->GetEntries() ){
610          TTree *Pclone = P->CloneTree();
611    
612    
613    
614          ProcInfo *procinfo = new ProcInfo();
615          procinfo->runID = 0;
616          TTimeStamp *dt = new TTimeStamp();
617          procinfo->date = dt->AsString();
618          delete dt;
619          TString isok;
620          if ( nli->HasDiscardedFiles() ){
621            isok = " WARNING, files were discarded while merging! ";
622          } else {
623            isok = " the level2 merging was OK!";
624          }
625          procinfo->commandLine += Form("PadmeAmidala  run: %i dir: %s wd %s. %s",run,dir.Data(),wd.Data(),isok.Data());
626          procinfo->outputFilename = Form("%s %s ",outdir.Data(),Target->GetName());
627          procinfo->localDir = gSystem->WorkingDirectory();
628          procinfo->uname = gSystem->GetFromPipe("uname -a");
629          procinfo->DB = Form("Host %s DB %s ",dbc->GetHost(),dbc->GetDB());
630          
631          Pclone->SetBranchAddress("ProcInfo",&procinfo);
632          Pclone->Fill();
633    
634          Target->cd();
635          Pclone->Write("ProcessingInfo",TObject::kOverwrite);
636          P->Delete();
637          P=0;
638        }
639      }
640      //  
641    Target->Close();    Target->Close();
642    
643  //   //  //   //
# Line 754  void RunGlue::MergeRootfile(TList *sourc Line 841  void RunGlue::MergeRootfile(TList *sourc
841  };  };
842    
843    
844  Long64_t RunGlue::Mergy(TChain *mychain, TFile* file, Int_t basketsize, Option_t* option){  // Long64_t RunGlue::Mergy(TChain *mychain, TFile* file, Int_t basketsize, Option_t* option){
845     // We must have been passed a file, we will use it  //    // We must have been passed a file, we will use it
846     // later to reset the compression level of the branches.  //    // later to reset the compression level of the branches.
847     if (!file) {  //    if (!file) {
848        // FIXME: We need an error message here.  //       // FIXME: We need an error message here.
849       printf(" 19 \n");  //      printf(" 19 \n");
850       return 0;  //      return 0;
851     }  //    }
852     printf(" 20 \n");  //    printf(" 20 \n");
853    
854     // Options  //    // Options
855     Bool_t fastClone = kFALSE;  //    Bool_t fastClone = kFALSE;
856     TString opt = option;  //    TString opt = option;
857     opt.ToLower();  //    opt.ToLower();
858     if (opt.Contains("fast")) {  //    if (opt.Contains("fast")) {
859        fastClone = kTRUE;  //       fastClone = kTRUE;
860        printf(" 21 \n");  //       printf(" 21 \n");
861     }  //    }
862     // The chain tree must have a list of branches  //    // The chain tree must have a list of branches
863     // because we may try to change their basket  //    // because we may try to change their basket
864     // size later.  //    // size later.
865     TObjArray* lbranches = mychain->GetListOfBranches();  //    TObjArray* lbranches = mychain->GetListOfBranches();
866     if (!lbranches) {  //    if (!lbranches) {
867        // FIXME: We need an error message here.  //       // FIXME: We need an error message here.
868       printf(" 22 \n");  //      printf(" 22 \n");
869        return 0;  //       return 0;
870     }  //    }
871    
872     //   file->cd();  //    //   file->cd();
873     // The chain must have a current tree because  //    // The chain must have a current tree because
874     // that is the one we will clone.  //    // that is the one we will clone.
875     //   if (!fTree) {  //    //   if (!fTree) {
876        // -- LoadTree() has not yet been called, no current tree.  //       // -- LoadTree() has not yet been called, no current tree.
877        // FIXME: We need an error message here.  //       // FIXME: We need an error message here.
878     //      return 0;  //    //      return 0;
879     //   }  //    //   }
880    
881     // Copy the chain's current tree without  //    // Copy the chain's current tree without
882     // copying any entries, we will do that later.  //    // copying any entries, we will do that later.
883     printf(" 23 \n");  //    printf(" 23 \n");
884     TTree* newTree = mychain->CloneTree(0);  //    TTree* newTree = mychain->CloneTree(0);
885     if (!newTree) {  //    if (!newTree) {
886        // FIXME: We need an error message here.  //       // FIXME: We need an error message here.
887       printf(" 24 \n");  //      printf(" 24 \n");
888        return 0;  //       return 0;
889     }  //    }
890     printf(" 25 \n");  //    printf(" 25 \n");
891    
892    
893     // Strip out the (potential) directory name.  //    // Strip out the (potential) directory name.
894     // FIXME: The merged chain may or may not have the  //    // FIXME: The merged chain may or may not have the
895     //        same name as the original chain.  This is  //    //        same name as the original chain.  This is
896     //        bad because the chain name determines the  //    //        bad because the chain name determines the
897     //        names of the trees in the chain by default.  //    //        names of the trees in the chain by default.
898     printf(" 26 \n");  //    printf(" 26 \n");
899     newTree->SetName(gSystem->BaseName(mychain->GetName()));  //    newTree->SetName(gSystem->BaseName(mychain->GetName()));
900     printf(" 27 \n");  //    printf(" 27 \n");
901    
902     // FIXME: Why do we do this?  //    // FIXME: Why do we do this?
903     //   newTree->SetAutoSave(-1);  //    //   newTree->SetAutoSave(-1);
904     newTree->SetAutoSave(900000000000000LL);  //    newTree->SetAutoSave(900000000000000LL);
905    
906     printf(" 28 \n");  //    printf(" 28 \n");
907     // Circularity is incompatible with merging, it may  //    // Circularity is incompatible with merging, it may
908     // force us to throw away entries, which is not what  //    // force us to throw away entries, which is not what
909     // we are supposed to do.  //    // we are supposed to do.
910     newTree->SetCircular(0);  //    newTree->SetCircular(0);
911    
912     // Reset the compression level of the branches.  //    // Reset the compression level of the branches.
913     if (opt.Contains("c")) {  //    if (opt.Contains("c")) {
914        TBranch* branch = 0;  //       TBranch* branch = 0;
915        TIter nextb(newTree->GetListOfBranches());  //       TIter nextb(newTree->GetListOfBranches());
916        while ((branch = (TBranch*) nextb())) {  //       while ((branch = (TBranch*) nextb())) {
917          printf(" 29 \n");  //      printf(" 29 \n");
918           branch->SetCompressionLevel(file->GetCompressionLevel());  //          branch->SetCompressionLevel(file->GetCompressionLevel());
919        }  //       }
920     }  //    }
921    
922     printf(" 30 \n");  //    printf(" 30 \n");
923     // Reset the basket size of the branches.  //    // Reset the basket size of the branches.
924     if (basketsize > 1000) {  //    if (basketsize > 1000) {
925        TBranch* branch = 0;  //       TBranch* branch = 0;
926        TIter nextb(newTree->GetListOfBranches());  //       TIter nextb(newTree->GetListOfBranches());
927        while ((branch = (TBranch*) nextb())) {  //       while ((branch = (TBranch*) nextb())) {
928          printf(" 31 \n");  //      printf(" 31 \n");
929           branch->SetBasketSize(basketsize);  //          branch->SetBasketSize(basketsize);
930        }  //       }
931     }  //    }
932    
933     printf(" 32 \n");  //    printf(" 32 \n");
934     Long64_t nentries = mychain->GetEntriesFast();  //    Long64_t nentries = mychain->GetEntriesFast();
935     //Long64_t nentries = mychain->GetEntries();  //    //Long64_t nentries = mychain->GetEntries();
936    
937     // Copy the entries.  //    // Copy the entries.
938     if (fastClone) {  //    if (fastClone) {
939        // For each tree in the chain.  //       // For each tree in the chain.
940        for (Long64_t i = 0; i < nentries; i += mychain->GetTree()->GetEntries()) {  //       for (Long64_t i = 0; i < nentries; i += mychain->GetTree()->GetEntries()) {
941           if (mychain->LoadTree(i) < 0) {  //          if (mychain->LoadTree(i) < 0) {
942              break;  //             break;
943           }  //          }
944           TTreeCloner cloner(mychain->GetTree(), newTree, option);  //          TTreeCloner cloner(mychain->GetTree(), newTree, option);
945           if (cloner.IsValid()) {  //          if (cloner.IsValid()) {
946              newTree->SetEntries(newTree->GetEntries() + mychain->GetTree()->GetEntries());  //             newTree->SetEntries(newTree->GetEntries() + mychain->GetTree()->GetEntries());
947              cloner.Exec();  //             cloner.Exec();
948           } else {  //          } else {
949              if (mychain->GetFile()) {  //             if (mychain->GetFile()) {
950                printf("Merge Skipped file %s\n", mychain->GetFile()->GetName());  //            printf("Merge Skipped file %s\n", mychain->GetFile()->GetName());
951                 //            } else {  //             //            } else {
952                 //               Warning("Merge", "Skipped file number %d\n", fTreeNumber);  //             //               Warning("Merge", "Skipped file number %d\n", fTreeNumber);
953              }  //             }
954           }  //          }
955        }  //       }
956     } else {  //    } else {
957       printf(" 33 %llu \n",nentries);  //      printf(" 33 %llu \n",nentries);
958       mychain->Print();  //      mychain->Print();
959       for (Long64_t i = 0; i < nentries; i++) {  //      for (Long64_t i = 0; i < nentries; i++) {
960         printf(" i %llu \n",i);  //        printf(" i %llu \n",i);
961         // for (Long64_t i = 0; i < 1; i++) {  //        // for (Long64_t i = 0; i < 1; i++) {
962           if (mychain->GetEntry(i) <= 0) {  //          if (mychain->GetEntry(i) <= 0) {
963              break;  //             break;
964           }  //          }
965           newTree->Fill();  //          newTree->Fill();
966        }  //       }
967        printf(" 34 \n");  //       printf(" 34 \n");
968     }  //    }
969    
970     // Write the new tree header.  //    // Write the new tree header.
971     printf(" 35 \n");  //    printf(" 35 \n");
972     newTree->Write();  //    newTree->Write();
973    
974     printf(" 36 \n");  //    printf(" 36 \n");
975     // Get our return value.  //    // Get our return value.
976     Int_t nfiles = newTree->GetFileNumber() + 1;  //    Int_t nfiles = newTree->GetFileNumber() + 1;
977    
978     // Close and delete the current file of the new tree.  //    // Close and delete the current file of the new tree.
979     if (!opt.Contains("keep")) {  //    if (!opt.Contains("keep")) {
980        // FIXME: What happens to fDirectory in newTree here?  //       // FIXME: What happens to fDirectory in newTree here?
981        delete newTree->GetCurrentFile();  //       delete newTree->GetCurrentFile();
982     }  //    }
983     return nfiles;  //    return nfiles;
984  }  // }
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.23
  ViewVC Help
Powered by ViewVC 1.1.23