[u/mrichter/AliRoot.git] / T0 / T0Laserda.cxx

/*
T0 DA for online calibration

Contact: Michal.Oledzki@cern.ch
Link: http://users.jyu.fi/~mioledzk/
Run Type: STANDALONE
DA Type: MON
Number of events needed: 400000 
Input Files: inLaser.dat, external parameters
Output Files: daLaser.root, to be exported to the DAQ FXS
Trigger types used: CALIBRATION_EVENT

*/

#define FILE_OUT "daLaser.root"
#define FILE_IN "inLaser.dat"
#include <daqDA.h>
#include <event.h>
#include <monitor.h>
 
#include <Riostream.h>
#include <stdio.h>
#include <stdlib.h>

//AliRoot
#include <AliRawReaderDate.h>
#include <AliRawReader.h>
#include <AliT0RawReader.h>

//ROOT
#include "TROOT.h"
#include "TPluginManager.h"
#include "TFile.h"
#include "TKey.h"
#include "TH2S.h"
#include "TObject.h"
#include "TBenchmark.h"
#include "TRandom.h"
#include "TMath.h"
#include "TCanvas.h"
#include "TString.h"
#include "TH1.h"
#include "TF1.h"
#include "TSpectrum.h"
#include "TVirtualFitter.h"
//#include "TProfile.h"
int cqbx,cqby,clbx,clby,cbx;
float cqlx,cqmx,cqly,cqmy,cllx,clmx,clly,clmy,clx,cmx;
/* Main routine
      Arguments: 
      1- monitoring data source
*/
int main(int argc, char **argv) {
  int status;
  
  /* magic line */
  gROOT->GetPluginManager()->AddHandler("TVirtualStreamerInfo",
					"*",
					"TStreamerInfo",
					"RIO",
					"TStreamerInfo()"); 
  
  if(daqDA_DB_getFile(FILE_IN, FILE_IN)){
     printf("Couldn't get input file >>inLaser.dat<< from DAQ_DB !!!\n");
     return -1;
  }
  
 
  FILE *inp;
  char c;
  inp = fopen(FILE_IN, "r");  
  if(!inp){
	printf("Input file >>inLaser.dat<< not found !!!\n");
	return -1;
  }

  while((c=getc(inp))!=EOF) {
    switch(c) {
      case 'a': {fscanf(inp, "%d", &cqbx ); break;} //N of X bins hCFD_QTC
      case 'b': {fscanf(inp, "%f", &cqlx ); break;} //Low x hCFD_QTC
      case 'c': {fscanf(inp, "%f", &cqmx ); break;} //High x hCFD_QTC
      case 'd': {fscanf(inp, "%d", &cqby ); break;} //N of Y bins hCFD_QTC
      case 'e': {fscanf(inp, "%f", &cqly ); break;} //Low y hCFD_QTC
      case 'f': {fscanf(inp, "%f", &cqmy ); break;} //High y hCFD_QTC
      case 'g': {fscanf(inp, "%d", &clbx ); break;} //N of X bins hCFD_LED
      case 'h': {fscanf(inp, "%f", &cllx ); break;} //Low x hCFD_LED
      case 'i': {fscanf(inp, "%f", &clmx ); break;} //High x hCFD_LED
      case 'j': {fscanf(inp, "%d", &clby ); break;} //N of Y bins hCFD_LED
      case 'k': {fscanf(inp, "%f", &clly ); break;} //Low y hCFD_LED
      case 'l': {fscanf(inp, "%f", &clmy ); break;} //High y hCFD_LED
      case 'm': {fscanf(inp, "%d", &cbx ); break;}  //N of Y bins hCFD 
      case 'n': {fscanf(inp, "%f", &clx ); break;}  //Low x hCFD
      case 'o': {fscanf(inp, "%f", &cmx ); break;}  //High x hCFD
    }
  }
  fclose(inp);

  if (argc!=2) {
    printf("Wrong number of arguments\n");
    return -1;
  }


  /* define data source : this is argument 1 */  
  status=monitorSetDataSource( argv[1] );
  if (status!=0) {
    printf("monitorSetDataSource() failed : %s\n",monitorDecodeError(status));
    return -1;
  }


  /* declare monitoring program */
  status=monitorDeclareMp( __FILE__ );
  if (status!=0) {
    printf("monitorDeclareMp() failed : %s\n",monitorDecodeError(status));
    return -1;
  }


  /* define wait event timeout - 1s max */
  monitorSetNowait();
  monitorSetNoWaitNetworkTimeout(1000);
  

  /* log start of process */
  printf("T0 monitoring program started\n");  

  // Allocation of histograms - start
  TH1F *hCFD[24];
  TH2F *hCFDvsQTC[24];
  TH2F *hCFDvsLED[24]; 

   for(Int_t ic=0; ic<24; ic++) {
      hCFDvsQTC[ic] = new TH2F(Form("CFD_QTC%d",ic+1),"CFD_QTC",cqbx,cqlx,cqmx,cqby,cqly,cqmy);
      hCFDvsLED[ic] = new TH2F(Form("CFD_LED%d",ic+1),"CFD_LED",clbx,cllx,clmx,clby,clly,clmy);
      if(ic<12){
	hCFD[ic] = new TH1F(Form("T0_C_%d_CFD",ic+1),"CFD", cbx,clx,cmx);	
      }
      else{
        hCFD[ic] = new TH1F(Form("T0_A_%d_CFD",ic-11),"CFD", cbx,clx,cmx); 
      }
    }

  // Allocation of histograms - end

  Int_t iev=0;
  /* main loop (infinite) */
  for(;;) {
    struct eventHeaderStruct *event;
    eventTypeType eventT;
  
    /* check shutdown condition */
    if (daqDA_checkShutdown()) {break;}
    
    /* get next event (blocking call until timeout) */
    status=monitorGetEventDynamic((void **)&event);
    if (status==(int)MON_ERR_EOF) {
      printf ("End of File detected\n");
      break; /* end of monitoring file has been reached */
    }
    
    if (status!=0) {
      printf("monitorGetEventDynamic() failed : %s\n",monitorDecodeError(status));
      break;
    }

    /* retry if got no event */
    if (event==NULL) {
      continue;
    }
 
//    iev++; 

    /* use event - here, just write event id to result file */
    eventT=event->eventType;
   
    switch (event->eventType){

      case START_OF_RUN:
	break;

      case END_OF_RUN:
	break;

      case CALIBRATION_EVENT:
//      case PHYSICS_EVENT:
      iev++; 

      if(iev==1){
           printf("First event - %i\n",iev);
      }

      // Initalize raw-data reading and decoding
      AliRawReader *reader = new AliRawReaderDate((void*)event);
          
      // Enable the following two lines in case of real-data
      	  reader->RequireHeader(kTRUE);
      AliT0RawReader *start = new AliT0RawReader(reader, kTRUE);

      // Read raw data
      Int_t allData[105][5];
      for(Int_t i0=0;i0<105;i0++)
      	for(Int_t j0=0;j0<5;j0++)
		allData[i0][j0] = 0;
     
      if(start->Next())
      for (Int_t i=0; i<105; i++) {
	for(Int_t iHit=0;iHit<5;iHit++){
	  allData[i][iHit]= start->GetData(i,iHit);
        }
      }
	else 
	printf("No T0 data found!!\n");

      // Fill the histograms
	
      for (Int_t ik = 0; ik<24; ik+=2)
         for (Int_t iHt=0; iHt<5; iHt++){
		 Int_t cc = ik/2;
		if((allData[cc+1][iHt]-allData[0][0]+5000)!=0 && allData[cc+1][iHt]>0){
		 hCFD[cc]->Fill(allData[cc+1][iHt]-allData[0][0]+5000);
		}
		if(allData[ik+25][iHt]!=0 && allData[ik+26][iHt]!=0 && allData[cc+1][iHt]!=0){
                 hCFDvsQTC[cc]->Fill((allData[ik+25][iHt]-allData[ik+26][iHt]) , (allData[cc+1][iHt]-allData[0][0]+5000));
		} 
                if(allData[cc+13][iHt]!=0 && allData[cc+1][iHt]!=0){
		 hCFDvsLED[cc]->Fill(allData[cc+13][iHt]-allData[cc+1][iHt],allData[cc+1][iHt]-allData[0][0]+5000);
		}
	}

      for (Int_t ik = 24; ik<48; ik+=2)
         for (Int_t iHt=0; iHt<5; iHt++){
		 Int_t cc = ik/2;
                if((allData[cc+45][iHt]-allData[0][0]+5000)!=0 && allData[cc+45][iHt]>0){
                 hCFD[cc]->Fill(allData[cc+45][iHt]-allData[0][0]+5000);
                }
                if(allData[ik+57][iHt]!=0 && allData[ik+58][iHt]!=0 && allData[cc+45][iHt]!=0){
                 hCFDvsQTC[cc]->Fill(allData[ik+57][iHt]-allData[ik+58][iHt],allData[cc+45][iHt]-allData[0][0]+5000);
		}
                if(allData[cc+57][iHt]!=0 && allData[cc+45][iHt]!=0){
                 hCFDvsLED[cc]->Fill(allData[cc+57][iHt]-allData[cc+45][iHt],allData[cc+45][iHt]-allData[0][0]+5000);
                }
	}
	
     delete start;
	start = 0x0;
     reader->Reset();
      // End of fill histograms

    }

    /* free resources */
    free(event);
    
    /* exit when last event received, no need to wait for TERM signal */
    if (eventT==END_OF_RUN) {
      printf("EOR event detected\n");
      printf("Number of events processed - %i\n ",iev);
      break;
    }
  }
  printf("After loop, before writing histos\n");
  // write a file with the histograms
  TFile *hist = new TFile(FILE_OUT,"RECREATE");

  for(Int_t j=0;j<24;j++){
     hCFDvsQTC[j]->Write();
     hCFDvsLED[j]->Write();
     hCFD[j]->Write();
    }
  hist->Close();
  delete hist;

  status=0;

  /* export file to FXS */
  if (daqDA_FES_storeFile(FILE_OUT, "LASER")) {
    status=-2;
  }

  return status;
}
Commit	Line	Data
f16a53cf	1	/*
6145b1a7	2	T0 DA for online calibration
f16a53cf	3
f16a53cf	4	Contact: Michal.Oledzki@cern.ch
6145b1a7	5	Link: http://users.jyu.fi/~mioledzk/
49ab1618	6	Run Type: STANDALONE
f16a53cf	7	DA Type: MON
6145b1a7	8	Number of events needed: 400000
6145b1a7	9	Input Files: inLaser.dat, external parameters
f16a53cf	10	Output Files: daLaser.root, to be exported to the DAQ FXS
49ab1618	11	Trigger types used: CALIBRATION_EVENT
f16a53cf	12
f16a53cf	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
99194e07	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	47	int cqbx,cqby,clbx,clby,cbx;
6145b1a7	48	float cqlx,cqmx,cqly,cqmy,cllx,clmx,clly,clmy,clx,cmx;
99194e07	49	/* Main routine
	50	Arguments:
	51	1- monitoring data source
	52	*/
	53	int 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];
ae4882b1	131	TH2F *hCFDvsLED[24];
99194e07	132
99194e07	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);
ae4882b1	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	}
99194e07	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){
000ccf4d	221	hCFD[cc]->Fill(allData[cc+1][iHt]-allData[0][0]+5000);
99194e07	222	}
99194e07	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){
000ccf4d	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
99194e07	266	for(Int_t j=0;j<24;j++){
ae4882b1	267	hCFDvsQTC[j]->Write();
ae4882b1	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