Bug fix
[u/mrichter/AliRoot.git] / T0 / T0Laserda.cxx
CommitLineData
f16a53cf 1/*
6145b1a7 2T0 DA for online calibration
f16a53cf 3
4Contact: Michal.Oledzki@cern.ch
6145b1a7 5Link: http://users.jyu.fi/~mioledzk/
6Run Type: T0_STANDALONE_LASER
f16a53cf 7DA Type: MON
6145b1a7 8Number of events needed: 400000
9Input Files: inLaser.dat, external parameters
f16a53cf 10Output Files: daLaser.root, to be exported to the DAQ FXS
11Trigger types used: PHYSICS_EVENT
12
13*/
99194e07 14
f16a53cf 15#define FILE_OUT "daLaser.root"
6145b1a7 16#define FILE_IN "inLaser.dat"
f16a53cf 17#include <daqDA.h>
99194e07 18#include <event.h>
19#include <monitor.h>
20
21#include <Riostream.h>
22#include <stdio.h>
23#include <stdlib.h>
24
25//AliRoot
26#include <AliRawReaderDate.h>
27#include <AliRawReader.h>
28#include <AliT0RawReader.h>
99194e07 29
30//ROOT
0acfe114 31#include "TROOT.h"
32#include "TPluginManager.h"
33#include "TFile.h"
99194e07 34#include "TKey.h"
35#include "TH2S.h"
36#include "TObject.h"
37#include "TBenchmark.h"
38#include "TRandom.h"
39#include "TMath.h"
40#include "TCanvas.h"
41#include "TString.h"
42#include "TH1.h"
43#include "TF1.h"
44#include "TSpectrum.h"
45#include "TVirtualFitter.h"
387638f7 46//#include "TProfile.h"
6145b1a7 47int cqbx,cqby,clbx,clby,cbx;
48float cqlx,cqmx,cqly,cqmy,cllx,clmx,clly,clmy,clx,cmx;
99194e07 49/* Main routine
50 Arguments:
51 1- monitoring data source
52*/
53int main(int argc, char **argv) {
54 int status;
55
0acfe114 56 /* magic line */
57 gROOT->GetPluginManager()->AddHandler("TVirtualStreamerInfo",
58 "*",
59 "TStreamerInfo",
60 "RIO",
61 "TStreamerInfo()");
19e2ac29 62
63 if(daqDA_DB_getFile(FILE_IN, FILE_IN)){
64 printf("Couldn't get input file >>inLaser.dat<< from DAQ_DB !!!\n");
65 return -1;
66 }
67
000ccf4d 68
6145b1a7 69 FILE *inp;
70 char c;
71 inp = fopen(FILE_IN, "r");
19e2ac29 72 if(!inp){
73 printf("Input file >>inLaser.dat<< not found !!!\n");
74 return -1;
75 }
76
6145b1a7 77 while((c=getc(inp))!=EOF) {
78 switch(c) {
79 case 'a': {fscanf(inp, "%d", &cqbx ); break;} //N of X bins hCFD_QTC
80 case 'b': {fscanf(inp, "%f", &cqlx ); break;} //Low x hCFD_QTC
81 case 'c': {fscanf(inp, "%f", &cqmx ); break;} //High x hCFD_QTC
82 case 'd': {fscanf(inp, "%d", &cqby ); break;} //N of Y bins hCFD_QTC
83 case 'e': {fscanf(inp, "%f", &cqly ); break;} //Low y hCFD_QTC
84 case 'f': {fscanf(inp, "%f", &cqmy ); break;} //High y hCFD_QTC
85 case 'g': {fscanf(inp, "%d", &clbx ); break;} //N of X bins hCFD_LED
86 case 'h': {fscanf(inp, "%f", &cllx ); break;} //Low x hCFD_LED
87 case 'i': {fscanf(inp, "%f", &clmx ); break;} //High x hCFD_LED
88 case 'j': {fscanf(inp, "%d", &clby ); break;} //N of Y bins hCFD_LED
89 case 'k': {fscanf(inp, "%f", &clly ); break;} //Low y hCFD_LED
90 case 'l': {fscanf(inp, "%f", &clmy ); break;} //High y hCFD_LED
91 case 'm': {fscanf(inp, "%d", &cbx ); break;} //N of Y bins hCFD
92 case 'n': {fscanf(inp, "%f", &clx ); break;} //Low x hCFD
93 case 'o': {fscanf(inp, "%f", &cmx ); break;} //High x hCFD
94 }
95 }
96 fclose(inp);
97
99194e07 98 if (argc!=2) {
99 printf("Wrong number of arguments\n");
100 return -1;
101 }
102
103
104 /* define data source : this is argument 1 */
105 status=monitorSetDataSource( argv[1] );
106 if (status!=0) {
107 printf("monitorSetDataSource() failed : %s\n",monitorDecodeError(status));
108 return -1;
109 }
110
111
112 /* declare monitoring program */
113 status=monitorDeclareMp( __FILE__ );
114 if (status!=0) {
115 printf("monitorDeclareMp() failed : %s\n",monitorDecodeError(status));
116 return -1;
117 }
118
119
120 /* define wait event timeout - 1s max */
121 monitorSetNowait();
122 monitorSetNoWaitNetworkTimeout(1000);
123
124
125 /* log start of process */
126 printf("T0 monitoring program started\n");
127
128 // Allocation of histograms - start
129 TH1F *hCFD[24];
ae4882b1 130 TH2F *hCFDvsQTC[24];
131 TH2F *hCFDvsLED[24];
99194e07 132
133 for(Int_t ic=0; ic<24; ic++) {
ae4882b1 134 hCFDvsQTC[ic] = new TH2F(Form("CFD_QTC%d",ic+1),"CFD_QTC",cqbx,cqlx,cqmx,cqby,cqly,cqmy);
135 hCFDvsLED[ic] = new TH2F(Form("CFD_LED%d",ic+1),"CFD_LED",clbx,cllx,clmx,clby,clly,clmy);
99194e07 136 if(ic<12){
6145b1a7 137 hCFD[ic] = new TH1F(Form("T0_C_%d_CFD",ic+1),"CFD", cbx,clx,cmx);
99194e07 138 }
139 else{
6145b1a7 140 hCFD[ic] = new TH1F(Form("T0_A_%d_CFD",ic-11),"CFD", cbx,clx,cmx);
99194e07 141 }
142 }
143
144 // Allocation of histograms - end
145
146 Int_t iev=0;
147 /* main loop (infinite) */
148 for(;;) {
149 struct eventHeaderStruct *event;
150 eventTypeType eventT;
151
152 /* check shutdown condition */
153 if (daqDA_checkShutdown()) {break;}
154
155 /* get next event (blocking call until timeout) */
156 status=monitorGetEventDynamic((void **)&event);
157 if (status==(int)MON_ERR_EOF) {
158 printf ("End of File detected\n");
159 break; /* end of monitoring file has been reached */
160 }
161
162 if (status!=0) {
163 printf("monitorGetEventDynamic() failed : %s\n",monitorDecodeError(status));
164 break;
165 }
166
167 /* retry if got no event */
168 if (event==NULL) {
169 continue;
170 }
171
19e2ac29 172// iev++;
99194e07 173
174 /* use event - here, just write event id to result file */
175 eventT=event->eventType;
176
177 switch (event->eventType){
178
179 case START_OF_RUN:
180 break;
181
182 case END_OF_RUN:
183 break;
184
19e2ac29 185 case CALIBRATION_EVENT:
186// case PHYSICS_EVENT:
187 iev++;
188
189 if(iev==1){
190 printf("First event - %i\n",iev);
191 }
99194e07 192
193 // Initalize raw-data reading and decoding
194 AliRawReader *reader = new AliRawReaderDate((void*)event);
195
196 // Enable the following two lines in case of real-data
387638f7 197 reader->RequireHeader(kTRUE);
99194e07 198 AliT0RawReader *start = new AliT0RawReader(reader, kTRUE);
199
200 // Read raw data
201 Int_t allData[105][5];
202 for(Int_t i0=0;i0<105;i0++)
203 for(Int_t j0=0;j0<5;j0++)
204 allData[i0][j0] = 0;
205
206 if(start->Next())
207 for (Int_t i=0; i<105; i++) {
208 for(Int_t iHit=0;iHit<5;iHit++){
209 allData[i][iHit]= start->GetData(i,iHit);
210 }
211 }
212 else
213 printf("No T0 data found!!\n");
214
215 // Fill the histograms
216
217 for (Int_t ik = 0; ik<24; ik+=2)
218 for (Int_t iHt=0; iHt<5; iHt++){
219 Int_t cc = ik/2;
000ccf4d 220 if((allData[cc+1][iHt]-allData[0][0]+5000)!=0 && allData[cc+1][iHt]>0){
221 hCFD[cc]->Fill(allData[cc+1][iHt]-allData[0][0]+5000);
99194e07 222 }
223 if(allData[ik+25][iHt]!=0 && allData[ik+26][iHt]!=0 && allData[cc+1][iHt]!=0){
ae4882b1 224 hCFDvsQTC[cc]->Fill((allData[ik+25][iHt]-allData[ik+26][iHt]) , (allData[cc+1][iHt]-allData[0][0]+5000));
000ccf4d 225 }
99194e07 226 if(allData[cc+13][iHt]!=0 && allData[cc+1][iHt]!=0){
ae4882b1 227 hCFDvsLED[cc]->Fill(allData[cc+13][iHt]-allData[cc+1][iHt],allData[cc+1][iHt]-allData[0][0]+5000);
000ccf4d 228 }
99194e07 229 }
230
231 for (Int_t ik = 24; ik<48; ik+=2)
232 for (Int_t iHt=0; iHt<5; iHt++){
233 Int_t cc = ik/2;
000ccf4d 234 if((allData[cc+45][iHt]-allData[0][0]+5000)!=0 && allData[cc+45][iHt]>0){
235 hCFD[cc]->Fill(allData[cc+45][iHt]-allData[0][0]+5000);
99194e07 236 }
63176e52 237 if(allData[ik+57][iHt]!=0 && allData[ik+58][iHt]!=0 && allData[cc+45][iHt]!=0){
ae4882b1 238 hCFDvsQTC[cc]->Fill(allData[ik+57][iHt]-allData[ik+58][iHt],allData[cc+45][iHt]-allData[0][0]+5000);
000ccf4d 239 }
99194e07 240 if(allData[cc+57][iHt]!=0 && allData[cc+45][iHt]!=0){
ae4882b1 241 hCFDvsLED[cc]->Fill(allData[cc+57][iHt]-allData[cc+45][iHt],allData[cc+45][iHt]-allData[0][0]+5000);
000ccf4d 242 }
99194e07 243 }
99194e07 244
245 delete start;
246 start = 0x0;
247 reader->Reset();
248 // End of fill histograms
249
250 }
251
99194e07 252 /* free resources */
253 free(event);
254
255 /* exit when last event received, no need to wait for TERM signal */
256 if (eventT==END_OF_RUN) {
257 printf("EOR event detected\n");
19e2ac29 258 printf("Number of events processed - %i\n ",iev);
99194e07 259 break;
260 }
261 }
6145b1a7 262 printf("After loop, before writing histos\n");
99194e07 263 // write a file with the histograms
f16a53cf 264 TFile *hist = new TFile(FILE_OUT,"RECREATE");
99194e07 265
266 for(Int_t j=0;j<24;j++){
ae4882b1 267 hCFDvsQTC[j]->Write();
268 hCFDvsLED[j]->Write();
99194e07 269 hCFD[j]->Write();
270 }
271 hist->Close();
272 delete hist;
273
6145b1a7 274 status=0;
275
276 /* export file to FXS */
387638f7 277 if (daqDA_FES_storeFile(FILE_OUT, "LASER")) {
6145b1a7 278 status=-2;
279 }
280
99194e07 281 return status;
282}
283