tinyfe.c File Reference

#include <stdio.h>
#include <stdlib.h>
#include "midas.h"
#include "msystem.h"
#include "mcstd.h"

Include dependency graph for tinyfe.c:

Go to the source code of this file.

Macros
#define	NWORDS   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_tiny_event (char *pevent, INT off)
INT	poll_event (INT source, INT count, BOOL test)
INT	interrupt_configure (INT cmd, INT source, PTYPE adr)

Variables
char *	frontend_name = "tinyfe"
char *	frontend_file_name = __FILE__
BOOL	frontend_call_loop = TRUE
INT	display_period = 0000
INT	max_event_size = 10000
INT	max_event_size_frag = 5 * 1024 * 1024
INT	event_buffer_size = 10 * 10000
HNDLE	hDB
	main ODB handle
HNDLE	hKey
EQUIPMENT	equipment []

Macro Definition Documentation

NWORDS

#define NWORDS   3

Definition at line 212 of file tinyfe.c.

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 130 of file tinyfe.c.

{
   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 137 of file tinyfe.c.

{
   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 123 of file tinyfe.c.

{
   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 116 of file tinyfe.c.

{
   return SUCCESS;
}

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 157 of file tinyfe.c.

{
   return SUCCESS;
}

interrupt_configure()

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

Definition at line 195 of file tinyfe.c.

{
   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 144 of file tinyfe.c.

{
   return SUCCESS;
}

poll_event()

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

Definition at line 172 of file tinyfe.c.

{
   int i;
   DWORD lam;
 
   for (i = 0; i < count; i++) {
      cam_lam_read(LAM_SOURCE_CRATE(source), &lam);
 
//  To force a LAM independently of the driver.
      lam = 1;
      if (lam & LAM_SOURCE_STATION(source))
         if (!test)
            return lam;
   }
 
   return 0;
}

Here is the call graph for this function:

read_tiny_event()

INT read_tiny_event	(	char *	pevent,
		INT	off
	)

Definition at line 214 of file tinyfe.c.

{
   static WORD *pdata = NULL;
   static WORD sub_counter = 0;
   // Super event structure 
   if (offset == 0) {           // FIRST event of the Super event 
      bk_init(pevent);
      bk_create(pevent, "SUPR", TID_WORD, &pdata);
      sub_counter = 1;
   } else if (offset == -1) {   // CLOSE Super event
      bk_close(pevent, pdata);
      return bk_size(pevent);
   }
   // READ event
   *pdata++ = 0xB0E;
   *pdata++ = sub_counter++;
   *pdata++ = 0xE0E;
 
   if (offset == 0) {
      // Compute the proper event length on the FIRST event in the Super Event
      // NWORDS correspond to the !! NWORDS WORD above !!
      // sizeof(BANK_HEADER) + sizeof(BANK) will make the 16 bytes header
      // sizeof(WORD) is defined by the TID_WORD in bk_create()
      return NWORDS * sizeof(WORD) + sizeof(BANK_HEADER) + sizeof(BANK);
   } else {
      // Return the data section size only
      // sizeof(WORD) is defined by the TID_WORD in bk_create()
      return NWORDS * sizeof(WORD);
   }
}

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 151 of file tinyfe.c.

{
   return SUCCESS;
}

Variable Documentation

display_period

INT display_period = 0000

Definition at line 36 of file tinyfe.c.

equipment

EQUIPMENT equipment[]

Initial value:

= {
 
      {"Tiny",                  
       3, 0,                    
       "SYSTEM",                
       EQ_POLLED,               
       1,                       
       "MIDAS",                 
       TRUE,                    
       RO_RUNNING,              
       500,                     
       0,                       
       10,                      
       0,                       
       "", "", "",
       read_tiny_event,         
       NULL, NULL,              
       NULL,                    
       },
 
      {""}
   }

Definition at line 65 of file tinyfe.c.

                           {
 
      {"Tiny",                  /* equipment name */
       3, 0,                    /* event ID, trigger mask */
       "SYSTEM",                /* event buffer */
       EQ_POLLED,               /* equipment type */
       1,                       /* event source */
       "MIDAS",                 /* format */
       TRUE,                    /* enabled */
       RO_RUNNING,              /* read when running and on transitions */
       500,                     /* poll 500ms */
       0,                       /* stop run after this event limit */
       10,                      /* number of sub events */
       0,                       /* log history */
       "", "", "",
       read_tiny_event,         /* readout routine */
       NULL, NULL,              /* keep null */
       NULL,                    /* init string */
       },
 
      {""}
   };

event_buffer_size

INT event_buffer_size = 10 * 10000

Definition at line 45 of file tinyfe.c.

frontend_call_loop

BOOL frontend_call_loop = TRUE

Definition at line 33 of file tinyfe.c.

frontend_file_name

char* frontend_file_name = __FILE__

Definition at line 30 of file tinyfe.c.

frontend_name

char* frontend_name = "tinyfe"

Definition at line 27 of file tinyfe.c.

hDB

HNDLE hDB

main ODB handle

Definition at line 49 of file tinyfe.c.

hKey

HNDLE hKey

Definition at line 49 of file tinyfe.c.

max_event_size

INT max_event_size = 10000

Definition at line 39 of file tinyfe.c.

max_event_size_frag

INT max_event_size_frag = 5 * 1024 * 1024

Definition at line 42 of file tinyfe.c.