/[PAMELA software]/DarthVader/CalorimeterLevel2/src/CaloLevel1.cpp
ViewVC logotype

Diff of /DarthVader/CalorimeterLevel2/src/CaloLevel1.cpp

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

revision 1.6 by mocchiut, Fri Mar 30 11:17:16 2007 UTC revision 1.15 by pam-fi, Tue Nov 29 13:50:11 2011 UTC
# Line 8  Line 8 
8  ClassImp(CaloStrip);  ClassImp(CaloStrip);
9  ClassImp(CaloLevel1);  ClassImp(CaloLevel1);
10    
11    Float_t CaloStrip::UXal = CTX;
12    Float_t CaloStrip::UYal = CTY;
13    Float_t CaloStrip::UZal = CTZ;
14    Bool_t CaloStrip::paramload  = false;
15    
16  /**  /**
17   * CaloStrip default constructor   * CaloStrip default constructor
18  **/  **/
# Line 24  CaloStrip::CaloStrip(Bool_t mechalig) { Line 29  CaloStrip::CaloStrip(Bool_t mechalig) {
29    this->Clear();    this->Clear();
30    if ( mechalig ){    if ( mechalig ){
31      ismech = true;      ismech = true;
32        paramload = true;
33      UXal = MECHCTX;      UXal = MECHCTX;
34      UYal = MECHCTY;      UYal = MECHCTY;
35      UZal = MECHCTZ;      UZal = MECHCTZ;
# Line 51  CaloStrip::CaloStrip(CaloLevel1 *calo, B Line 57  CaloStrip::CaloStrip(CaloLevel1 *calo, B
57    this->Clear();    this->Clear();
58    if ( mechalig ){    if ( mechalig ){
59      ismech = true;      ismech = true;
60        paramload = true;
61      UXal = MECHCTX;      UXal = MECHCTX;
62      UYal = MECHCTY;      UYal = MECHCTY;
63      UZal = MECHCTZ;      UZal = MECHCTZ;
# Line 63  CaloStrip::CaloStrip(CaloLevel1 *calo, B Line 70  CaloStrip::CaloStrip(CaloLevel1 *calo, B
70  /**  /**
71   * Clear variables   * Clear variables
72  **/  **/
73  void CaloStrip::Clear() {    void CaloStrip::Clear(Option_t *t) {  
74    fE = 0.;    fE = 0.;
75    fX = 0.;    fX = 0.;
76    fY = 0.;    fY = 0.;
# Line 78  void CaloStrip::Clear() {   Line 85  void CaloStrip::Clear() {  
85   **/   **/
86  void CaloStrip::UseStandardAlig(){  void CaloStrip::UseStandardAlig(){
87    //    //
88    ismech = false;    if ( !paramload ){
   //  
   stringstream aligfile;  
   Int_t error = 0;  
   FILE *f = 0;  
   ifstream badfile;  
   GL_PARAM *glparam = new GL_PARAM();  
   //  
   TString host = "mysql://localhost/pamelaprod";  
   TString user = "anonymous";  
   TString 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;  
   TSQLServer *dbc = TSQLServer::Connect(host.Data(),user.Data(),psw.Data());  
   //  
   UXal = 0.;  
   UYal = 0.;  
   UZal = 0.;  
   //  
   if ( dbc ){  
     //  
     // determine where I can find calorimeter ADC to MIP conversion file    
     //  
     printf(" Querying DB for calorimeter parameters files...\n");  
89      //      //
90        paramload = true;
91        ismech = false;
92      //      //
93        stringstream aligfile;
94        Int_t error = 0;
95        FILE *f = 0;
96        ifstream badfile;
97        GL_PARAM *glparam = new GL_PARAM();
98        //
99        TString host = "mysql://localhost/pamelaprod";
100        TString user = "anonymous";
101        TString psw = "";
102        const char *pamdbhost=gSystem->Getenv("PAM_DBHOST");
103        const char *pamdbuser=gSystem->Getenv("PAM_DBUSER");
104        const char *pamdbpsw=gSystem->Getenv("PAM_DBPSW");
105        if ( !pamdbhost ) pamdbhost = "";
106        if ( !pamdbuser ) pamdbuser = "";
107        if ( !pamdbpsw ) pamdbpsw = "";
108        if ( strcmp(pamdbhost,"") ) host = pamdbhost;
109        if ( strcmp(pamdbuser,"") ) user = pamdbuser;
110        if ( strcmp(pamdbpsw,"") ) psw = pamdbpsw;
111        TSQLServer *dbc = TSQLServer::Connect(host.Data(),user.Data(),psw.Data());
112        //
113        UXal = 0.;
114        UYal = 0.;
115        UZal = 0.;
116      //      //
117      error = 0;      if ( dbc ){
     error = glparam->Query_GL_PARAM(1000,102,dbc);  
     if ( error >= 0 ){  
118        //        //
119        aligfile.str("");        // determine where I can find calorimeter ADC to MIP conversion file  
       aligfile << glparam->PATH.Data() << "/";  
       aligfile << glparam->NAME.Data();  
120        //        //
121        printf("\n Using parameter file: \n %s \n",aligfile.str().c_str());        printf(" Querying DB for calorimeter parameters files...\n");
122        f = fopen(aligfile.str().c_str(),"rb");        //
123        if ( f ){        //
124          //
125          error = 0;
126          error = glparam->Query_GL_PARAM(1000,102,dbc);
127          if ( error >= 0 ){
128            //
129            aligfile.str("");
130            aligfile << glparam->PATH.Data() << "/";
131            aligfile << glparam->NAME.Data();
132          //          //
133          fread(&UXal,sizeof(UXal),1,f);          printf("\n Using parameter file: \n %s \n",aligfile.str().c_str());
134          fread(&UYal,sizeof(UYal),1,f);          f = fopen(aligfile.str().c_str(),"rb");
135          fread(&UZal,sizeof(UZal),1,f);          if ( f ){
136              //
137              fread(&UXal,sizeof(UXal),1,f);
138              fread(&UYal,sizeof(UYal),1,f);
139              fread(&UZal,sizeof(UZal),1,f);
140              //
141              fclose(f);
142            };
143          //          //
         fclose(f);  
144        };        };
145          dbc->Close();
146          delete dbc;
147          dbc = 0;
148        };
149        if ( !UXal ){
150        //        //
151          printf(" No able to query DB for calorimeter parameters files\n Using hard-coded parameters \n");
152          UXal = CTX;
153          UYal = CTY;
154          UZal = CTZ;
155      };      };
156      dbc->Close();      //  
   };  
   if ( !UXal ){  
     //  
     printf(" No able to query DB for calorimeter parameters files\n Using hard-coded parameters \n");  
     UXal = CTX;  
     UYal = CTY;  
     UZal = CTZ;  
157    };    };
158    //    //
159  };  };
160    
   
161  /**  /**
162   * Given a strip returns its position in the PAMELA reference system   * Given a strip returns its position in the PAMELA reference system
163  **/  **/
# Line 176  void CaloStrip::Set(Int_t view, Int_t pl Line 189  void CaloStrip::Set(Int_t view, Int_t pl
189    fView = view + 1;    fView = view + 1;
190    fPlane = plane + 1;    fPlane = plane + 1;
191    fStrip = strip + 1;    fStrip = strip + 1;
192      //
193    if ( fPlane%2 ){    if ( fPlane%2 ){
194      lShift = +0.5;      lShift = +0.5;
195    } else {    } else {
# Line 301  void CaloStrip::Set(Float_t X, Float_t Y Line 315  void CaloStrip::Set(Float_t X, Float_t Y
315  };  };
316    
317  /**  /**
318     * Given a point in the space or a strip it returns the Silicon sensor number. Numbering goes like this:
319     *
320     * y ^
321     *   |
322     *   |    6 7 8
323     *   |    3 4 5  
324     *   |    0 1 2
325     *   | -----------> x
326     *
327    **/
328    Int_t CaloStrip::GetSiSensor() {
329      //
330      // fX fY fZ // fView fPlane
331      //
332      Float_t deadsi = 0.096;
333      Float_t dead = 0.05;
334      Float_t sidim = 8.00;
335      //  Float_t stripdim = 0.244;
336      Float_t sensitarea = 7.808;
337      //
338      Float_t xoffset = 0.;
339      Float_t yoffset = 0.;
340      //
341      if ( (fView-1) == 0 && !((fPlane-1)%2) ){
342        xoffset = +0.05;
343        yoffset = 0.0;
344      };
345      if ( (fView-1) == 0 && ((fPlane-1)%2) ){
346        xoffset = -0.05;
347        yoffset = -0.20;
348      };
349      if ( (fView-1) == 1 && !((fPlane-1)%2) ){
350        xoffset = +0.10;
351        yoffset = -0.05;
352      };
353      if ( (fView-1) == 1 && ((fPlane-1)%2) ){
354        xoffset = -0.10;
355        yoffset = -0.15;
356      };
357      //
358      Int_t iind = -1;
359      Int_t jind = -1;
360      //
361      for (Int_t i = 0; i < 3; i++){
362        if ( (fX+xoffset+12.1) >= (deadsi+(sidim+dead)*i) && (fX+xoffset+12.1) <= (sensitarea+deadsi+(sidim+dead)*i) ){
363          iind = i;
364          break;
365        };
366      };
367      //
368      for (Int_t j = 0; j < 3; j++){
369        if ( (fY+yoffset+12.1) >= (deadsi+(sidim+dead)*j) && (fY+yoffset+12.1) <= (sensitarea+deadsi+(sidim+dead)*j) ){
370          jind = j;
371          break;
372        };
373      };
374      //
375      Int_t sensor = -1;
376      if ( iind != -1 &&  jind != -1 ){
377        sensor = iind + jind * 3;
378      };
379      //
380      //  printf(" View %i Plane %i x %f y %f z %f xoffset %f yoffset %f iind %i jind %i \n",fView,fPlane,fX,fY,fZ,xoffset,yoffset,iind,jind);
381      //
382      return(sensor);
383      //
384    };
385    
386    /**
387   * CaloLevel1 constructor   * CaloLevel1 constructor
388  **/  **/
389  CaloLevel1::CaloLevel1() {      CaloLevel1::CaloLevel1() {    
# Line 314  CaloLevel1::CaloLevel1() {     Line 397  CaloLevel1::CaloLevel1() {    
397  /**  /**
398   * Clear the CaloLevel1 object   * Clear the CaloLevel1 object
399   **/   **/
400  void CaloLevel1::Clear() {      void CaloLevel1::Clear(Option_t *t) {    
401    //    //
402    istrip = 0;    istrip = 0;
403    estrip.Reset();    estrip.Reset();
# Line 352  Float_t CaloLevel1::GetEstrip(Int_t svie Line 435  Float_t CaloLevel1::GetEstrip(Int_t svie
435   * Given estrip entry returns energy plus view, plane and strip numbers   * Given estrip entry returns energy plus view, plane and strip numbers
436  **/  **/
437  Float_t CaloLevel1::DecodeEstrip(Int_t entry, Int_t &view, Int_t &plane, Int_t &strip){  Float_t CaloLevel1::DecodeEstrip(Int_t entry, Int_t &view, Int_t &plane, Int_t &strip){
438      Bool_t sat = false;
439      Float_t mip=this->DecodeEstrip(entry,view,plane,strip,sat);
440      return(mip);
441    };
442    
443    /**
444     * Given estrip entry returns energy plus view, plane, strip numbers and saturation info
445    **/
446    Float_t CaloLevel1::DecodeEstrip(Int_t entry, Int_t &view, Int_t &plane, Int_t &strip, Bool_t &saturated){
447    //    //
448    if ( entry>istrip ) return(0.);    if ( entry>istrip ){
449        //
450        printf(" ERROR: problems decoding entry %i, it seems that number of entries is %i\n",entry,istrip);
451        //
452        return(0.);
453      };
454    //    //
455    //  printf(" num lim %f \n",std::numeric_limits<Float_t>::max());    //  printf(" num lim %f \n",std::numeric_limits<Float_t>::max());
456    //  printf(" estrip.At(%i) = %i \n",entry,estrip.At(entry));    //  printf(" estrip.At(%i) = %i \n",entry,estrip.At(entry));
# Line 395  Float_t CaloLevel1::DecodeEstrip(Int_t e Line 492  Float_t CaloLevel1::DecodeEstrip(Int_t e
492    //    //
493    strip = (Int_t)truncf((Float_t)((eval - fbi*1000000000 -plom*10000000)/100000));    strip = (Int_t)truncf((Float_t)((eval - fbi*1000000000 -plom*10000000)/100000));
494    //    //
495    Float_t mip = ((Float_t)(eval - fbi*1000000000 -plom*10000000 -strip*100000))/tim;    Double_t mip = (Double_t)(((Float_t)(eval - fbi*1000000000 -plom*10000000 -strip*100000))/tim);
   //  
  //  if ( view == 0 ){  
 //     if ( plane%2 ){  
 //       plane -= 1;  
 //     } else {  
 //       plane += 1;  
 //     };  
 //   };  
496    //    //
497      saturated = false;
498      if ( mip > 5000. ){
499        mip -= 5000.;
500        saturated = true;
501      };
502      if ( mip > 0. && mip < 99999. ) return((Float_t)mip);
503    //    //
504    if ( mip > 0. && mip < 99999. ) return(mip);    printf(" ERROR: problems decoding value %i at entry %i \n",estrip.At(entry),entry);
   //  
   printf(" WARNING: problems decoding value %i at entry %i \n",estrip.At(entry),entry);  
505    //    //
506    view = -1;    view = -1;
507    plane = -1;    plane = -1;
# Line 420  Float_t CaloLevel1::DecodeEstrip(Int_t e Line 513  Float_t CaloLevel1::DecodeEstrip(Int_t e
513   * Returns energy released on plane nplane (where 0<= nplane <= 43, 0 = 1Y, 1 = 1X, 2 = 2Y, 3 = 2X, etc. etc.).   * Returns energy released on plane nplane (where 0<= nplane <= 43, 0 = 1Y, 1 = 1X, 2 = 2Y, 3 = 2X, etc. etc.).
514   */   */
515  Float_t CaloLevel1::qtotpl(Int_t nplane){  Float_t CaloLevel1::qtotpl(Int_t nplane){
516      Bool_t sat = false;
517      Float_t mip = this->qtotpl(nplane,sat);
518      return(mip);
519    };
520    
521    /*
522     * Returns energy released on plane nplane (where 0<= nplane <= 43, 0 = 1Y, 1 = 1X, 2 = 2Y, 3 = 2X, etc. etc.).
523     */
524    Float_t CaloLevel1::qtotpl(Int_t nplane, Bool_t &sat){
525    //    //
526      sat = false;
527    Int_t sview = 1;    Int_t sview = 1;
528    if ( nplane%2 ) sview = 0;    if ( nplane%2 ) sview = 0;
529    //    //
530    Int_t splane = nplane-(sview+1)/2;  //  Int_t splane = nplane-(sview+1)/2;
531    //    Int_t splane = (nplane+sview-1)/2;
 //   if ( sview == 0 ){  
 //     if ( splane%2 ){  
 //       splane += 1;  
 //     } else {  
 //       splane -= 1;  
 //     };  
 //   };  
532    //    //
533    Float_t totmip = qtotpl(sview,splane);    Float_t totmip = qtotpl(sview,splane,sat);
534    //    //
535    return(totmip);    return(totmip);
536    //    //
# Line 444  Float_t CaloLevel1::qtotpl(Int_t nplane) Line 540  Float_t CaloLevel1::qtotpl(Int_t nplane)
540   * Returns energy released on view "view" (0 = X, 1 = Y) and plane "plane" ( 0 <= plane <= 21 ).   * Returns energy released on view "view" (0 = X, 1 = Y) and plane "plane" ( 0 <= plane <= 21 ).
541   */   */
542  Float_t CaloLevel1::qtotpl(Int_t sview, Int_t splane){  Float_t CaloLevel1::qtotpl(Int_t sview, Int_t splane){
543      Bool_t sat = false;
544      Float_t mip = this->qtotpl(sview,splane,sat);
545      return(mip);
546    };
547    
548    /*
549     * Returns energy released on view "view" (0 = X, 1 = Y) and plane "plane" ( 0 <= plane <= 21 ).
550     */
551    Float_t CaloLevel1::qtotpl(Int_t sview, Int_t splane, Bool_t &sat){
552    //    //
553    Int_t view = -1;    Int_t view = -1;
554    Int_t plane = -1;    Int_t plane = -1;
555    Int_t strip = -1;    Int_t strip = -1;
556      Bool_t lsat = false;
557      sat = false;
558    //    //
559    Float_t mip = 0.;    Float_t mip = 0.;
560    Float_t totmip = 0.;    Float_t totmip = 0.;
# Line 456  Float_t CaloLevel1::qtotpl(Int_t sview, Line 563  Float_t CaloLevel1::qtotpl(Int_t sview,
563    //    //
564    for (Int_t i = 0; i<istrip; i++ ){    for (Int_t i = 0; i<istrip; i++ ){
565      //      //
566      mip = DecodeEstrip(i,view,plane,strip);      mip = DecodeEstrip(i,view,plane,strip,lsat);
567      //      //
568      if ( view == sview && splane == plane ) totmip += mip;      if ( view == sview && splane == plane ){
569          if ( lsat ) sat = true;
570          totmip += mip;
571          //printf(" totmip %f mip %f \n",totmip,mip);
572        };
573      //      //
574      // entry are ordered by strip, plane and view number. Go out if you pass the input strip      // entry are ordered by strip, plane and view number. Go out if you pass the input strip
575      //      //
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.15
  ViewVC Help
Powered by ViewVC 1.1.23