Rev 50 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
29 | f9daq | 1 | ////////////////////////////////////////// |
2 | // Data to root conversion root script |
||
3 | // |
||
4 | // Contributors: Rok Pestotnik, Rok Dolenec, Dino Tahirovic |
||
5 | // |
||
6 | // 3/1/2014 TDC cut relative to tdc offset |
||
7 | // 22/3/2014 reverted to 2d scan (l2d.cpp) |
||
8 | |||
9 | #include "stdio.h" |
||
10 | #include "TROOT.h" |
||
11 | #include "TFile.h" |
||
12 | #include "TNtuple.h" |
||
13 | #include "TH1F.h" |
||
14 | #include "TH2F.h" |
||
15 | #include "TF1.h" |
||
16 | #include "TMath.h" |
||
17 | #include "TStyle.h" |
||
18 | #include "TCanvas.h" |
||
19 | #include "TLine.h" |
||
90 | f9daq | 20 | //#include "zlib.h" |
29 | f9daq | 21 | |
22 | // ------------------------------------------------------------------------------ |
||
23 | |||
24 | #define POSMARG 1000 |
||
25 | |||
26 | #define READBUFFERLENGTH 10000 |
||
27 | |||
28 | // data format |
||
29 | #define MAXDATA 16 |
||
30 | #define NCH 64 |
||
31 | #define TDC_BIN 1.0416 // 1 TDC bin in ns |
||
32 | #define MIKRO_BIN 0.49609/1000. //1 mikro step in mm; stage MM3MF |
||
90 | f9daq | 33 | #define OFFSETX 0 // Right edge of SiPM+Lightguide |
34 | #define OFFSETY 0 // Lower edge of SiPM+Lightguide |
||
29 | f9daq | 35 | |
36 | #define RUNREC_ID 1 |
||
37 | #define ENDREC_ID 2 |
||
38 | #define POSREC_ID 3 |
||
39 | #define EVTREC_ID 4 |
||
40 | #define THRREC_ID 5 |
||
41 | |||
42 | typedef struct { |
||
43 | unsigned int id,len; |
||
44 | unsigned int fver,time; |
||
45 | unsigned int nev,nch,ped,xy; |
||
46 | int nx,x0,dx,ny,y0,dy; |
||
47 | } RUNREC; |
||
48 | RUNREC *runrec; |
||
49 | RUNREC run; |
||
50 | |||
51 | typedef struct { |
||
52 | unsigned int id,len; |
||
53 | unsigned int time; |
||
54 | } ENDREC; |
||
55 | ENDREC *endrec; |
||
56 | |||
57 | typedef struct { |
||
58 | unsigned int id,len; |
||
59 | unsigned int time; |
||
60 | int ix; |
||
61 | int x; |
||
62 | int xset; |
||
63 | int iy; |
||
64 | int y; |
||
65 | int yset; |
||
66 | } POSREC; |
||
67 | POSREC *posrec; |
||
68 | POSREC pos; |
||
69 | |||
70 | typedef struct { |
||
71 | unsigned int id; |
||
72 | unsigned int len; |
||
73 | unsigned int nev; |
||
74 | } EVTREC; |
||
75 | EVTREC *evtrec; |
||
76 | |||
77 | typedef struct { |
||
78 | unsigned int id; |
||
79 | unsigned int len; |
||
80 | unsigned int threshold; |
||
81 | } THRREC; |
||
82 | THRREC *thrrec; |
||
83 | THRREC thr; |
||
84 | |||
85 | double padCenter[NCH][2]; |
||
86 | |||
90 | f9daq | 87 | // Test if the hit(x,y) lies inside the coordinates of the channel |
88 | // file with pad centers (without offset) should be provided |
||
29 | f9daq | 89 | int position(int, int, int); |
90 | |||
91 | // ------------------------------------------------------------------------------ |
||
92 | |||
90 | f9daq | 93 | int analysisScan(char* dfile0="test", double c_tdcOffset=97, double tdcCut=5.0, int dbg=0) |
29 | f9daq | 94 | { |
95 | |||
90 | f9daq | 96 | //const double c_tdcOffset = +98*TDC_BIN; // ns |
97 | c_tdcOffset *= TDC_BIN; //ns |
||
98 | |||
29 | f9daq | 99 | printf(" Data to root conversion program\nUsage:\nd2r(input file name <without .dat>, debug on/off, TDC cut +-[ns])\n\n"); |
39 | f9daq | 100 | printf(" OFFSETS: \n x: %d\n y: %d\n t:%f\n", OFFSETX, OFFSETY, c_tdcOffset); |
29 | f9daq | 101 | |
102 | char fullname[256]; |
||
103 | char sbuff[256]; |
||
104 | FILE *fp; |
||
105 | |||
106 | //Chanel information |
||
107 | |||
108 | double tdcOffset[NCH]; |
||
40 | f9daq | 109 | sprintf(fullname, "sipmScan.ini"); |
29 | f9daq | 110 | if( (fp=fopen(fullname, "rt")) == NULL ) |
111 | printf("Cannot open pad centers file %s !!!\n", fullname); |
||
112 | else { |
||
113 | printf("Opened pad centers file %s\n", fullname); |
||
114 | char* result = fgets(sbuff,256, fp); |
||
115 | if (dbg) printf("Read buffer %s\n", result); |
||
116 | printf("%s", sbuff); |
||
117 | for(int i=0; i<NCH; i++) { |
||
118 | int channel; |
||
119 | int message = fscanf(fp, "%d %lf %lf %lf\n", &channel, &padCenter[i][0], &padCenter[i][1], &tdcOffset[i]); |
||
120 | if (dbg) printf("Read d2r.ini returned %d\n", message); |
||
121 | } |
||
122 | fclose(fp); |
||
123 | } |
||
124 | for(int i=0; i<NCH; i++) { |
||
125 | tdcOffset[i] += c_tdcOffset; |
||
126 | printf("%.2lf %.2lf %.2lf\n", padCenter[i][0], padCenter[i][1], tdcOffset[i]); |
||
127 | } |
||
128 | |||
129 | //TDC correction parameters |
||
130 | /* |
||
131 | double corpar[NCH][3]={ {-0.8, 25, 0}, |
||
132 | {-0.8, 25, 0}, |
||
133 | {-0.8, 25, 0}, |
||
134 | {-0.8, 25, 0}, |
||
135 | {-0.8, 25, 0}, |
||
136 | {-0.8, 25, 0}, |
||
137 | {-0.8, 25, 0}, |
||
138 | {-0.8, 25, 0} }; |
||
139 | sprintf(fullname, "data/%s_cor.txt", dfile0); |
||
140 | if( (fp=fopen(fullname, "rt")) == NULL ) |
||
141 | printf("Cannot open parameter file %s !!!\n", fullname); |
||
142 | else { |
||
143 | printf("Opened parameter file %s\n", fullname); |
||
144 | for(int i=0; i<NCH; i++) { |
||
145 | fscanf(fp, "%lf %lf %lf\n", &corpar[i][0], &corpar[i][1], &corpar[i][2]);*/ |
||
146 | /*// check if parameters make sense |
||
147 | if( (corpar[i][0] < (tdcmi-0.2*tdcmi)) || ((tdcma+0.2*tdcma) < corpar[i][0]) || |
||
148 | (corpar[i][1] < 0) || (1e4*TDC_BIN < corpar[i][1]) || |
||
149 | (1e4 < TMath::Abs(corpar[i][2])) ) { |
||
150 | printf("Warning: parameters for ch%d out of limits -> using default!\n", i); |
||
151 | corpar[i][0]=2200*TDC_BIN; corpar[i][1]=1000*TDC_BIN; corpar[i][2]=-100*TDC_BIN; |
||
152 | }*/ |
||
153 | /* } |
||
154 | fclose(fp); |
||
155 | }*/ |
||
156 | //for(int i=0; i<NCH; i++) printf("%.2lf %.2lf %.2lf\n", corpar[i][0], corpar[i][1], corpar[i][2]); |
||
157 | |||
158 | |||
159 | //histograms |
||
160 | char hname[256]; |
||
161 | //double tdc; |
||
162 | TH2F *htdc; |
||
90 | f9daq | 163 | TH2F* h_correctedTDC; |
29 | f9daq | 164 | TH1F *hnhitsx[NCH], *hnhitsy[NCH]; |
165 | TH2F *h2d[NCH]; |
||
166 | |||
167 | TNtuple *nt; |
||
168 | |||
169 | //data buffer |
||
170 | unsigned int readbuf[READBUFFERLENGTH]; |
||
171 | unsigned int buf[READBUFFERLENGTH]; |
||
172 | |||
173 | //data file |
||
90 | f9daq | 174 | //gzFile dfp; |
175 | FILE *dfp; |
||
29 | f9daq | 176 | char dfile[256]; |
177 | int ftype=0; |
||
178 | int fcount=1; |
||
179 | do { |
||
180 | switch(ftype++) { |
||
181 | case 0: |
||
182 | sprintf(dfile, "./data/%s_file%02d.dat", dfile0, fcount); |
||
183 | break; |
||
184 | case 1: |
||
185 | sprintf(dfile, "./data/%s_file%02d.dat.gz", dfile0, fcount); |
||
186 | break; |
||
187 | case 2: |
||
188 | sprintf(dfile, "./data/%s_file%02d.gz", dfile0, fcount); |
||
189 | break; |
||
190 | default: |
||
191 | printf(" Cannot find data file for %s !!!\n", dfile0); |
||
192 | return -1; |
||
193 | } |
||
90 | f9daq | 194 | //dfp=gzopen(dfile,"rb"); |
195 | dfp=fopen(dfile,"rb"); |
||
29 | f9daq | 196 | } while(!dfp); |
197 | printf("Opened data file %s\n", dfile); |
||
198 | |||
199 | //opens ROOT file |
||
200 | //TFile *rootfile; |
||
201 | char fnameroot[256]; |
||
202 | sprintf(fnameroot, "root/%s.root", dfile0); |
||
203 | //rootfile = (TFile *) gROOT->FindObjectAny(dfile0); |
||
204 | //if (rootfile!=NULL) {printf("!!!\n");rootfile->Close();} |
||
205 | //rootfile = new TFile(fnameroot); |
||
206 | //if(rootfile) rootfile->Close(); |
||
207 | TFile* rootfile = new TFile(fnameroot,"RECREATE",dfile0); |
||
208 | |||
209 | // ----------------------------------------------- |
||
210 | // loop trough records |
||
211 | unsigned int rec_id, rec_len; |
||
212 | unsigned int ulsize = sizeof(unsigned int); |
||
213 | //unsigned int ulsize = 4; |
||
214 | if (dbg) printf("Size of unsigned int: %lu\n", sizeof(unsigned int)); |
||
215 | int ceve=0; |
||
216 | int end_of_file = 0; |
||
217 | |||
218 | int ii; |
||
219 | int nint; |
||
220 | int nb; |
||
221 | int status; |
||
222 | |||
223 | while(1) { |
||
90 | f9daq | 224 | //if(gzeof(dfp)) end_of_file = 1; |
225 | if(feof(dfp)) end_of_file = 1; |
||
226 | |||
227 | //gzread(dfp, (voidp)&readbuf, 2*ulsize); |
||
228 | fread((void*)&readbuf, 2*ulsize, 1, dfp); |
||
29 | f9daq | 229 | rec_id=readbuf[0]; |
230 | rec_len=readbuf[1]; |
||
231 | |||
232 | |||
233 | if(dbg) printf("-----------------------------------------------\n"); |
||
234 | if(dbg) printf("[%d] rec_id = %d | rec_len = %u\n", ceve, rec_id, rec_len); |
||
235 | |||
236 | switch(rec_id) |
||
237 | { |
||
238 | case RUNREC_ID: |
||
90 | f9daq | 239 | //gzread(dfp, (voidp)&readbuf[2], (rec_len-2*ulsize)); |
240 | fread((void*)&readbuf[2], (rec_len-2*ulsize), 1, dfp); |
||
29 | f9daq | 241 | runrec = (RUNREC*) readbuf; |
242 | run = *runrec; |
||
243 | |||
244 | if(dbg) { |
||
245 | printf("RUNREC_ID\n"); |
||
246 | printf("id = %d, len = %d, time = %d\n", run.id, run.len, run.time); |
||
247 | printf("nev = %d, nch = %d\n", run.nev, run.nch); |
||
248 | printf("nx = %d, x0 = %d, dx = %d\n", run.nx, run.x0, run.dx); |
||
249 | printf("ny = %d, y0 = %d, dy = %d\n", run.ny, run.y0, run.dy); |
||
250 | } |
||
251 | |||
252 | //create histograms |
||
253 | nt = new TNtuple("nt", "nt", "ch:x:y:tdc"); |
||
254 | sprintf(hname, "htdc"); |
||
255 | htdc = (TH2F*) gROOT->FindObject(hname); |
||
256 | if (htdc) delete htdc; |
||
257 | htdc = new TH2F("htdc","Raw TDC;TDC channel;SiPM channel",512,0,512,NCH,0,NCH); |
||
258 | h_correctedTDC = (TH2F*) gROOT->FindObject("h_correctedTDC"); |
||
259 | if (h_correctedTDC) delete h_correctedTDC; |
||
260 | h_correctedTDC = new TH2F("h_correctedTDC","Corrected TDC;t [ns];SiPM channel",33, -16.5*TDC_BIN,16.5*TDC_BIN,NCH,0,NCH); |
||
261 | //TH1F* gsumV673A[NCH/16] = new TH1F(hn,hname,256,-0.5,255.5); |
||
262 | for(int i=0; i<NCH; i++) { |
||
263 | /* |
||
264 | sprintf(hname, "htdcpos%d", i); |
||
265 | htdcpos[i] = (TH1F*)gROOT->FindObject(hname); |
||
266 | if(htdcpos[i]) delete htdcpos[i]; |
||
267 | htdcpos[i] = new TH1F(hname, hname, 512, 0, 512*TDC_BIN); |
||
268 | |||
269 | sprintf(hname, "htdc%d", i); |
||
270 | htdc[i] = (TH1F*)gROOT->FindObject(hname); |
||
271 | if(htdc[i]) delete htdc[i]; |
||
272 | htdc[i] = new TH1F(hname, hname, 512, 0*TDC_BIN, 512*TDC_BIN); |
||
273 | */ |
||
274 | |||
275 | |||
276 | sprintf(hname, "hnhitsx%d", i); |
||
277 | hnhitsx[i] = (TH1F*)gROOT->FindObject(hname); |
||
278 | if(hnhitsx[i]) delete hnhitsx[i]; |
||
279 | hnhitsx[i] = new TH1F(hname, hname, run.nx, |
||
280 | (run.x0 - OFFSETX - 0.5*run.dx)*MIKRO_BIN, |
||
281 | (run.x0 - OFFSETX + (run.nx-0.5)*run.dx)*MIKRO_BIN); |
||
282 | |||
283 | sprintf(hname, "hnhitsy%d", i); |
||
284 | hnhitsy[i] = (TH1F*)gROOT->FindObject(hname); |
||
285 | if(hnhitsy[i]) delete hnhitsy[i]; |
||
286 | //hnhitsy[i] = new TH1F(hname, hname, run.ny, (run.y0-0.5*run.dy)*MIKRO_BIN, (run.y0+(run.ny-0.5)*run.dy)*MIKRO_BIN); |
||
287 | hnhitsy[i] = new TH1F(hname, hname, run.ny, |
||
288 | (run.y0 - 0.5*run.dy - OFFSETY)*MIKRO_BIN, |
||
289 | (run.y0 + (run.ny-0.5)*run.dy - OFFSETY)*MIKRO_BIN); |
||
290 | //hnhitsy[i] = new TH1F(hname, hname, 100, 0,100); |
||
291 | |||
292 | sprintf(hname, "h2d%d", i); |
||
293 | h2d[i] = (TH2F*)gROOT->FindObject(hname); |
||
294 | if(h2d[i]) delete h2d[i]; |
||
295 | h2d[i] = new TH2F(hname, hname, run.nx, |
||
296 | (run.x0 - OFFSETX - 0.5*run.dx)*MIKRO_BIN, |
||
297 | (run.x0 - OFFSETX + (run.nx-0.5)*run.dx)*MIKRO_BIN, |
||
298 | run.ny, |
||
299 | (run.y0 - OFFSETY - 0.5*run.dy)*MIKRO_BIN, |
||
300 | (run.y0 - OFFSETY + (run.ny-0.5)*run.dy)*MIKRO_BIN); |
||
301 | } |
||
302 | |||
303 | break; |
||
304 | |||
305 | case POSREC_ID: |
||
90 | f9daq | 306 | //gzread(dfp, (voidp)&readbuf[2], (rec_len-2*ulsize)); |
307 | fread((void*)&readbuf[2], (rec_len-2*ulsize), 1, dfp); |
||
29 | f9daq | 308 | posrec = (POSREC *) readbuf; |
309 | pos=*posrec; |
||
310 | |||
311 | if(dbg) { |
||
312 | printf("POSREC_ID\n"); |
||
313 | printf("id = %d, len = %d, time = %d\n", posrec->id, posrec->len, posrec->time); |
||
314 | printf("ix = %d, x = %d, xset = %d\n", posrec->ix, posrec->x, posrec->xset); |
||
315 | printf("iy = %d, y = %d, yset = %d\n", posrec->iy, posrec->y, posrec->yset); |
||
316 | } else printf(" [%d,%d] %d, %d\n", pos.ix, pos.iy, pos.xset, pos.yset); |
||
317 | |||
318 | break; |
||
319 | |||
320 | case EVTREC_ID: |
||
90 | f9daq | 321 | //gzread(dfp, (voidp)&readbuf[2], ulsize); // last field of event record |
322 | fread((void*)&readbuf[2], ulsize, 1, dfp); |
||
29 | f9daq | 323 | evtrec = (EVTREC *) readbuf; |
324 | //evtrec->nev = buf[0]; |
||
325 | //if (rec_len < 0 || rec_len > 10000) { |
||
326 | if (rec_len > READBUFFERLENGTH) { |
||
327 | printf("Len %u\n", rec_len); |
||
328 | return(0); |
||
329 | } |
||
330 | nb = rec_len - 3*ulsize; // no. of bytes to read |
||
90 | f9daq | 331 | //gzread(dfp, (voidp)&buf, nb); |
332 | fread((void*)&buf, nb, 1, dfp); |
||
29 | f9daq | 333 | |
334 | if(dbg) { |
||
335 | printf("EVTREC_ID\n"); |
||
336 | printf("id = %d, len = %d, nev = %d\n", evtrec->id, evtrec->len, evtrec->nev); |
||
337 | //for(int datai = 0; datai < NCH; datai++) printf("%u ", evtrec->data[datai]); |
||
338 | //printf("\n"); |
||
339 | //for(int datai = NCH; datai < NCH+NCH; datai++) printf("%u ", evtrec->data[datai]); |
||
340 | //printf("\n"); |
||
341 | break; |
||
342 | } |
||
343 | |||
344 | nint = nb / ulsize; // no. of subrecords |
||
345 | if (dbg) printf("No. of subrecords %d \n", nint); |
||
346 | ii=0; |
||
347 | while (ii<nint){ |
||
348 | int recid = buf[ii++]; |
||
349 | int len = buf[ii++]; |
||
350 | if (dbg) printf("Buffer pointer %d\n", ii); |
||
351 | unsigned int *dbuf = (unsigned int *)&buf[ii]; |
||
352 | //if (n%1000==0) |
||
90 | f9daq | 353 | if (dbg) printf("%d 0x%03x Len=%d\n",evtrec->nev,recid,len); |
29 | f9daq | 354 | //unsigned short edge; |
355 | //int nhits; |
||
90 | f9daq | 356 | if (recid==0x140 || recid==0x141) { |
29 | f9daq | 357 | for (int i=0; i<len; i++) { |
358 | int data = dbuf[i] & 0xFFFF ; |
||
359 | int edge_type = (dbuf[i]>>16)&0x1 ; |
||
360 | int overflow = (dbuf[i]>>17)&0x1 ; |
||
361 | int tdc_num = (dbuf[i]>>25)&0x1 ; |
||
362 | int channel = ((dbuf[i]>>18)&0x1F) | tdc_num<<5 ; |
||
363 | int ev_dat = (dbuf[i]>>23)&0x1 ; |
||
364 | int last_dat = (dbuf[i]>>30)&0x1 ; |
||
365 | int nval_dat = (dbuf[i]>>31)&0x1 ; |
||
366 | if (dbg){ |
||
367 | if (ev_dat) printf("Event %d\n",data); |
||
368 | else printf("ch=%d edge=%d ev=%d data=%d last=%d nval=%d\n", |
||
369 | channel, edge_type,ev_dat,data,last_dat,nval_dat); |
||
370 | } |
||
371 | if (!ev_dat){ |
||
372 | if (!edge_type && !overflow) { |
||
373 | htdc->Fill(data, channel); |
||
374 | if(dbg) printf("ch: %d tdc: %d\n", channel, data); |
||
375 | if (dbg) nt->Fill(channel, pos.ix, pos.iy, data); |
||
376 | double tdcmin=tdcOffset[channel] - tdcCut; |
||
377 | double tdcmax=tdcOffset[channel] + tdcCut; |
||
378 | double time = data*TDC_BIN; |
||
379 | if(time >= tdcmin && time <= tdcmax) { |
||
380 | h_correctedTDC->Fill((time - tdcOffset[channel]), channel); |
||
381 | hnhitsx[channel]->Fill((pos.xset - OFFSETX) * MIKRO_BIN); |
||
35 | f9daq | 382 | hnhitsy[channel]->Fill((pos.yset - OFFSETY) * MIKRO_BIN); |
29 | f9daq | 383 | //h_threshold->Fill(channel, thr.threshold); |
40 | f9daq | 384 | //if (position(pos.xset-OFFSETX, pos.yset-OFFSETY, channel)) { |
35 | f9daq | 385 | h2d[channel]->Fill((pos.xset - OFFSETX) * MIKRO_BIN, (pos.yset - OFFSETY) * MIKRO_BIN); |
40 | f9daq | 386 | //} |
29 | f9daq | 387 | } |
388 | //gV673A->Fill(data,channel); |
||
389 | //gsumV673A[channel/16]->Fill(data); |
||
390 | } |
||
391 | } |
||
392 | if (last_dat) break; |
||
393 | } |
||
394 | } // if (recid== 0x140 || recid== 0x141) |
||
395 | ii += len; |
||
396 | } //while |
||
397 | |||
398 | // events ------------------------------------------------------------------------------------------ |
||
399 | // fill histograms |
||
400 | /* |
||
401 | for(int i=0; i<NCH; i++) { |
||
402 | //tdc=((double)evtrec->data[i])*TDC_BIN - tdcoffset[i]; |
||
403 | //adc=(double)evtrec->data[i+NCH]-adcoffset[i]; |
||
404 | if (gNtWrite) nt->Fill(i,pos.ix,pos.iy,tdc); |
||
405 | //if( (qdcmi < adc) && (adc < qdcma) ) { |
||
406 | htdc[i]->Fill(tdc); |
||
407 | //} |
||
408 | //hadc[i]->Fill(adc); |
||
409 | //hcor[i]->Fill(adc,tdc); |
||
410 | //if(adc > corpar[i][2]) |
||
411 | //hctdc[i]->Fill( tdc - (corpar[i][0] + corpar[i][1]/TMath::Sqrt(adc - corpar[i][2])) ); |
||
412 | |||
413 | if( (abs(padcenter[i][0] - pos.xset) < POSMARG) && (abs(padcenter[i][1] - pos.yset) < POSMARG) ) { |
||
414 | htdcpos[i]->Fill(tdc); |
||
415 | //hadcpos[i]->Fill(adc); |
||
416 | //hcorpos[i]->Fill(adc,tdc); |
||
417 | //if(adc > corpar[i][2]) |
||
418 | //hctdcpos[i]->Fill( tdc - (corpar[i][0] + corpar[i][1]/TMath::Sqrt(adc - corpar[i][2])) ); |
||
419 | } |
||
420 | |||
421 | if((tdcmi < tdc) && (tdc < tdcma)) { |
||
422 | //hadc_cut[i]->Fill(adc); |
||
423 | hnhitsx[i]->Fill((pos.xset - OFFSETX) * MIKRO_BIN); |
||
424 | hnhitsy[i]->Fill((pos.yset - OFFSETY) * MIKRO_BIN); |
||
425 | h2d[i]->Fill((pos.xset - OFFSETX) * MIKRO_BIN, (pos.yset - OFFSETY) * MIKRO_BIN); |
||
426 | |||
427 | //if(i==4) adc1=adc; |
||
428 | //if(i==5) adc2=adc; |
||
429 | } |
||
430 | } */ |
||
431 | break; |
||
432 | |||
433 | case THRREC_ID: |
||
90 | f9daq | 434 | //status = gzread(dfp, (voidp)&readbuf[2], (rec_len-2*ulsize)); |
435 | status = fread((void*)&readbuf[2], (rec_len-2*ulsize), 1, dfp); |
||
29 | f9daq | 436 | thrrec = (THRREC*) readbuf; |
437 | thr = *thrrec; |
||
438 | if (dbg) printf("THRREC id = %d len = %d threshold %d\n", |
||
439 | thrrec->id, thrrec->len, thrrec->threshold); |
||
440 | break; |
||
441 | |||
442 | case ENDREC_ID: |
||
90 | f9daq | 443 | //gzread(dfp, (voidp)&readbuf[2], (rec_len-2*ulsize)); |
444 | fread((void*)&readbuf[2], (rec_len-2*ulsize), 1, dfp); |
||
29 | f9daq | 445 | endrec = (ENDREC *) readbuf; |
446 | |||
447 | if(dbg) { |
||
448 | printf("ENDREC_ID\n"); |
||
449 | printf("id = %d, len = %d, time = %d\n", endrec->id, endrec->len, endrec->time); |
||
450 | } else printf(" ENDREC\n"); |
||
451 | |||
452 | fcount++; |
||
453 | switch(ftype-1) { |
||
454 | case 0: |
||
455 | sprintf(dfile, "./data/%s_file%02d.dat", dfile0, fcount); |
||
456 | break; |
||
457 | case 1: |
||
458 | sprintf(dfile, "./data/%s_file%02d.dat.gz", dfile0, fcount); |
||
459 | break; |
||
460 | case 2: |
||
461 | sprintf(dfile, "./data/%s_file%02d.gz", dfile0, fcount); |
||
462 | break; |
||
463 | } |
||
464 | |||
90 | f9daq | 465 | //if(dfp) gzclose(dfp); |
466 | if(dfp) fclose(dfp); |
||
29 | f9daq | 467 | |
90 | f9daq | 468 | //dfp=gzopen(dfile,"rb"); |
469 | dfp=fopen(dfile,"rb"); |
||
29 | f9daq | 470 | if(!dfp) { |
471 | printf(" Cannot open data file: %s ---> Exiting\n", dfile); |
||
472 | end_of_file = 1; |
||
473 | } else { |
||
474 | printf(" Opened data file: %s\n", dfile); |
||
475 | end_of_file = 0; |
||
476 | } |
||
477 | |||
478 | break; |
||
479 | |||
480 | default: |
||
481 | printf("switch(rec_id): default !!!\n"); |
||
482 | end_of_file = 1; |
||
483 | break; |
||
484 | } |
||
485 | |||
486 | ceve++; |
||
487 | if( (ceve%50000) == 0) printf(" Current event = %d\n", ceve); |
||
488 | //if(dbg) if( ceve>dbg ) break; |
||
489 | if(end_of_file) break; |
||
490 | } |
||
491 | |||
492 | if(dfp) { |
||
90 | f9daq | 493 | //gzclose(dfp); |
494 | fclose(dfp); |
||
495 | //delete dfp; |
||
29 | f9daq | 496 | } |
497 | if(dbg) return 1; |
||
498 | if(rootfile) { |
||
499 | nt->Write(); |
||
500 | rootfile->Write(); |
||
501 | printf("Saved to %s\n", fnameroot); |
||
502 | rootfile->Close(); |
||
90 | f9daq | 503 | //delete rootfile; |
29 | f9daq | 504 | } |
505 | |||
506 | return 1; |
||
507 | } |
||
508 | |||
509 | int position(int x, int y, int channel) |
||
510 | { |
||
511 | int flag = 0; |
||
34 | f9daq | 512 | if ( (x > (padCenter[channel][0] - 5040)) && (x < (padCenter[channel][0] + 5040)) && |
513 | (y > (padCenter[channel][1] - 5040)) && (y < (padCenter[channel][1] + 5040)) ) flag = 1; |
||
29 | f9daq | 514 | return flag; |
515 | } |