/[PAMELA software]/DarthVader/S4Level2/src/S4Core.cpp
ViewVC logotype

Diff of /DarthVader/S4Level2/src/S4Core.cpp

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

revision 1.8 by mocchiut, Fri Nov 17 10:08:10 2006 UTC revision 1.16 by mocchiut, Wed May 30 11:45:11 2007 UTC
# Line 1  Line 1 
1  //  //
2    // Given a calibration and a data file this program create an ntuple with LEVEL2 S4 variables
3    //
4    //
5  // C/C++ headers  // C/C++ headers
6  //  //
7  #include <fstream>  #include <fstream>
# Line 29  Line 32 
32  #include <stdlib.h>  #include <stdlib.h>
33  #include <math.h>  #include <math.h>
34  //  //
35    // RunInfo header
36    //
37    #include <RunInfo.h>
38    #include <GLTables.h>
39    //
40  // YODA headers  // YODA headers
41  //  //
42  #include <PamelaRun.h>  #include <PamelaRun.h>
# Line 37  Line 45 
45  #include <EventHeader.h>  #include <EventHeader.h>
46  #include <CalibS4Event.h>  #include <CalibS4Event.h>
47  #include <physics/S4/S4Event.h>  #include <physics/S4/S4Event.h>
 //#include <yodaUtility.h>  
 //  
 // RunInfo header  
 //  
 #include <RunInfo.h>  
 #include <GLTables.h>  
48  //  //
49  // This program headers  // This program headers
50  //  //
51  #include <S4Level2.h>  #include <S4Level2.h>
52  #include <S4Core.h>  #include <S4Core.h>
53  #include <S4Verl2.h>  #include <S4Verl2.h>
   
 using namespace std;  
   
 //  
54  //  //
55    using namespace std;
56  //  //
57  /*  /*
58   * Fit function Received from Valeria Malvezzi 06/02/2006   * Fit function Received from Valeria Malvezzi 06/02/2006
# Line 73  TArrayD *S4_paramfit(UInt_t atime, TSQLS Line 72  TArrayD *S4_paramfit(UInt_t atime, TSQLS
72    GL_S4_CALIB *glS4calib = new GL_S4_CALIB();    GL_S4_CALIB *glS4calib = new GL_S4_CALIB();
73    //    //
74    if ( !dbc->IsConnected() ) throw -504;    if ( !dbc->IsConnected() ) throw -504;
75    glS4calib->Query_GL_S4_CALIB(atime, dbc);    Int_t s4sig = glS4calib->Query_GL_S4_CALIB(atime, dbc);
76      if ( s4sig < 0 ) throw s4sig;
77    //    //
78    GL_ROOT *glroot = new GL_ROOT();    GL_ROOT *glroot = new GL_ROOT();
79    if ( !dbc->IsConnected() ) throw -504;    if ( !dbc->IsConnected() ) throw -504;
# Line 102  TArrayD *S4_paramfit(UInt_t atime, TSQLS Line 102  TArrayD *S4_paramfit(UInt_t atime, TSQLS
102    //    //
103    tr->GetEntry(glS4calib->EV_ROOT);    tr->GetEntry(glS4calib->EV_ROOT);
104    //    //
105    //----------- variable initialization -------------------------------------------------    // Variables initialization
106    //    //
107    Double_t mip[3]={1, 30, 300};    Double_t mip[3]={1, 30, 300};
108    Double_t adc[3] = {0.,0.,0.};    Double_t adc[3] = {0.,0.,0.};
109    //    //
110    //------------ Fit calibrations and find parameters to calibrate data ------------------    // Fit calibrations and find parameters to calibrate data
111    //    //
112    pamela::S4::S4Event  *s4Record = 0;    pamela::S4::S4Event  *s4Record = 0;
113    //    //
# Line 136  TArrayD *S4_paramfit(UInt_t atime, TSQLS Line 136  TArrayD *S4_paramfit(UInt_t atime, TSQLS
136    adc[2]=adc[2]/128;      adc[2]=adc[2]/128;  
137    //  if ( IsDebug() ) printf(" adc1 = %g adc2 = %g adc3 = %g\n",adc[0],adc[1],adc[2]);    //  if ( IsDebug() ) printf(" adc1 = %g adc2 = %g adc3 = %g\n",adc[0],adc[1],adc[2]);
138    TGraph *fitpar = new TGraph (3, adc, mip);    TGraph *fitpar = new TGraph (3, adc, mip);
139    TF1 *func = new TF1("fitf", fitf, -1., 400., 2); // definizione della funzione, 2 = num. parametri    TF1 *func = new TF1("fitf", fitf, -1., 400., 2); // function definition with 2 parameters
   //  TF1 *func = new TF1("fitf", fitf, -0., 1000., 2); // definizione della funzione, 2 = num. parametri  
140    //      //  
141    func->SetParameters(0.3,1.);        //inizializzazione dei parametri a 1    func->SetParameters(0.3,1.); // parameters initialization to 1
142    func->SetParNames("m","q");      //definisce il nome dei parametri    func->SetParNames("m","q"); //parameter's name
143    fitpar->Fit(func,"qr");          //fitta fitpar con la funzione func nel range definito nella funzione    fitpar->Fit(func,"qr"); //function fit
   //fitpar->Fit(func,"r");          //fitta fitpar con la funzione func nel range definito nella funzione  
144    parametri->AddAt(func->GetParameter(0),0);    parametri->AddAt(func->GetParameter(0),0);
145    parametri->AddAt(func->GetParameter(1),1);    parametri->AddAt(func->GetParameter(1),1);
146    //  if ( parametri[0] < 0. || parametri[0] > 0.5 || parametri[1] < 0.7 || parametri[1] > 1.1 ) valid = 0;    //  if ( parametri[0] < 0. || parametri[0] > 0.5 || parametri[1] < 0.7 || parametri[1] > 1.1 ) valid = 0;
# Line 161  TArrayD *S4_paramfit(UInt_t atime, TSQLS Line 159  TArrayD *S4_paramfit(UInt_t atime, TSQLS
159  //  //
160  //  //
161  int S4Core(UInt_t run, TFile *file, TSQLServer *dbc, Int_t S4argc, char *S4argv[]){  int S4Core(UInt_t run, TFile *file, TSQLServer *dbc, Int_t S4argc, char *S4argv[]){
   Int_t i = 0;  
162    //    //
163    TString processFolder = "S4Folder";    // Set these to true to have a verbose output.
164    //    //
165    Bool_t debug = false;    Bool_t debug = false;
   //  
166    Bool_t verbose = false;    Bool_t verbose = false;
167    //        //    
168      //
169      // Output directory is the working directoy.
170      //
171      const char* outDir = gSystem->DirName(gSystem->DirName(file->GetPath()));
172      //
173      Int_t i = 0;
174      TString processFolder = Form("S4Folder_%u",run);
175    if ( S4argc > 0 ){    if ( S4argc > 0 ){
176      i = 0;      i = 0;
177      while ( i < S4argc ){      while ( i < S4argc ){
# Line 181  int S4Core(UInt_t run, TFile *file, TSQL Line 184  int S4Core(UInt_t run, TFile *file, TSQL
184        };        };
185        if ( (!strcmp(S4argv[i],"--debug")) || (!strcmp(S4argv[i],"-g"))) {        if ( (!strcmp(S4argv[i],"--debug")) || (!strcmp(S4argv[i],"-g"))) {
186          verbose = true;          verbose = true;
187            debug = true;
188        };        };
189        if ( (!strcmp(S4argv[i],"--verbose")) || (!strcmp(S4argv[i],"-v"))) {        if ( (!strcmp(S4argv[i],"--verbose")) || (!strcmp(S4argv[i],"-v"))) {
190          verbose = true;          verbose = true;
# Line 188  int S4Core(UInt_t run, TFile *file, TSQL Line 192  int S4Core(UInt_t run, TFile *file, TSQL
192        i++;        i++;
193      };      };
194    };    };
   //  
   const char* outDir = gSystem->DirName(gSystem->DirName(file->GetPath()));  
   //  
195    // Variables for level2    // Variables for level2
196    //    //
197    TTree *S4tr = 0;    TTree *S4tr = 0;
198    UInt_t nevents = 0;    UInt_t nevents = 0;
199    //    //
200    // variables needed to reprocess data    // Variables needed to reprocess data
201      //
202      Long64_t maxsize = 10000000000LL;  
203      TTree::SetMaxTreeSize(maxsize);
204    //    //
205    TString S4version;    TString S4version;
206    ItoRunInfo *runinfo = 0;    ItoRunInfo *runinfo = 0;
# Line 323  int S4Core(UInt_t run, TFile *file, TSQL Line 327  int S4Core(UInt_t run, TFile *file, TSQL
327    // number of run to be processed    // number of run to be processed
328    //    //
329    numbofrun = runinfo->GetNoRun();    numbofrun = runinfo->GetNoRun();
330      UInt_t totnorun = runinfo->GetRunEntries();
331    //    //
332    // Try to access the S4 tree in the file, if it exists we are reprocessing data if not we are processing a new run    // Try to access the S4 tree in the file, if it exists we are reprocessing data if not we are processing a new run
333    //    //
# Line 343  int S4Core(UInt_t run, TFile *file, TSQL Line 348  int S4Core(UInt_t run, TFile *file, TSQL
348      //      //
349      // tree exists, we are reprocessing data. Are we reprocessing a single run or all the file?      // tree exists, we are reprocessing data. Are we reprocessing a single run or all the file?
350      //      //
351        S4trclone->SetAutoSave(900000000000000LL);
352      reproc = true;      reproc = true;
353      //      //
354      // update versioning information      // update versioning information
355      //      //
356      if (verbose) printf("\n Preparing the pre-processing...\n");      if (verbose) printf("\n Preparing the pre-processing...\n");
357      //      //
358      if ( run == 0 ){      if ( run == 0 || totnorun == 1 ){
359        //        //
360        // we are reprocessing all the file        // we are reprocessing all the file
361        // if we are reprocessing everything we don't need to copy any old event and we can just work with the new tree and delete the old one immediately        // if we are reprocessing everything we don't need to copy any old event and we can just work with the new tree and delete the old one immediately
# Line 387  int S4Core(UInt_t run, TFile *file, TSQL Line 393  int S4Core(UInt_t run, TFile *file, TSQL
393    //    //
394    file->cd();    file->cd();
395    S4tr = new TTree("S4-new","PAMELA Level2 S4 data");    S4tr = new TTree("S4-new","PAMELA Level2 S4 data");
396      S4tr->SetAutoSave(900000000000000LL);
397    S4tr->Branch("S4Level2","S4Level2",&s4);    S4tr->Branch("S4Level2","S4Level2",&s4);
398    //    //
399    if ( reproc && !reprocall ){    if ( reproc && !reprocall ){
# Line 395  int S4Core(UInt_t run, TFile *file, TSQL Line 402  int S4Core(UInt_t run, TFile *file, TSQL
402      //      //
403      tempfile = new TFile(tempname.str().c_str(),"READ");      tempfile = new TFile(tempname.str().c_str(),"READ");
404      S4trclone = (TTree*)tempfile->Get("S4-old");      S4trclone = (TTree*)tempfile->Get("S4-old");
405        S4trclone->SetAutoSave(900000000000000LL);
406      S4trclone->SetBranchAddress("S4Level2",&s4clone);      S4trclone->SetBranchAddress("S4Level2",&s4clone);
407      //            //      
408      if ( nobefrun > 0 ){      if ( nobefrun > 0 ){
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.16
  ViewVC Help
Powered by ViewVC 1.1.23