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 | } |