1 #include "AliPHOSDA2.h"
6 //----------------------------------------------------------------
7 AliPHOSDA2::AliPHOSDA2(int module) : TNamed(),
8 fHistoFile(0),fFiredCells(0),fMod(module)
11 // Create AliPHOSDA2 ("Bad channels finder") object.
12 // module is the PHOS module number (0..4).
13 // Quality histogram names: module_iX_iZ_gain.
14 // Root file name: PHOS_ModuleX_BCM.root, where X - module number.
17 sprintf(name,"PHOS_Module%d_BCM",fMod);
20 SetTitle("Detector Algorithm to check for PHOS channels quality");
23 sprintf(rootname,"%s.root",GetName());
25 fHistoFile = new TFile(rootname,"recreate"); // new file!
27 for(Int_t iX=0; iX<64; iX++) {
28 for(Int_t iZ=0; iZ<56; iZ++) {
29 for(Int_t iGain=0; iGain<2; iGain++) {
30 fHQuality[iX][iZ][iGain] = 0;
38 fFiredCells = new TH1I("fFiredCells","Number of fired cells per event",100,0,1000);
42 //-------------------------------------------------------------------
43 AliPHOSDA2::AliPHOSDA2(const AliPHOSDA2& da) : TNamed(da),
44 fHistoFile(0),fFiredCells(0),fMod(da.fMod)
51 for(Int_t iX=0; iX<64; iX++) {
52 for(Int_t iZ=0; iZ<56; iZ++) {
53 for(Int_t iGain=0; iGain<2; iGain++) {
55 sprintf(hname,"%d_%d_%d_%d",fMod,iX,iZ,iGain);
56 hist1 = (TH1F*)da.fHistoFile->Get(hname);
57 if(hist1) fHQuality[iX][iZ][iGain] = new TH1F(*hist1);
59 fHQuality[iX][iZ][iGain] = 0;
65 fMaps[0] = new TH2F(*da.fMaps[0]);
70 fMaps[1] = new TH2F(*da.fMaps[1]);
74 fHistoFile = new TFile(da.GetName(),"recreate");
75 fFiredCells = new TH1I(*da.fFiredCells);
79 //-------------------------------------------------------------------
80 AliPHOSDA2& AliPHOSDA2::operator= (const AliPHOSDA2& da)
82 //Assignment operator.
86 TString oldname(fHistoFile->GetName());
87 TString newname(da.fHistoFile->GetName());
89 if(oldname != newname) {
91 fHistoFile = new TFile(da.fHistoFile->GetName(),"update");
96 SetName(da.GetName());
97 SetTitle(da.GetTitle());
99 for(Int_t iX=0; iX<64; iX++) {
100 for(Int_t iZ=0; iZ<56; iZ++) {
101 for(Int_t iGain=0; iGain<2; iGain++) {
102 if (fHQuality[iX][iZ][iGain]) delete fHQuality[iX][iZ][iGain];
103 fHQuality[iX][iZ][iGain] = da.fHQuality[iX][iZ][iGain];
110 fMaps[0] = da.fMaps[0];
115 fMaps[1] = da.fMaps[1];
120 fFiredCells = da.fFiredCells;
129 //-------------------------------------------------------------------
130 AliPHOSDA2::~AliPHOSDA2()
135 if(fHistoFile) delete fHistoFile;
139 //-------------------------------------------------------------------
140 void AliPHOSDA2::FillQualityHistograms(Float_t quality[64][56][2])
142 // Fills quality histograms.
143 // _By definition_, qood quality is 0<quality<1,
144 // all outside that is a bad quality.
145 // If no quality value read for particular channel,
146 // the correspondent array entry should be filled by zero.
147 // WARNING: this function should be called once per event!
152 for(Int_t iX=0; iX<64; iX++) {
153 for (Int_t iZ=0; iZ<56; iZ++) {
155 for(Int_t iGain=0; iGain<2; iGain++) {
156 if(!quality[iX][iZ][iGain]) continue;
158 if(fHQuality[iX][iZ][iGain])
159 fHQuality[iX][iZ][iGain]->Fill(quality[iX][iZ][iGain]);
161 sprintf(hname,"%d_%d_%d_%d",fMod,iX,iZ,iGain);
162 sprintf(htitl,"Quality for crystal %d_%d_%d and gain %d",fMod,iX,iZ,iGain);
163 fHQuality[iX][iZ][iGain] = new TH1F(hname,htitl,100,1.e-6,10.);
164 fHQuality[iX][iZ][iGain]->Fill(quality[iX][iZ][iGain]);
173 //-------------------------------------------------------------------
174 void AliPHOSDA2::FillFiredCellsHistogram(Int_t nCells)
176 fFiredCells->Fill(nCells);
179 //-------------------------------------------------------------------
180 void AliPHOSDA2::UpdateHistoFile()
182 // Write histograms to file
184 if(!fHistoFile) return;
185 if(!fHistoFile->IsOpen()) return;
192 sprintf(titl,"Quality map for Low gain");
193 fMaps[0] = new TH2F("gmaplow", titl, 64,0.,64.,56,0.,56.);
199 sprintf(titl,"Quality map for High gain");
200 fMaps[1] = new TH2F("gmaphigh", titl, 64,0.,64.,56,0.,56.);
205 for(Int_t iX=0; iX<64; iX++) {
206 for(Int_t iZ=0; iZ<56; iZ++) {
208 for(Int_t iGain=0; iGain<2; iGain++) {
209 hist1 = fHQuality[iX][iZ][iGain];
211 hist1->Write(hist1->GetName(),TObject::kWriteDelete);
212 Double_t mean = hist1->GetMean();
213 fMaps[iGain]->SetBinContent(iX+1,iZ+1,mean);
220 fMaps[0]->Write(fMaps[0]->GetName(),TObject::kWriteDelete);
221 fMaps[1]->Write(fMaps[1]->GetName(),TObject::kWriteDelete);
223 fFiredCells->Write();