| 87 |
/** |
/** |
| 88 |
* Initialize CaloLevel0 object |
* Initialize CaloLevel0 object |
| 89 |
**/ |
**/ |
| 90 |
void CaloLevel0::ProcessingInit(TSQLServer *dbc, UInt_t hs, Int_t &sgnl, TTree *l0tree, Bool_t isdeb, Bool_t isverb){ |
void CaloLevel0::ProcessingInit(GL_TABLES *glt, UInt_t hs, Int_t &sgnl, TTree *l0tree, Bool_t isdeb, Bool_t isverb){ |
| 91 |
|
// |
| 92 |
|
const TString host = glt->CGetHost(); |
| 93 |
|
const TString user = glt->CGetUser(); |
| 94 |
|
const TString psw = glt->CGetPsw(); |
| 95 |
|
TSQLServer *dbc = TSQLServer::Connect(host.Data(),user.Data(),psw.Data()); |
| 96 |
|
if ( !dbc->IsConnected() ) throw -116; |
| 97 |
|
stringstream myquery; |
| 98 |
|
myquery.str(""); |
| 99 |
|
myquery << "SET time_zone='+0:00'"; |
| 100 |
|
dbc->Query(myquery.str().c_str()); |
| 101 |
// |
// |
| 102 |
debug = isdeb; |
debug = isdeb; |
| 103 |
verbose = isverb; |
verbose = isverb; |
| 174 |
// |
// |
| 175 |
delete glcalo; |
delete glcalo; |
| 176 |
delete glroot; |
delete glroot; |
| 177 |
|
dbc->Close(); |
| 178 |
|
delete dbc; |
| 179 |
// |
// |
| 180 |
return; |
return; |
| 181 |
// |
// |
| 182 |
} |
} |
| 183 |
|
|
| 184 |
Int_t CaloLevel0::ChkCalib(TSQLServer *dbc, UInt_t atime){ |
Int_t CaloLevel0::ChkCalib(GL_TABLES *glt, UInt_t atime){ |
| 185 |
Int_t sgnl = 0; |
Int_t sgnl = 0; |
| 186 |
for ( Int_t s = 0; s < 4; s++){ |
for ( Int_t s = 0; s < 4; s++){ |
| 187 |
if ( atime > totime[s] ){ |
if ( atime > totime[s] ){ |
| 188 |
if ( !dbc->IsConnected() ) throw -116; |
sgnl = Update(glt,atime,s); |
|
sgnl = Update(dbc,atime,s); |
|
| 189 |
if ( sgnl < 0 ) return(sgnl); |
if ( sgnl < 0 ) return(sgnl); |
| 190 |
}; |
}; |
| 191 |
}; |
}; |
| 192 |
return(sgnl); |
return(sgnl); |
| 193 |
} |
} |
| 194 |
|
|
| 195 |
Int_t CaloLevel0::ChkParam(TSQLServer *dbc, UInt_t runheader, Bool_t mechal){ |
Int_t CaloLevel0::ChkParam(GL_TABLES *glt, UInt_t runheader, Bool_t mechal){ |
| 196 |
|
const TString host = glt->CGetHost(); |
| 197 |
|
const TString user = glt->CGetUser(); |
| 198 |
|
const TString psw = glt->CGetPsw(); |
| 199 |
|
TSQLServer *dbc = TSQLServer::Connect(host.Data(),user.Data(),psw.Data()); |
| 200 |
|
if ( !dbc->IsConnected() ) throw -116; |
| 201 |
|
stringstream myquery; |
| 202 |
|
myquery.str(""); |
| 203 |
|
myquery << "SET time_zone='+0:00'"; |
| 204 |
|
dbc->Query(myquery.str().c_str()); |
| 205 |
|
// |
| 206 |
stringstream calfile; |
stringstream calfile; |
| 207 |
stringstream bmfile; |
stringstream bmfile; |
| 208 |
stringstream aligfile; |
stringstream aligfile; |
| 244 |
for (Int_t k = 0; k < 22; k++ ){ |
for (Int_t k = 0; k < 22; k++ ){ |
| 245 |
for (Int_t l = 0; l < 96; l++ ){ |
for (Int_t l = 0; l < 96; l++ ){ |
| 246 |
fread(&mip[m][k][l],sizeof(mip[m][k][l]),1,f); |
fread(&mip[m][k][l],sizeof(mip[m][k][l]),1,f); |
| 247 |
|
if ( debug ) printf(" %f \n",mip[m][k][l]); |
| 248 |
}; |
}; |
| 249 |
}; |
}; |
| 250 |
}; |
}; |
| 358 |
}; |
}; |
| 359 |
// |
// |
| 360 |
delete glparam; |
delete glparam; |
| 361 |
|
dbc->Close(); |
| 362 |
|
delete dbc; |
| 363 |
// |
// |
| 364 |
return(0); |
return(0); |
| 365 |
} |
} |
| 422 |
// |
// |
| 423 |
Int_t val = 0; |
Int_t val = 0; |
| 424 |
Int_t del = 1100; |
Int_t del = 1100; |
| 425 |
|
for (Int_t sec = 0; sec < 4; sec++){ |
| 426 |
|
for (Int_t dsec = 0; dsec < 7; dsec++){ |
| 427 |
|
val = (Int_t)de->calselftrig[sec][dsec]; |
| 428 |
|
del = delay(val); |
| 429 |
|
clevel2->selfdelay[sec][dsec] = del; |
| 430 |
|
}; |
| 431 |
|
}; |
| 432 |
|
val = 0; |
| 433 |
|
del = 1100; |
| 434 |
if ( clevel2->trigty != 2. ){ |
if ( clevel2->trigty != 2. ){ |
| 435 |
Bool_t ck = false; |
Bool_t ck = false; |
| 436 |
for (Int_t sec = 0; sec < 4; sec++){ |
for (Int_t sec = 0; sec < 4; sec++){ |
| 592 |
} else { |
} else { |
| 593 |
ip[i] = pre - 1; |
ip[i] = pre - 1; |
| 594 |
}; |
}; |
| 595 |
if ( (base[l][m][ip[i]] == 31000. || base[l][m][ip[i]] == 0.) ){ |
if ( (base[l][m][ip[i]] == 31000. || base[l][m][ip[i]] == 0. || !crosst ) ){ |
| 596 |
// |
// |
| 597 |
ck = 2; |
ck = 2; |
| 598 |
if ( sbase[l][m][pre] == 31000. || sbase[l][m][pre] == 0. ) { |
if ( sbase[l][m][pre] == 31000. || sbase[l][m][pre] == 0. ) { |
| 606 |
// CALIBRATION ALGORITHM |
// CALIBRATION ALGORITHM |
| 607 |
// |
// |
| 608 |
if ( !doneb ){ |
if ( !doneb ){ |
| 609 |
|
if ( debug ) printf(" ck is %i \n",ck); |
| 610 |
switch (ck) { |
switch (ck) { |
| 611 |
case 0: |
case 0: |
| 612 |
base0 = base[l][m][pre]; |
base0 = base[l][m][pre]; |
| 613 |
base2 = calbase[l][m][pre]; |
base2 = calbase[l][m][pre]; |
| 614 |
|
if ( debug ) printf(" base0 = base l m pre = %f base2 = calbase l m pre = %f \n",base[l][m][pre],calbase[l][m][pre]); |
| 615 |
break; |
break; |
| 616 |
case 1: |
case 1: |
| 617 |
base0 = base[l][m][ip[i]]; |
base0 = base[l][m][ip[i]]; |
| 618 |
base2 = calbase[l][m][ip[i]]; |
base2 = calbase[l][m][ip[i]]; |
| 619 |
|
if ( debug ) printf(" base0 = base l m ip(i) = %f base2 = calbase l m ip(i) = %f \n",base[l][m][ip[i]],calbase[l][m][ip[i]]); |
| 620 |
break; |
break; |
| 621 |
case 2: |
case 2: |
| 622 |
base0 = sbase[l][m][pre]; |
base0 = sbase[l][m][pre]; |
| 623 |
base2 = calbase[l][m][pre]; |
base2 = calbase[l][m][pre]; |
| 624 |
|
if ( debug ) printf(" base0 = sbase l m pre = %f base2 = calbase l m pre = %f \n",sbase[l][m][pre],calbase[l][m][pre]); |
| 625 |
break; |
break; |
| 626 |
case 3: |
case 3: |
| 627 |
base0 = calbase[l][m][pre]; |
base0 = calbase[l][m][pre]; |
| 628 |
base2 = calbase[l][m][pre]; |
base2 = calbase[l][m][pre]; |
| 629 |
|
if ( debug ) printf(" base0 = calbase l m pre = %f base2 = calbase l m pre = %f \n",calbase[l][m][pre],calbase[l][m][pre]); |
| 630 |
break; |
break; |
| 631 |
}; |
}; |
| 632 |
base1 = calbase[l][m][pre]; |
base1 = calbase[l][m][pre]; |
| 636 |
ener0 += ener; |
ener0 += ener; |
| 637 |
clevel1->estrip[n][m][l] = 0.; |
clevel1->estrip[n][m][l] = 0.; |
| 638 |
if ( base0>0 && base0 < 30000. ){ |
if ( base0>0 && base0 < 30000. ){ |
| 639 |
if ( !donec && (base0 - base1 + base2) != 0. ){ |
// if ( !donec && (base0 - base1 + base2) != 0. ){ |
| 640 |
sbase[l][m][pre] = base0 - base1 + base2; |
// sbase[l][m][pre] = base0 - base1 + base2; |
| 641 |
|
if ( !donec && (base0 + base1 - base2) != 0. ){ |
| 642 |
|
sbase[l][m][pre] = base0 + base1 - base2; |
| 643 |
donec = 1; |
donec = 1; |
| 644 |
}; |
}; |
| 645 |
if ( ener > 0. ){ |
if ( ener > 0. ){ |
| 648 |
// OK, now in estrip we have the energy deposit in MIP of all the strips for this event (at the end of loops of course) |
// OK, now in estrip we have the energy deposit in MIP of all the strips for this event (at the end of loops of course) |
| 649 |
// |
// |
| 650 |
qpre[pre] += clevel1->estrip[n][m][l]; |
qpre[pre] += clevel1->estrip[n][m][l]; |
| 651 |
|
// |
| 652 |
|
// |
| 653 |
}; |
}; |
| 654 |
}; |
}; |
| 655 |
}; |
}; |
| 818 |
memcpy(t_ca->tibar,clevel2->cibar,sizeof(clevel2->cibar)); |
memcpy(t_ca->tibar,clevel2->cibar,sizeof(clevel2->cibar)); |
| 819 |
memcpy(t_ca->tbar,clevel2->cbar,sizeof(clevel2->cbar)); |
memcpy(t_ca->tbar,clevel2->cbar,sizeof(clevel2->cbar)); |
| 820 |
memcpy(ca->planemax,clevel2->planemax,sizeof(clevel2->planemax)); |
memcpy(ca->planemax,clevel2->planemax,sizeof(clevel2->planemax)); |
| 821 |
|
memcpy(ca->selfdelay,clevel2->selfdelay,sizeof(clevel2->selfdelay)); |
| 822 |
ca->varcfit[2] = clevel2->varcfit[0]; |
ca->varcfit[2] = clevel2->varcfit[0]; |
| 823 |
ca->varcfit[3] = clevel2->varcfit[1]; |
ca->varcfit[3] = clevel2->varcfit[1]; |
| 824 |
ca->npcfit[2] = clevel2->npcfit[0]; |
ca->npcfit[2] = clevel2->npcfit[0]; |
| 871 |
ca->selen = clevel2->selen; |
ca->selen = clevel2->selen; |
| 872 |
memcpy(ca->qq,clevel2->qq,sizeof(clevel2->qq)); |
memcpy(ca->qq,clevel2->qq,sizeof(clevel2->qq)); |
| 873 |
memcpy(ca->planemax,clevel2->planemax,sizeof(clevel2->planemax)); |
memcpy(ca->planemax,clevel2->planemax,sizeof(clevel2->planemax)); |
| 874 |
|
memcpy(ca->selfdelay,clevel2->selfdelay,sizeof(clevel2->selfdelay)); |
| 875 |
ca->varcfit[0] = clevel2->varcfit[0]; |
ca->varcfit[0] = clevel2->varcfit[0]; |
| 876 |
ca->varcfit[1] = clevel2->varcfit[1]; |
ca->varcfit[1] = clevel2->varcfit[1]; |
| 877 |
ca->npcfit[0] = clevel2->npcfit[0]; |
ca->npcfit[0] = clevel2->npcfit[0]; |
| 962 |
memset(clevel2->varcfit, 0, 4*sizeof(Float_t)); |
memset(clevel2->varcfit, 0, 4*sizeof(Float_t)); |
| 963 |
memset(clevel2->npcfit, 0, 4*sizeof(Int_t)); |
memset(clevel2->npcfit, 0, 4*sizeof(Int_t)); |
| 964 |
memset(clevel2->planemax, 0, 2*sizeof(Int_t)); |
memset(clevel2->planemax, 0, 2*sizeof(Int_t)); |
| 965 |
|
memset(clevel2->selfdelay, 0, 4*7*sizeof(Int_t)); |
| 966 |
memset(clevel2->fmode, 0, 2*sizeof(Int_t)); |
memset(clevel2->fmode, 0, 2*sizeof(Int_t)); |
| 967 |
memset(clevel2->cibar, 0, 2*22*sizeof(Int_t)); |
memset(clevel2->cibar, 0, 2*22*sizeof(Int_t)); |
| 968 |
memset(clevel2->cbar, 0, 2*22*sizeof(Float_t)); |
memset(clevel2->cbar, 0, 2*22*sizeof(Float_t)); |
| 1019 |
return; |
return; |
| 1020 |
} |
} |
| 1021 |
|
|
| 1022 |
Int_t CaloLevel0::Update(TSQLServer *dbc, UInt_t atime, Int_t s){ |
Int_t CaloLevel0::Update(GL_TABLES *glt, UInt_t atime, Int_t s){ |
| 1023 |
// |
// |
| 1024 |
|
const TString host = glt->CGetHost(); |
| 1025 |
|
const TString user = glt->CGetUser(); |
| 1026 |
|
const TString psw = glt->CGetPsw(); |
| 1027 |
|
TSQLServer *dbc = TSQLServer::Connect(host.Data(),user.Data(),psw.Data()); |
| 1028 |
|
if ( !dbc->IsConnected() ) throw -116; |
| 1029 |
|
stringstream myquery; |
| 1030 |
|
myquery.str(""); |
| 1031 |
|
myquery << "SET time_zone='+0:00'"; |
| 1032 |
|
dbc->Query(myquery.str().c_str()); |
| 1033 |
Int_t sgnl = 0; |
Int_t sgnl = 0; |
| 1034 |
// |
// |
| 1035 |
GL_CALO_CALIB *glcalo = new GL_CALO_CALIB(); |
GL_CALO_CALIB *glcalo = new GL_CALO_CALIB(); |