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 |
**/ |
**/ |
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; |
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; |
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 |
|
}; |
147 |
|
if ( !UXal ){ |
148 |
// |
// |
149 |
|
printf(" No able to query DB for calorimeter parameters files\n Using hard-coded parameters \n"); |
150 |
|
UXal = CTX; |
151 |
|
UYal = CTY; |
152 |
|
UZal = CTZ; |
153 |
}; |
}; |
154 |
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; |
|
155 |
}; |
}; |
156 |
// |
// |
157 |
}; |
}; |
158 |
|
|
|
|
|
159 |
/** |
/** |
160 |
* Given a strip returns its position in the PAMELA reference system |
* Given a strip returns its position in the PAMELA reference system |
161 |
**/ |
**/ |
187 |
fView = view + 1; |
fView = view + 1; |
188 |
fPlane = plane + 1; |
fPlane = plane + 1; |
189 |
fStrip = strip + 1; |
fStrip = strip + 1; |
190 |
|
// |
191 |
if ( fPlane%2 ){ |
if ( fPlane%2 ){ |
192 |
lShift = +0.5; |
lShift = +0.5; |
193 |
} else { |
} else { |
409 |
// |
// |
410 |
Float_t mip = ((Float_t)(eval - fbi*1000000000 -plom*10000000 -strip*100000))/tim; |
Float_t mip = ((Float_t)(eval - fbi*1000000000 -plom*10000000 -strip*100000))/tim; |
411 |
// |
// |
|
// if ( view == 0 ){ |
|
|
// if ( plane%2 ){ |
|
|
// plane -= 1; |
|
|
// } else { |
|
|
// plane += 1; |
|
|
// }; |
|
|
// }; |
|
|
// |
|
|
// |
|
412 |
if ( mip > 0. && mip < 99999. ) return(mip); |
if ( mip > 0. && mip < 99999. ) return(mip); |
413 |
// |
// |
414 |
printf(" WARNING: 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); |
429 |
// |
// |
430 |
Int_t splane = nplane-(sview+1)/2; |
Int_t splane = nplane-(sview+1)/2; |
431 |
// |
// |
|
// if ( sview == 0 ){ |
|
|
// if ( splane%2 ){ |
|
|
// splane += 1; |
|
|
// } else { |
|
|
// splane -= 1; |
|
|
// }; |
|
|
// }; |
|
|
// |
|
432 |
Float_t totmip = qtotpl(sview,splane); |
Float_t totmip = qtotpl(sview,splane); |
433 |
// |
// |
434 |
return(totmip); |
return(totmip); |