deferredfe.cxx File Reference

#include <stdio.h>
#include <stdlib.h>
#include "midas.h"
#include "mfe.h"

Include dependency graph for deferredfe.cxx:

Go to the source code of this file.

Macros
#define	N_ADC   4
#define	N_TDC   8
#define	N_SCLR   4
#define	CRATE   0
#define	SLOT_IO   23
#define	SLOT_ADC   1
#define	SLOT_TDC   2
#define	SLOT_SCLR   3

Functions
INT	frontend_init ()
	Frontend initialization.
INT	frontend_exit ()
	Frontend exit.
INT	begin_of_run (INT run_number, char *error)
	Begin of Run.
INT	end_of_run (INT run_number, char *error)
	End of Run.
INT	pause_run (INT run_number, char *error)
	Pause Run.
INT	resume_run (INT run_number, char *error)
	Resume Run.
INT	frontend_loop ()
	Frontend loop.
INT	read_deferred_event (char *pevent, INT off)
BOOL	wait_end_cycle (int transition, BOOL first)
INT	poll_event (INT source, INT count, BOOL test)
INT	interrupt_configure (INT cmd, INT source, PTYPE adr)

Variables
const char *	frontend_name = "deferredfe"
const char *	frontend_file_name = __FILE__
BOOL	frontend_call_loop = FALSE
INT	display_period = 000
INT	max_event_size = 10000
INT	max_event_size_frag = 5 * 1024 * 1024
INT	event_buffer_size = 10 * 10000
BOOL	equipment_common_overwrite = FALSE
EQUIPMENT	equipment []
int	pseudo_delay = 0
BOOL	transition_PS_requested = FALSE
BOOL	end_of_mcs_cycle = FALSE

Macro Definition Documentation

CRATE

#define CRATE   0

Definition at line 50 of file deferredfe.cxx.

N_ADC

#define N_ADC   4

Definition at line 45 of file deferredfe.cxx.

N_SCLR

#define N_SCLR   4

Definition at line 47 of file deferredfe.cxx.

N_TDC

#define N_TDC   8

Definition at line 46 of file deferredfe.cxx.

SLOT_ADC

#define SLOT_ADC   1

Definition at line 52 of file deferredfe.cxx.

SLOT_IO

#define SLOT_IO   23

Definition at line 51 of file deferredfe.cxx.

SLOT_SCLR

#define SLOT_SCLR   3

Definition at line 54 of file deferredfe.cxx.

SLOT_TDC

#define SLOT_TDC   2

Definition at line 53 of file deferredfe.cxx.

Function Documentation

begin_of_run()

INT begin_of_run	(	INT	run_number,
		char *	error
	)

Begin of Run.

Called every run start transition. Set equipment status in ODB, start acquisition on the modules.

Parameters

[in]	run_number	Number of the run being started
[out]	error	Can be used to write a message string to midas.log

Definition at line 169 of file deferredfe.cxx.

{
   /* put here clear scalers etc. */
   pseudo_delay = 0;
   return SUCCESS;
}

end_of_run()

INT end_of_run	(	INT	run_number,
		char *	error
	)

End of Run.

Called every stop run transition. Set equipment status in ODB, stop acquisition on the modules.

Parameters

[in]	run_number	Number of the run being ended
[out]	error	Can be used to write a message string to midas.log

Definition at line 178 of file deferredfe.cxx.

{
   return SUCCESS;
}

frontend_exit()

INT frontend_exit

(

void

)

Frontend exit.

Runs at frontend shutdown. Disconnect hardware and set equipment status in ODB

Returns

Midas status code

Definition at line 162 of file deferredfe.cxx.

{
   return SUCCESS;
}

frontend_init()

INT frontend_init

(

void

)

Frontend initialization.

Runs once at application startup. We initialize the hardware and optical interfaces and set the equipment status in ODB. We also lock the frontend to once physical cpu core.

Returns

Midas status code

Definition at line 148 of file deferredfe.cxx.

{
   // register for deferred transition
   cm_register_deferred_transition(TR_STOP, wait_end_cycle);
   cm_register_deferred_transition(TR_PAUSE, wait_end_cycle);
 
 
   /* hardware initialization */
 
   return SUCCESS;
}

Here is the call graph for this function:

frontend_loop()

INT frontend_loop

(

void

)

Frontend loop.

If frontend_call_loop is true, this routine gets called when the frontend is idle or once between every event.

Returns

Midas status code

Definition at line 199 of file deferredfe.cxx.

{
   /* if frontend_call_loop is true, this routine gets called when
      the frontend is idle or once between every event */
   return SUCCESS;
}

interrupt_configure()

INT interrupt_configure	(	INT	cmd,
		INT	source,
		PTYPE	adr
	)

Definition at line 238 of file deferredfe.cxx.

{
   switch (cmd) {
   case CMD_INTERRUPT_ENABLE:
      break;
   case CMD_INTERRUPT_DISABLE:
      break;
   case CMD_INTERRUPT_ATTACH:
      break;
   case CMD_INTERRUPT_DETACH:
      break;
   }
   return SUCCESS;
}

pause_run()

INT pause_run	(	INT	run_number,
		char *	error
	)

Pause Run.

Called every pause run transition.

Parameters

[in]	run_number	Number of the run being ended
[out]	error	Can be used to write a message string to midas.log

Returns

Midas status code

Definition at line 185 of file deferredfe.cxx.

{
   return SUCCESS;
}

poll_event()

INT poll_event	(	INT	source,
		INT	count,
		BOOL	test
	)

Definition at line 216 of file deferredfe.cxx.

{
   int i;
   DWORD flag;
 
   for (i = 0; i < count; i++) {
      /* poll hardware and set flag to TRUE if new event is available */
      flag = TRUE;
 
      if (flag)
         if (!test)
            return TRUE;
   }
 
   return 0;
}

Here is the call graph for this function:

read_deferred_event()

INT read_deferred_event	(	char *	pevent,
		INT	off
	)

Definition at line 254 of file deferredfe.cxx.

{
   DWORD *pdata, a;
 
   /* init bank structure */
   bk_init(pevent);
 
 
   /* create SCLR bank */
   bk_create(pevent, "SCLR", TID_DWORD, (void **) &pdata);
 
   /* read scaler bank */
   for (a = 0; a < N_SCLR; a++)
      *pdata++ = rand()%1024 + rand()%1024 + rand()%1024 + rand()%1024;
 
   bk_close(pevent, pdata);
 
   if (transition_PS_requested) {
      // transition acknowledged, but...
      // carry on until hardware condition satisfied
      // ...
      if (pseudo_delay++ < 5) {
         // Ignore transition 
         printf("Transition ignored, ");
      } else {
         // Time to do transition
         printf("End of cycle... perform transition\n");
         end_of_mcs_cycle = TRUE;
      }
   }
   printf("Event ID:%d - Event#: %d\n", EVENT_ID(pevent), SERIAL_NUMBER(pevent));
   return bk_size(pevent);
}

Here is the call graph for this function:

resume_run()

INT resume_run	(	INT	run_number,
		char *	error
	)

Resume Run.

Called every resume run transition.

Parameters

[in]	run_number	Number of the run being ended
[out]	error	Can be used to write a message string to midas.log

Returns

Midas status code

Definition at line 192 of file deferredfe.cxx.

{
   return SUCCESS;
}

wait_end_cycle()

BOOL wait_end_cycle	(	int	transition,
		BOOL	first
	)

Definition at line 125 of file deferredfe.cxx.

{
   // Get there after every
   if (first) {
      // Get there as soon as transition is requested
      transition_PS_requested = TRUE;
      printf("Transition requested...\n");
      // Defer the transition now
      return FALSE;
   }
   // Check user flag
   if (end_of_mcs_cycle) {
      // User flag set, ready to perform deferred transition now
      transition_PS_requested = FALSE;
      end_of_mcs_cycle = FALSE;
      return TRUE;
   } else {
      // User not ready for transition, defers it...
      return FALSE;
   }
}

Here is the caller graph for this function:

Variable Documentation

display_period

INT display_period = 000

Definition at line 33 of file deferredfe.cxx.

end_of_mcs_cycle

BOOL end_of_mcs_cycle = FALSE

Definition at line 122 of file deferredfe.cxx.

equipment

EQUIPMENT equipment[]

Initial value:

= {
 
      {"Deferred",              
       {2, 0,                    
       "SYSTEM",                
       EQ_PERIODIC,             
       0,                       
       "MIDAS",                 
       TRUE,                    
       RO_RUNNING |             
       RO_ODB,                  
       2000,                    
       0,                       
       0,                       
       0,                       
       "", "", "",},
       read_deferred_event,     
      },
      {""}
   }

Definition at line 73 of file deferredfe.cxx.

                           {
 
      {"Deferred",              /* equipment name */
       {2, 0,                    /* event ID, trigger mask */
       "SYSTEM",                /* event buffer */
       EQ_PERIODIC,             /* equipment type */
       0,                       /* event source */
       "MIDAS",                 /* format */
       TRUE,                    /* enabled */
       RO_RUNNING |             /* read when running */
       RO_ODB,                  /* and update ODB */
       2000,                    /* read every 2 sec */
       0,                       /* stop run after this event limit */
       0,                       /* number of sub events */
       0,                       /* log history */
       "", "", "",},
       read_deferred_event,     /* readout routine */
      },
      {""}
   };

equipment_common_overwrite

BOOL equipment_common_overwrite = FALSE

Definition at line 71 of file deferredfe.cxx.

event_buffer_size

INT event_buffer_size = 10 * 10000

Definition at line 42 of file deferredfe.cxx.

frontend_call_loop

BOOL frontend_call_loop = FALSE

Definition at line 30 of file deferredfe.cxx.

frontend_file_name

const char* frontend_file_name = __FILE__

Definition at line 27 of file deferredfe.cxx.

frontend_name

const char* frontend_name = "deferredfe"

Definition at line 24 of file deferredfe.cxx.

max_event_size

INT max_event_size = 10000

Definition at line 36 of file deferredfe.cxx.

max_event_size_frag

INT max_event_size_frag = 5 * 1024 * 1024

Definition at line 39 of file deferredfe.cxx.

pseudo_delay

int pseudo_delay = 0

Definition at line 120 of file deferredfe.cxx.

transition_PS_requested

BOOL transition_PS_requested = FALSE

Definition at line 121 of file deferredfe.cxx.