HG_REPOSITORIES/LPP/INSTRUMENTATION/SOLO_LFR/DEV_PLE Commit - r58:95058e78e811

fsw-0-20

paul -

r58:95058e78e811 default

parent child

Context file:

r58:95058e78e811

Collapse all files

header/fsw_params.h +1 -1

             #ifndef FSW_PARAMS_H_INCLUDED
             #define FSW_PARAMS_H_INCLUDED
             #include "grlib_regs.h"
             #include "fsw_params_processing.h"
             #include "tm_byte_positions.h"
             #include "ccsds_types.h"
             #define GRSPW_DEVICE_NAME "/dev/grspw0"
             #define UART_DEVICE_NAME "/dev/console"
             //************************
             // flight software version
             // this parameters is handled by the Qt project options
             //**********
             // LFR MODES
             #define LFR_MODE_STANDBY 0
             #define LFR_MODE_NORMAL 1
             #define LFR_MODE_BURST 2
             #define LFR_MODE_SBM1 3
             #define LFR_MODE_SBM2 4
             #define LFR_MODE_NORMAL_CWF_F3 5
             #define RTEMS_EVENT_MODE_STANDBY RTEMS_EVENT_0
             #define RTEMS_EVENT_MODE_NORMAL RTEMS_EVENT_1
             #define RTEMS_EVENT_MODE_BURST RTEMS_EVENT_2
             #define RTEMS_EVENT_MODE_SBM1 RTEMS_EVENT_3
             #define RTEMS_EVENT_MODE_SBM2 RTEMS_EVENT_4
             #define RTEMS_EVENT_MODE_SBM2_WFRM RTEMS_EVENT_5
             //****************************
             // LFR DEFAULT MODE PARAMETERS
             // COMMON
             #define DEFAULT_SY_LFR_COMMON0 0x00
             #define DEFAULT_SY_LFR_COMMON1 0x10 // default value 0 0 0 1 0 0 0 0
             // NORM
             #define SY_LFR_N_SWF_L 2048 // nb sample
-            #define SY_LFR_N_SWF_P 300  // sec
+            #define SY_LFR_N_SWF_P 296  // sec
             #define SY_LFR_N_ASM_P 3600 // sec
             #define SY_LFR_N_BP_P0 4    // sec
             #define SY_LFR_N_BP_P1 20   // sec
             #define MIN_DELTA_SNAPSHOT 16       // sec
             // BURST
             #define DEFAULT_SY_LFR_B_BP_P0 1    // sec
             #define DEFAULT_SY_LFR_B_BP_P1 5    // sec
             // SBM1
             #define DEFAULT_SY_LFR_S1_BP_P0 1   // sec
             #define DEFAULT_SY_LFR_S1_BP_P1 1   // sec
             // SBM2
             #define DEFAULT_SY_LFR_S2_BP_P0 1   // sec
             #define DEFAULT_SY_LFR_S2_BP_P1 5   // sec
             // ADDITIONAL PARAMETERS
             #define TIME_BETWEEN_TWO_SWF_PACKETS 30     // nb x 10 ms => 300 ms
             #define TIME_BETWEEN_TWO_CWF3_PACKETS 1000  // nb x 10 ms => 10 s
             // STATUS WORD
             #define DEFAULT_STATUS_WORD_BYTE0 0x0d  // [0000] [1] [101] mode 4 bits / SPW enabled 1 bit / state is run 3 bits
             #define DEFAULT_STATUS_WORD_BYTE1 0x00
             //
             #define SY_LFR_DPU_CONNECT_TIMEOUT 100  // 100 * 10 ms = 1 s
             #define SY_LFR_DPU_CONNECT_ATTEMPT 3
             //****************************
             //*****************************
             // APB REGISTERS BASE ADDRESSES
             #define REGS_ADDR_APBUART 0x80000100
             #define REGS_ADDR_GPTIMER 0x80000300
             #define REGS_ADDR_GRSPW 0x80000500
             #define REGS_ADDR_TIME_MANAGEMENT 0x80000600
             #define REGS_ADDR_SPECTRAL_MATRIX 0x80000f00
             #ifdef GSA
             #else
                 #define REGS_ADDR_WAVEFORM_PICKER 0x80000f20
             #endif
             #define APBUART_CTRL_REG_MASK_DB 0xfffff7ff
             #define APBUART_SCALER_RELOAD_VALUE 0x00000050      // 25 MHz => about 38400 (0x50)
             //**********
             // IRQ LINES
             #define IRQ_SM 9
             #define IRQ_SPARC_SM 0x19               // see sparcv8.pdf p.76 for interrupt levels
             #define IRQ_WF 10
             #define IRQ_SPARC_WF 0x1a               // see sparcv8.pdf p.76 for interrupt levels
             #define IRQ_TIME1 12
             #define IRQ_SPARC_TIME1 0x1c            // see sparcv8.pdf p.76 for interrupt levels
             #define IRQ_TIME2 13
             #define IRQ_SPARC_TIME2 0x1d            // see sparcv8.pdf p.76 for interrupt levels
             #define IRQ_WAVEFORM_PICKER 14
             #define IRQ_SPARC_WAVEFORM_PICKER 0x1e  // see sparcv8.pdf p.76 for interrupt levels
             #define IRQ_SPECTRAL_MATRIX 6
             #define IRQ_SPARC_SPECTRAL_MATRIX 0x16  // see sparcv8.pdf p.76 for interrupt levels
             //*****
             // TIME
             #define CLKDIV_SM_SIMULATOR (10000 - 1)     // 10 ms
             #define CLKDIV_WF_SIMULATOR (10000000 - 1)  // 10 000 000 * 1 us = 10 s
             #define TIMER_SM_SIMULATOR 1
             #define TIMER_WF_SIMULATOR 2
             #define HK_PERIOD 100 // 100 * 10ms => 1sec
             //**********
             // LPP CODES
             #define LFR_SUCCESSFUL 0
             #define LFR_DEFAULT 1
             //******
             // RTEMS
             #define TASKID_RECV 1
             #define TASKID_ACTN 2
             #define TASKID_SPIQ 3
             #define TASKID_SMIQ 4
             #define TASKID_STAT 5
             #define TASKID_AVF0 6
             #define TASKID_BPF0 7
             #define TASKID_WFRM 8
             #define TASKID_DUMB 9
             #define TASKID_HOUS 10
             #define TASKID_MATR 11
             #define TASKID_CWF3 12
             #define TASKID_CWF2 13
             #define TASKID_CWF1 14
             #define TASKID_SEND 15
             #define TASKID_WTDG 16
             #define TASK_PRIORITY_SPIQ 5
             #define TASK_PRIORITY_SMIQ 10
             //
             #define TASK_PRIORITY_WTDG 20
             //
             #define TASK_PRIORITY_HOUS 30
             //
             #define TASK_PRIORITY_CWF1 35   // CWF1 and CWF2 are never running together
             #define TASK_PRIORITY_CWF2 35   //
             //
             #define TASK_PRIORITY_WFRM 40
             #define TASK_PRIORITY_CWF3 40   // there is a printf in this function, be careful with its priority wrt CWF1
             //
             #define TASK_PRIORITY_SEND 45
             //
             #define TASK_PRIORITY_RECV 50
             #define TASK_PRIORITY_ACTN 50
             //
             #define TASK_PRIORITY_AVF0 60
             #define TASK_PRIORITY_BPF0 60
             #define TASK_PRIORITY_MATR 100
             #define TASK_PRIORITY_STAT 200
             #define TASK_PRIORITY_DUMB 200
             #define SEMQ_PRIORITY_CEILING 30
             #define ACTION_MSG_QUEUE_COUNT 10
             #define ACTION_MSG_PKTS_COUNT 50
             #define ACTION_MSG_PKTS_MAX_SIZE (PACKET_LENGTH_HK + CCSDS_TC_TM_PACKET_OFFSET + CCSDS_PROTOCOLE_EXTRA_BYTES)
             #define ACTION_MSG_SPW_IOCTL_SEND_SIZE 24                   // hlen *hdr dlen *data sent options
             #define QUEUE_RECV 0
             #define QUEUE_SEND 1
             //*******
             // MACROS
             #ifdef PRINT_MESSAGES_ON_CONSOLE
             #define PRINTF(x) printf(x);
             #define PRINTF1(x,y) printf(x,y);
             #define PRINTF2(x,y,z) printf(x,y,z);
             #else
             #define PRINTF(x) ;
             #define PRINTF1(x,y) ;
             #define PRINTF2(x,y,z) ;
             #endif
             #ifdef BOOT_MESSAGES
             #define BOOT_PRINTF(x) printf(x);
             #define BOOT_PRINTF1(x,y) printf(x,y);
             #define BOOT_PRINTF2(x,y,z) printf(x,y,z);
             #else
             #define BOOT_PRINTF(x) ;
             #define BOOT_PRINTF1(x,y) ;
             #define BOOT_PRINTF2(x,y,z) ;
             #endif
             #ifdef DEBUG_MESSAGES
             #define DEBUG_PRINTF(x) printf(x);
             #define DEBUG_PRINTF1(x,y) printf(x,y);
             #define DEBUG_PRINTF2(x,y,z) printf(x,y,z);
             #else
             #define DEBUG_PRINTF(x) ;
             #define DEBUG_PRINTF1(x,y) ;
             #define DEBUG_PRINTF2(x,y,z) ;
             #endif
             #define CPU_USAGE_REPORT_PERIOD 6   // * 10 s = period
             #define NB_SAMPLES_PER_SNAPSHOT 2048
             #define TIME_OFFSET 2
             #define WAVEFORM_EXTENDED_HEADER_OFFSET 22
             #define NB_BYTES_SWF_BLK (2 * 6)
             #define NB_WORDS_SWF_BLK 3
             #define NB_BYTES_CWF3_LIGHT_BLK 6
             #define WFRM_INDEX_OF_LAST_PACKET 6  // waveforms are transmitted in groups of 2048 blocks, 6 packets of 340 and 1 of 8
             struct param_local_str{
                 unsigned int local_sbm1_nb_cwf_sent;
                 unsigned int local_sbm1_nb_cwf_max;
                 unsigned int local_sbm2_nb_cwf_sent;
                 unsigned int local_sbm2_nb_cwf_max;
                 unsigned int local_nb_interrupt_f0_MAX;
             };
             #endif // FSW_PARAMS_H_INCLUDED

src/fsw_init.c +1 -1

             /** This is the RTEMS initialization module.
              *
              * @file
              * @author P. LEROY
              *
              * This module contains two very different information:
              * - specific instructions to configure the compilation of the RTEMS executive
              * - functions related to the fligth softwre initialization, especially the INIT RTEMS task
              *
              */
             //*************************
             // GPL reminder to be added
             //*************************
             #include <rtems.h>
             /* configuration information */
             #define CONFIGURE_INIT
             #include <bsp.h> /* for device driver prototypes */
             /* configuration information */
             #define CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER
             #define CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER
             #define CONFIGURE_MAXIMUM_TASKS 20
             #define CONFIGURE_RTEMS_INIT_TASKS_TABLE
             #define CONFIGURE_EXTRA_TASK_STACKS (3 * RTEMS_MINIMUM_STACK_SIZE)
             #define CONFIGURE_LIBIO_MAXIMUM_FILE_DESCRIPTORS 32
             #define CONFIGURE_INIT_TASK_PRIORITY 1 // instead of 100
             #define CONFIGURE_INIT_TASK_MODE (RTEMS_DEFAULT_MODES | RTEMS_NO_PREEMPT)
             #define CONFIGURE_MAXIMUM_DRIVERS 16
             #define CONFIGURE_MAXIMUM_PERIODS 5
             #define CONFIGURE_MAXIMUM_TIMERS 5  // STAT (1s), send SWF (0.3s), send CWF3 (1s)
             #define CONFIGURE_MAXIMUM_MESSAGE_QUEUES 2
             #ifdef PRINT_STACK_REPORT
                 #define CONFIGURE_STACK_CHECKER_ENABLED
             #endif
             #include <rtems/confdefs.h>
             /* If --drvmgr was enabled during the configuration of the RTEMS kernel */
             #ifdef RTEMS_DRVMGR_STARTUP
                 #ifdef LEON3
                 /* Add Timer and UART Driver */
                     #ifdef CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER
                         #define CONFIGURE_DRIVER_AMBAPP_GAISLER_GPTIMER
                     #endif
                     #ifdef CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER
                         #define CONFIGURE_DRIVER_AMBAPP_GAISLER_APBUART
                     #endif
                 #endif
                 #define CONFIGURE_DRIVER_AMBAPP_GAISLER_GRSPW   /* GRSPW Driver */
                 #include <drvmgr/drvmgr_confdefs.h>
             #endif
             #include "fsw_init.h"
             #include "fsw_config.c"
             rtems_task Init( rtems_task_argument ignored )
             {
                 /** This is the RTEMS INIT taks, it the first task launched by the system.
                  *
                  * @param unused is the starting argument of the RTEMS task
                  *
                  * The INIT task create and run all other RTEMS tasks.
                  *
                  */
                 rtems_status_code status;
                 rtems_status_code status_spw;
                 rtems_isr_entry  old_isr_handler;
                 BOOT_PRINTF("\n\n\n\n\n")
                 BOOT_PRINTF("***************************\n")
                 BOOT_PRINTF("** START Flight Software **\n")
                 BOOT_PRINTF("***************************\n")
                 BOOT_PRINTF("\n\n")
                 //send_console_outputs_on_apbuart_port();
                 set_apbuart_scaler_reload_register(REGS_ADDR_APBUART, APBUART_SCALER_RELOAD_VALUE);
                 reset_wfp_burst_enable();       // stop the waveform picker if it was running
                 init_parameter_dump();
                 init_local_mode_parameters();
                 init_housekeeping_parameters();
                 updateLFRCurrentMode();
                 BOOT_PRINTF1("in INIT *** lfrCurrentMode is %d\n", lfrCurrentMode)
                 create_names();                             // create all names
                 status = create_message_queues();           // create message queues
                 if (status != RTEMS_SUCCESSFUL)
                 {
                     PRINTF1("in INIT *** ERR in create_message_queues, code %d", status)
                 }
                 status = create_all_tasks();                // create all tasks
                 if (status != RTEMS_SUCCESSFUL)
                 {
                     PRINTF1("in INIT *** ERR in create_all_tasks, code %d", status)
                 }
                 // **************************
                 // <SPACEWIRE INITIALIZATION>
                 grspw_timecode_callback = &timecode_irq_handler;
                 status_spw = spacewire_open_link();     // (1) open the link
                 if ( status_spw != RTEMS_SUCCESSFUL )
                 {
                     PRINTF1("in INIT *** ERR spacewire_open_link code %d\n", status_spw )
                 }
                 if ( status_spw == RTEMS_SUCCESSFUL )   // (2) configure the link
                 {
                     status_spw = spacewire_configure_link( fdSPW );
                     if ( status_spw != RTEMS_SUCCESSFUL )
                     {
                         PRINTF1("in INIT *** ERR spacewire_configure_link code %d\n", status_spw )
                     }
                 }
                 if ( status_spw == RTEMS_SUCCESSFUL)    // (3) start the link
                 {
                     status_spw = spacewire_start_link( fdSPW );
                     if (  status_spw != RTEMS_SUCCESSFUL )
                     {
                         PRINTF1("in INIT *** ERR spacewire_start_link code %d\n",  status_spw )
                     }
                 }
                 // </SPACEWIRE INITIALIZATION>
                 // ***************************
                 status = start_all_tasks();     // start all tasks
                 if (status != RTEMS_SUCCESSFUL)
                 {
                     PRINTF1("in INIT *** ERR in start_all_tasks, code %d", status)
                 }
                 // start RECV and SEND *AFTER* SpaceWire Initialization, due to the timeout of the start call during the initialization
                 status = start_recv_send_tasks();
                 if ( status != RTEMS_SUCCESSFUL )
                 {
                     PRINTF1("in INIT *** ERR start_recv_send_tasks code %d\n",  status )
                 }
                 // suspend science tasks. they will be restarted later depending on the mode
                 status = suspend_science_tasks();   // suspend science tasks (not done in stop_current_mode if current mode = STANDBY)
                 if (status != RTEMS_SUCCESSFUL)
                 {
                     PRINTF1("in INIT *** in suspend_science_tasks *** ERR code: %d\n", status)
                 }
             #ifdef GSA
                 // mask IRQ lines
                 LEON_Mask_interrupt( IRQ_SM );
                 LEON_Mask_interrupt( IRQ_WF );
                 // Spectral Matrices simulator
                 configure_timer((gptimer_regs_t*) REGS_ADDR_GPTIMER, TIMER_SM_SIMULATOR, CLKDIV_SM_SIMULATOR,
                                 IRQ_SPARC_SM, spectral_matrices_isr );
                 // WaveForms
                 configure_timer((gptimer_regs_t*) REGS_ADDR_GPTIMER, TIMER_WF_SIMULATOR, CLKDIV_WF_SIMULATOR,
                                 IRQ_SPARC_WF, waveforms_simulator_isr );
             #else
                 // configure IRQ handling for the waveform picker unit
                 status = rtems_interrupt_catch( waveforms_isr,
                                                IRQ_SPARC_WAVEFORM_PICKER,
                                                &old_isr_handler) ;
             #endif
                 // if the spacewire link is not up then send an event to the SPIQ task for link recovery
                 if ( status_spw != RTEMS_SUCCESSFUL )
                 {
                     status = rtems_event_send( Task_id[TASKID_SPIQ], SPW_LINKERR_EVENT );
                     if ( status != RTEMS_SUCCESSFUL ) {
                         PRINTF1("in INIT *** ERR rtems_event_send to SPIQ code %d\n",  status )
                     }
                 }
                 BOOT_PRINTF("delete INIT\n")
                 status = rtems_task_delete(RTEMS_SELF);
             }
             void init_local_mode_parameters( void )
             {
                 /** This function initialize the param_local global variable with default values.
                  *
                  */
                 unsigned int i;
                 // LOCAL PARAMETERS
                 set_local_sbm1_nb_cwf_max();
                 set_local_sbm2_nb_cwf_max();
                 set_local_nb_interrupt_f0_MAX();
                 BOOT_PRINTF1("local_sbm1_nb_cwf_max %d \n", param_local.local_sbm1_nb_cwf_max)
                 BOOT_PRINTF1("local_sbm2_nb_cwf_max %d \n", param_local.local_sbm2_nb_cwf_max)
                 BOOT_PRINTF1("nb_interrupt_f0_MAX = %d\n", param_local.local_nb_interrupt_f0_MAX)
                 reset_local_sbm1_nb_cwf_sent();
                 reset_local_sbm2_nb_cwf_sent();
                 // init sequence counters
                 for(i = 0; i<SEQ_CNT_NB_DEST_ID; i++)
                 {
                     sequenceCounters_TC_EXE[i] = 0x00;
                 }
                 sequenceCounters_SCIENCE_NORMAL_BURST = 0x00;
                 sequenceCounters_SCIENCE_SBM1_SBM2 = 0x00;
             }
             void create_names( void ) // create all names for tasks and queues
             {
                 /** This function creates all RTEMS names used in the software for tasks and queues.
                  *
                  * @return RTEMS directive status codes:
                  * - RTEMS_SUCCESSFUL - successful completion
                  *
                  */
                 // task names
                 Task_name[TASKID_RECV] = rtems_build_name( 'R', 'E', 'C', 'V' );
                 Task_name[TASKID_ACTN] = rtems_build_name( 'A', 'C', 'T', 'N' );
                 Task_name[TASKID_SPIQ] = rtems_build_name( 'S', 'P', 'I', 'Q' );
                 Task_name[TASKID_SMIQ] = rtems_build_name( 'S', 'M', 'I', 'Q' );
                 Task_name[TASKID_STAT] = rtems_build_name( 'S', 'T', 'A', 'T' );
                 Task_name[TASKID_AVF0] = rtems_build_name( 'A', 'V', 'F', '0' );
                 Task_name[TASKID_BPF0] = rtems_build_name( 'B', 'P', 'F', '0' );
                 Task_name[TASKID_WFRM] = rtems_build_name( 'W', 'F', 'R', 'M' );
                 Task_name[TASKID_DUMB] = rtems_build_name( 'D', 'U', 'M', 'B' );
                 Task_name[TASKID_HOUS] = rtems_build_name( 'H', 'O', 'U', 'S' );
                 Task_name[TASKID_MATR] = rtems_build_name( 'M', 'A', 'T', 'R' );
                 Task_name[TASKID_CWF3] = rtems_build_name( 'C', 'W', 'F', '3' );
                 Task_name[TASKID_CWF2] = rtems_build_name( 'C', 'W', 'F', '2' );
                 Task_name[TASKID_CWF1] = rtems_build_name( 'C', 'W', 'F', '1' );
                 Task_name[TASKID_SEND] = rtems_build_name( 'S', 'E', 'N', 'D' );
                 Task_name[TASKID_WTDG] = rtems_build_name( 'W', 'T', 'D', 'G' );
                 // rate monotonic period names
                 name_hk_rate_monotonic = rtems_build_name( 'H', 'O', 'U', 'S' );
                 misc_name[QUEUE_RECV] = rtems_build_name( 'Q', '_', 'R', 'V' );
                 misc_name[QUEUE_SEND] = rtems_build_name( 'Q', '_', 'S', 'D' );
             }
             int create_all_tasks( void ) // create all tasks which run in the software
             {
                 /** This function creates all RTEMS tasks used in the software.
                  *
                  * @return RTEMS directive status codes:
                  * - RTEMS_SUCCESSFUL - task created successfully
                  * - RTEMS_INVALID_ADDRESS - id is NULL
                  * - RTEMS_INVALID_NAME - invalid task name
                  * - RTEMS_INVALID_PRIORITY - invalid task priority
                  * - RTEMS_MP_NOT_CONFIGURED - multiprocessing not configured
                  * - RTEMS_TOO_MANY - too many tasks created
                  * - RTEMS_UNSATISFIED - not enough memory for stack/FP context
                  * - RTEMS_TOO_MANY - too many global objects
                  *
                  */
                 rtems_status_code status;
                 // RECV
                 status = rtems_task_create(
                     Task_name[TASKID_RECV], TASK_PRIORITY_RECV, RTEMS_MINIMUM_STACK_SIZE,
                     RTEMS_DEFAULT_MODES,
                     RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_RECV]
                 );
                 if (status == RTEMS_SUCCESSFUL) // ACTN
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_ACTN], TASK_PRIORITY_ACTN, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES,
                         RTEMS_DEFAULT_ATTRIBUTES | RTEMS_FLOATING_POINT, &Task_id[TASKID_ACTN]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // SPIQ
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_SPIQ], TASK_PRIORITY_SPIQ, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES | RTEMS_NO_PREEMPT,
                         RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_SPIQ]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // SMIQ
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_SMIQ], TASK_PRIORITY_SMIQ, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES | RTEMS_NO_PREEMPT,
                         RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_SMIQ]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // STAT
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_STAT], TASK_PRIORITY_STAT, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES,
                         RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_STAT]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // AVF0
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_AVF0], TASK_PRIORITY_AVF0, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES  | RTEMS_NO_PREEMPT,
                         RTEMS_DEFAULT_ATTRIBUTES | RTEMS_FLOATING_POINT, &Task_id[TASKID_AVF0]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // BPF0
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_BPF0], TASK_PRIORITY_BPF0, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES,
                         RTEMS_DEFAULT_ATTRIBUTES | RTEMS_FLOATING_POINT, &Task_id[TASKID_BPF0]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // WFRM
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_WFRM], TASK_PRIORITY_WFRM, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES,
                         RTEMS_DEFAULT_ATTRIBUTES | RTEMS_FLOATING_POINT, &Task_id[TASKID_WFRM]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // DUMB
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_DUMB], TASK_PRIORITY_DUMB, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES,
                         RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_DUMB]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // HOUS
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_HOUS], TASK_PRIORITY_HOUS, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES | RTEMS_NO_PREEMPT,
                         RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_HOUS]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // MATR
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_MATR], TASK_PRIORITY_MATR, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES,
                         RTEMS_DEFAULT_ATTRIBUTES | RTEMS_FLOATING_POINT, &Task_id[TASKID_MATR]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // CWF3
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_CWF3], TASK_PRIORITY_CWF3, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES,
                         RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_CWF3]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // CWF2
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_CWF2], TASK_PRIORITY_CWF2, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES,
                         RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_CWF2]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // CWF1
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_CWF1], TASK_PRIORITY_CWF1, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES,
                         RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_CWF1]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // SEND
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_SEND], TASK_PRIORITY_SEND, RTEMS_MINIMUM_STACK_SIZE,
-                        RTEMS_DEFAULT_MODES,
+                        RTEMS_DEFAULT_MODES | RTEMS_NO_PREEMPT,
                         RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_SEND]
                     );
                 }
                 if (status == RTEMS_SUCCESSFUL) // WTDG
                 {
                     status = rtems_task_create(
                         Task_name[TASKID_WTDG], TASK_PRIORITY_WTDG, RTEMS_MINIMUM_STACK_SIZE,
                         RTEMS_DEFAULT_MODES,
                         RTEMS_DEFAULT_ATTRIBUTES, &Task_id[TASKID_WTDG]
                     );
                 }
                 return status;
             }
             int start_recv_send_tasks( void )
             {
                 rtems_status_code status;
                 status = rtems_task_start( Task_id[TASKID_RECV], recv_task, 1 );
                 if (status!=RTEMS_SUCCESSFUL) {
                     BOOT_PRINTF("in INIT *** Error starting TASK_RECV\n")
                 }
                 if (status == RTEMS_SUCCESSFUL)     // SEND
                 {
                     status = rtems_task_start( Task_id[TASKID_SEND], send_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_SEND\n")
                     }
                 }
                 return status;
             }
             int start_all_tasks( void ) // start all tasks except SEND RECV and HOUS
             {
                 /** This function starts all RTEMS tasks used in the software.
                  *
                  * @return RTEMS directive status codes:
                  * - RTEMS_SUCCESSFUL - ask started successfully
                  * - RTEMS_INVALID_ADDRESS - invalid task entry point
                  * - RTEMS_INVALID_ID - invalid task id
                  * - RTEMS_INCORRECT_STATE - task not in the dormant state
                  * - RTEMS_ILLEGAL_ON_REMOTE_OBJECT - cannot start remote task
                  *
                  */
                 // starts all the tasks fot eh flight software
                 rtems_status_code status;
                 status = rtems_task_start( Task_id[TASKID_SPIQ], spiq_task, 1 );
                 if (status!=RTEMS_SUCCESSFUL) {
                     BOOT_PRINTF("in INIT *** Error starting TASK_SPIQ\n")
                 }
                 if (status == RTEMS_SUCCESSFUL)     // WTDG
                 {
                     status = rtems_task_start( Task_id[TASKID_WTDG], wtdg_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_WTDG\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // SMIQ
                 {
                     status = rtems_task_start( Task_id[TASKID_SMIQ], smiq_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_BPPR\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // ACTN
                 {
                     status = rtems_task_start( Task_id[TASKID_ACTN], actn_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_ACTN\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // STAT
                 {
                     status = rtems_task_start( Task_id[TASKID_STAT], stat_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_STAT\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // AVF0
                 {
                     status = rtems_task_start( Task_id[TASKID_AVF0], avf0_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_AVF0\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // BPF0
                 {
                     status = rtems_task_start( Task_id[TASKID_BPF0], bpf0_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_BPF0\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // WFRM
                 {
                     status = rtems_task_start( Task_id[TASKID_WFRM], wfrm_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_WFRM\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // DUMB
                 {
                     status = rtems_task_start( Task_id[TASKID_DUMB], dumb_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_DUMB\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // HOUS
                 {
                     status = rtems_task_start( Task_id[TASKID_HOUS], hous_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_HOUS\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // MATR
                 {
                     status = rtems_task_start( Task_id[TASKID_MATR], matr_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_MATR\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // CWF3
                 {
                     status = rtems_task_start( Task_id[TASKID_CWF3], cwf3_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_CWF3\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // CWF2
                 {
                     status = rtems_task_start( Task_id[TASKID_CWF2], cwf2_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_CWF2\n")
                     }
                 }
                 if (status == RTEMS_SUCCESSFUL)     // CWF1
                 {
                     status = rtems_task_start( Task_id[TASKID_CWF1], cwf1_task, 1 );
                     if (status!=RTEMS_SUCCESSFUL) {
                         BOOT_PRINTF("in INIT *** Error starting TASK_CWF1\n")
                     }
                 }
                 return status;
             }
             rtems_status_code create_message_queues( void ) // create the two message queues used in the software
             {
                 rtems_status_code status_recv;
                 rtems_status_code status_send;
                 rtems_status_code ret;
                 rtems_id queue_id;
                 // create the queue for handling valid TCs
                 status_recv = rtems_message_queue_create( misc_name[QUEUE_RECV],
                                                           ACTION_MSG_QUEUE_COUNT, CCSDS_TC_PKT_MAX_SIZE,
                                                      RTEMS_FIFO | RTEMS_LOCAL, &queue_id );
                 if ( status_recv != RTEMS_SUCCESSFUL ) {
                     PRINTF1("in create_message_queues *** ERR creating QUEU queue, %d\n", status_recv)
                 }
                 // create the queue for handling TM packet sending
                 status_send = rtems_message_queue_create( misc_name[QUEUE_SEND],
                                                           ACTION_MSG_PKTS_COUNT, ACTION_MSG_PKTS_MAX_SIZE,
                                                   RTEMS_FIFO | RTEMS_LOCAL, &queue_id );
                 if ( status_send != RTEMS_SUCCESSFUL ) {
                     PRINTF1("in create_message_queues *** ERR creating PKTS queue, %d\n", status_send)
                 }
                 if ( status_recv != RTEMS_SUCCESSFUL )
                 {
                     ret = status_recv;
                 }
                 else
                 {
                     ret = status_send;
                 }
                 return ret;
             }

src/fsw_spacewire.c +3 -14

             /** Functions related to the SpaceWire interface.
              *
              * @file
              * @author P. LEROY
              *
              * A group of functions to handle SpaceWire transmissions:
              * - configuration of the SpaceWire link
              * - SpaceWire related interruption requests processing
              * - transmission of TeleMetry packets by a dedicated RTEMS task
              * - reception of TeleCommands by a dedicated RTEMS task
              *
              */
             #include "fsw_spacewire.h"
             char *lstates[6] = {"Error-reset",
                                 "Error-wait",
                                 "Ready",
                                 "Started",
                                 "Connecting",
                                 "Run"
             };
             rtems_name semq_name;
             rtems_id semq_id;
             //***********
             // RTEMS TASK
             rtems_task spiq_task(rtems_task_argument unused)
             {
                 /** This RTEMS task is awaken by an rtems_event sent by the interruption subroutine of the SpaceWire driver.
                  *
                  * @param unused is the starting argument of the RTEMS task
                  *
                  */
                 rtems_event_set event_out;
                 rtems_status_code status;
                 int linkStatus;
                 BOOT_PRINTF("in SPIQ *** \n")
                 while(true){
                     rtems_event_receive(SPW_LINKERR_EVENT, RTEMS_WAIT, RTEMS_NO_TIMEOUT, &event_out); // wait for an SPW_LINKERR_EVENT
                     PRINTF("in SPIQ *** got SPW_LINKERR_EVENT\n")
                     // [0] SUSPEND RECV AND SEND TASKS
                     rtems_task_suspend( Task_id[ TASKID_RECV ] );
                     rtems_task_suspend( Task_id[ TASKID_SEND ] );
                     // [1] CHECK THE LINK
                     ioctl(fdSPW, SPACEWIRE_IOCTRL_GET_LINK_STATUS, &linkStatus);   // get the link status (1)
                     if ( linkStatus != 5) {
                         PRINTF1("in SPIQ *** linkStatus %d, wait...\n", linkStatus)
                         rtems_task_wake_after( SY_LFR_DPU_CONNECT_TIMEOUT );        // wait SY_LFR_DPU_CONNECT_TIMEOUT 1000 ms
                     }
                     // [2] RECHECK THE LINK AFTER SY_LFR_DPU_CONNECT_TIMEOUT
                     ioctl(fdSPW, SPACEWIRE_IOCTRL_GET_LINK_STATUS, &linkStatus);    // get the link status (2)
                     if ( linkStatus != 5 )  // [2.a] not in run state, reset the link
                     {
                         spacewire_compute_stats_offsets();
                         status = spacewire_reset_link( );
                     }
                     else                    // [2.b] in run state, start the link
                     {
                         status = spacewire_stop_start_link( fdSPW ); // start the link
                         if ( status != RTEMS_SUCCESSFUL)
                         {
                             PRINTF1("in SPIQ *** ERR spacewire_start_link %d\n", status)
                         }
                     }
                     // [3] COMPLETE RECOVERY ACTION AFTER SY_LFR_DPU_CONNECT_ATTEMPTS
                     if ( status == RTEMS_SUCCESSFUL )   // [3.a] the link is in run state and has been started successfully
                     {
                         status = rtems_task_restart( Task_id[ TASKID_SEND ], 1 );
                         if ( status != RTEMS_SUCCESSFUL ) {
                             PRINTF("in SPIQ *** ERR resuming SEND Task\n")
                         }
                         status = rtems_task_restart( Task_id[ TASKID_RECV ], 1 );
                         if ( status != RTEMS_SUCCESSFUL ) {
                             PRINTF("in SPIQ *** ERR resuming RECV Task\n")
                         }
                     }
                     else                                // [3.b] the link is not in run state, go in STANDBY mode
                     {
                         status = stop_current_mode();
                         if ( status != RTEMS_SUCCESSFUL ) {
                             PRINTF1("in SPIQ *** ERR stop_current_mode *** code %d\n", status)
                         }
                         status = enter_standby_mode();
                         if ( status != RTEMS_SUCCESSFUL ) {
                             PRINTF1("in SPIQ *** ERR enter_standby_mode *** code %d\n", status)
                         }
                         // wake the WTDG task up to wait for the link recovery
                         status =  rtems_event_send ( Task_id[TASKID_WTDG], RTEMS_EVENT_0 );
                         rtems_task_suspend( RTEMS_SELF );
                     }
                 }
             }
             rtems_task recv_task( rtems_task_argument unused )
             {
                 /** This RTEMS task is dedicated to the reception of incoming TeleCommands.
                  *
                  * @param unused is the starting argument of the RTEMS task
                  *
                  * The RECV task blocks on a call to the read system call, waiting for incoming SpaceWire data. When unblocked:
                  * 1. It reads the incoming data.
                  * 2. Launches the acceptance procedure.
                  * 3. If the Telecommand is valid, sends it to a dedicated RTEMS message queue.
                  *
                  */
                 int len;
                 ccsdsTelecommandPacket_t currentTC;
                 unsigned char computed_CRC[ 2 ];
                 unsigned char currentTC_LEN_RCV[ 2 ];
                 unsigned int currentTC_LEN_RCV_AsUnsignedInt;
                 unsigned int parserCode;
                 rtems_status_code status;
                 rtems_id queue_recv_id;
                 rtems_id queue_send_id;
                 initLookUpTableForCRC(); // the table is used to compute Cyclic Redundancy Codes
                 status =  rtems_message_queue_ident( misc_name[QUEUE_RECV], 0, &queue_recv_id );
                 if (status != RTEMS_SUCCESSFUL)
                 {
                     PRINTF1("in RECV *** ERR getting QUEUE_RECV id, %d\n", status)
                 }
                 status =  rtems_message_queue_ident( misc_name[QUEUE_SEND], 0, &queue_send_id );
                 if (status != RTEMS_SUCCESSFUL)
                 {
                     PRINTF1("in RECV *** ERR getting QUEUE_SEND id, %d\n", status)
                 }
                 BOOT_PRINTF("in RECV *** \n")
                 while(1)
                 {
                     len = read( fdSPW, (char*) &currentTC, CCSDS_TC_PKT_MAX_SIZE ); // the call to read is blocking
                     if (len == -1){ // error during the read call
                         PRINTF1("in RECV *** last read call returned -1, ERRNO %d\n", errno)
                     }
                     else {
                         if ( (len+1) < CCSDS_TC_PKT_MIN_SIZE ) {
                             PRINTF("in RECV *** packet lenght too short\n")
                         }
                         else {
                             currentTC_LEN_RCV_AsUnsignedInt = (unsigned int) (len - CCSDS_TC_TM_PACKET_OFFSET - 3); // => -3 is for Prot ID, Reserved and User App bytes
                             currentTC_LEN_RCV[ 0 ] = (unsigned char) (currentTC_LEN_RCV_AsUnsignedInt >> 8);
                             currentTC_LEN_RCV[ 1 ] = (unsigned char) (currentTC_LEN_RCV_AsUnsignedInt     );
                             // CHECK THE TC
                             parserCode = tc_parser( &currentTC, currentTC_LEN_RCV_AsUnsignedInt, computed_CRC ) ;
                             if ( (parserCode == ILLEGAL_APID)       || (parserCode == WRONG_LEN_PKT)
                                  || (parserCode == INCOR_CHECKSUM)  || (parserCode == ILL_TYPE)
                                  || (parserCode == ILL_SUBTYPE)     || (parserCode == WRONG_APP_DATA)
                                  || (parserCode == WRONG_SRC_ID) )
                             { // send TM_LFR_TC_EXE_CORRUPTED
                                 if ( !( (currentTC.serviceType==TC_TYPE_TIME) && (currentTC.serviceSubType==TC_SUBTYPE_UPDT_TIME) )
                                      &&
                                      !( (currentTC.serviceType==TC_TYPE_GEN) && (currentTC.serviceSubType==TC_SUBTYPE_UPDT_INFO))
                                      )
                                 {
                                     send_tm_lfr_tc_exe_corrupted( &currentTC, queue_send_id, computed_CRC, currentTC_LEN_RCV );
                                 }
                             }
                             else
                             { // send valid TC to the action launcher
                                 status =  rtems_message_queue_send( queue_recv_id, &currentTC,
                                                                     currentTC_LEN_RCV_AsUnsignedInt + CCSDS_TC_TM_PACKET_OFFSET + 3);
                             }
                         }
                     }
                 }
             }
             rtems_task send_task( rtems_task_argument argument)
             {
                 /** This RTEMS task is dedicated to the transmission of TeleMetry packets.
                  *
                  * @param unused is the starting argument of the RTEMS task
                  *
                  * The SEND task waits for a message to become available in the dedicated RTEMS queue. When a message arrives:
                  * - if the first byte is equal to CCSDS_DESTINATION_ID, the message is sent as is using the write system call.
                  * - if the first byte is not equal to CCSDS_DESTINATION_ID, the message is handled as a spw_ioctl_pkt_send. After
                  * analyzis, the packet is sent either using the write system call or using the ioctl call SPACEWIRE_IOCTRL_SEND, depending on the
                  * data it contains.
                  *
                  */
                 rtems_status_code status;               // RTEMS status code
                 char incomingData[ACTION_MSG_PKTS_MAX_SIZE];  // incoming data buffer
                 spw_ioctl_pkt_send *spw_ioctl_send;
                 size_t size;                            // size of the incoming TC packet
                 u_int32_t count;
                 rtems_id queue_id;
                 status =  rtems_message_queue_ident( misc_name[QUEUE_SEND], 0, &queue_id );
                 if (status != RTEMS_SUCCESSFUL)
                 {
                     PRINTF1("in SEND *** ERR getting queue id, %d\n", status)
                 }
                 BOOT_PRINTF("in SEND *** \n")
                 while(1)
                 {
                     status = rtems_message_queue_receive( queue_id, incomingData, &size,
                                                          RTEMS_WAIT, RTEMS_NO_TIMEOUT );
                     if (status!=RTEMS_SUCCESSFUL)
                     {
                         PRINTF1("in SEND *** (1) ERR = %d\n", status)
                     }
                     else
                     {
                         if ( incomingData[0] == CCSDS_DESTINATION_ID) // the incoming message is a ccsds packet
                         {
                             status = write( fdSPW, incomingData, size );
                             if (status == -1){
                                 PRINTF2("in SEND *** (2.a) ERRNO = %d, size = %d\n", errno, size)
                             }
                         }
                         else // the incoming message is a spw_ioctl_pkt_send structure
                         {
                             spw_ioctl_send = (spw_ioctl_pkt_send*) incomingData;
-                            if (spw_ioctl_send->hlen == 0)
+                            status = ioctl( fdSPW, SPACEWIRE_IOCTRL_SEND, spw_ioctl_send );
+                            if (status == -1){
-                                status = write( fdSPW, spw_ioctl_send->data, spw_ioctl_send->dlen );
+                                PRINTF2("in SEND *** (2.b) ERRNO = %d, RTEMS = %d\n", errno, status)
-                                if (status == -1){
-                                    PRINTF2("in SEND *** (2.b) ERRNO = %d, dlen = %d\n", errno, spw_ioctl_send->dlen)
-                            else
-                                status = ioctl( fdSPW, SPACEWIRE_IOCTRL_SEND, spw_ioctl_send );
-                                if (status == -1){
-                                    PRINTF2("in SEND *** (2.c) ERRNO = %d, dlen = %d\n", errno, spw_ioctl_send->dlen)
-                                    PRINTF1("                            hlen = %d\n", spw_ioctl_send->hlen)
                             }
                         }
                     }
                     status = rtems_message_queue_get_number_pending( queue_id, &count );
                     if (status != RTEMS_SUCCESSFUL)
                     {
                         PRINTF1("in SEND *** (3) ERR = %d\n", status)
                     }
                     else
                     {
                         if (count > maxCount)
                         {
                             maxCount = count;
                         }
                     }
                 }
             }
             rtems_task wtdg_task( rtems_task_argument argument )
             {
                 rtems_event_set event_out;
                 rtems_status_code status;
                 int linkStatus;
                 BOOT_PRINTF("in WTDG ***\n")
                 while(1)
                 {
                     // wait for an RTEMS_EVENT
                     rtems_event_receive( RTEMS_EVENT_0,
                                         RTEMS_WAIT | RTEMS_EVENT_ANY, RTEMS_NO_TIMEOUT, &event_out);
                     PRINTF("in WTDG *** wait for the link\n")
                     ioctl(fdSPW, SPACEWIRE_IOCTRL_GET_LINK_STATUS, &linkStatus);        // get the link status
                     while( linkStatus != 5)                                             // wait for the link
                     {
                         rtems_task_wake_after( 10 );
                         ioctl(fdSPW, SPACEWIRE_IOCTRL_GET_LINK_STATUS, &linkStatus);    // get the link status
                     }
                     status = spacewire_stop_start_link( fdSPW );
                     if (status != RTEMS_SUCCESSFUL)
                     {
                         PRINTF1("in WTDG *** ERR link not started %d\n", status)
                     }
                     else
                     {
                         PRINTF("in WTDG *** OK  link started\n")
                     }
                     // restart the SPIQ task
                     status = rtems_task_restart( Task_id[TASKID_SPIQ], 1 );
                     if ( status != RTEMS_SUCCESSFUL ) {
                         PRINTF("in SPIQ *** ERR restarting SPIQ Task\n")
                     }
                     // restart RECV and SEND
                     status = rtems_task_restart( Task_id[ TASKID_SEND ], 1 );
                     if ( status != RTEMS_SUCCESSFUL ) {
                         PRINTF("in SPIQ *** ERR restarting SEND Task\n")
                     }
                     status = rtems_task_restart( Task_id[ TASKID_RECV ], 1 );
                     if ( status != RTEMS_SUCCESSFUL ) {
                         PRINTF("in SPIQ *** ERR restarting RECV Task\n")
                     }
                 }
             }
             //****************
             // OTHER FUNCTIONS
             int spacewire_open_link( void )
             {
                 /** This function opens the SpaceWire link.
                  *
                  * @return a valid file descriptor in case of success, -1 in case of a failure
                  *
                  */
                 rtems_status_code status;
                 fdSPW = open(GRSPW_DEVICE_NAME, O_RDWR); // open the device. the open call resets the hardware
                 if ( fdSPW < 0 ) {
                     PRINTF1("ERR *** in configure_spw_link *** error opening "GRSPW_DEVICE_NAME" with ERR %d\n", errno)
                 }
                 else
                 {
                     status = RTEMS_SUCCESSFUL;
                 }
                 return status;
             }
             int spacewire_start_link( int fd )
             {
                 rtems_status_code status;
                 status = ioctl( fdSPW, SPACEWIRE_IOCTRL_START, -1); // returns successfuly if the link is started
                                                                     // -1 default hardcoded driver timeout
                 return status;
             }
             int spacewire_stop_start_link( int fd )
             {
                 rtems_status_code status;
                 status = ioctl( fdSPW, SPACEWIRE_IOCTRL_STOP);      // start fails if link pDev->running != 0
                 status = ioctl( fdSPW, SPACEWIRE_IOCTRL_START, -1); // returns successfuly if the link is started
                                                                     // -1 default hardcoded driver timeout
                 return status;
             }
             int spacewire_configure_link( int fd )
             {
                 /** This function configures the SpaceWire link.
                  *
                  * @return GR-RTEMS-DRIVER directive status codes:
                  * - 22  EINVAL - Null pointer or an out of range value was given as the argument.
                  * - 16  EBUSY - Only used for SEND. Returned when no descriptors are avialble in non-blocking mode.
                  * - 88  ENOSYS - Returned for SET_DESTKEY if RMAP command handler is not available or if a non-implemented call is used.
                  * - 116 ETIMEDOUT - REturned for SET_PACKET_SIZE and START if the link could not be brought up.
                  * - 12  ENOMEM - Returned for SET_PACKETSIZE if it was unable to allocate the new buffers.
                  * - 5   EIO - Error when writing to grswp hardware registers.
                  * - 2   ENOENT - No such file or directory
                  */
                 rtems_status_code status;
                 spacewire_set_NP(1, REGS_ADDR_GRSPW); // [N]o [P]ort force
                 spacewire_set_RE(1, REGS_ADDR_GRSPW); // [R]MAP [E]nable, the dedicated call seems to  break the no port force configuration
                 status = ioctl(fd, SPACEWIRE_IOCTRL_SET_RXBLOCK, 1);              // sets the blocking mode for reception
                 if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_RXBLOCK\n")
                 //
                 status = ioctl(fd, SPACEWIRE_IOCTRL_SET_EVENT_ID, Task_id[TASKID_SPIQ]); // sets the task ID to which an event is sent when a
                 if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_EVENT_ID\n") // link-error interrupt occurs
                 //
                 status = ioctl(fd, SPACEWIRE_IOCTRL_SET_DISABLE_ERR, 0);          // automatic link-disabling due to link-error interrupts
                 if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_DISABLE_ERR\n")
                 //
                 status = ioctl(fd, SPACEWIRE_IOCTRL_SET_LINK_ERR_IRQ, 1);         // sets the link-error interrupt bit
                 if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_LINK_ERR_IRQ\n")
                 //
                 status = ioctl(fd, SPACEWIRE_IOCTRL_SET_TXBLOCK, 0);             // transmission blocks
                 if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_TXBLOCK\n")
                 //
                 status = ioctl(fd, SPACEWIRE_IOCTRL_SET_TXBLOCK_ON_FULL, 1);      // transmission blocks when no transmission descriptor is available
                 if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_TXBLOCK_ON_FULL\n")
                 //
                 status = ioctl(fd, SPACEWIRE_IOCTRL_SET_TCODE_CTRL, 0x0909); // [Time Rx : Time Tx : Link error : Tick-out IRQ]
                 if (status!=RTEMS_SUCCESSFUL) PRINTF("in SPIQ *** Error SPACEWIRE_IOCTRL_SET_TCODE_CTRL,\n")
                 return status;
             }
             int spacewire_reset_link( void )
             {
                 /** This function is executed by the SPIQ rtems_task wehn it has been awaken by an interruption raised by the SpaceWire driver.
                  *
                  * @return RTEMS directive status code:
                  * - RTEMS_UNSATISFIED is returned is the link is not in the running state after 10 s.
                  * - RTEMS_SUCCESSFUL is returned if the link is up before the timeout.
                  *
                  */
                 rtems_status_code status_spw;
                 int i;
                 for ( i=0; i<SY_LFR_DPU_CONNECT_ATTEMPT; i++ )
                 {
                     PRINTF1("in spacewire_reset_link *** link recovery, try %d\n", i);
                     // CLOSING THE DRIVER AT THIS POINT WILL MAKE THE SEND TASK BLOCK THE SYSTEM
                     status_spw = spacewire_stop_start_link( fdSPW );
                     if (  status_spw != RTEMS_SUCCESSFUL )
                     {
                         PRINTF1("in spacewire_reset_link *** ERR spacewire_start_link code %d\n",  status_spw)
                     }
                     if ( status_spw == RTEMS_SUCCESSFUL)
                     {
                         break;
                     }
                 }
                 return status_spw;
             }
             void spacewire_set_NP( unsigned char val, unsigned int regAddr ) // [N]o [P]ort force
             {
                 /** This function sets the [N]o [P]ort force bit of the GRSPW control register.
                  *
                  * @param val is the value, 0 or 1, used to set the value of the NP bit.
                  * @param regAddr is the address of the GRSPW control register.
                  *
                  * NP is the bit 20 of the GRSPW control register.
                  *
                  */
                 unsigned int *spwptr = (unsigned int*) regAddr;
                 if (val == 1) {
                     *spwptr = *spwptr | 0x00100000; // [NP] set the No port force bit
                 }
                 if (val== 0) {
                     *spwptr = *spwptr & 0xffdfffff;
                 }
             }
             void spacewire_set_RE( unsigned char val, unsigned int regAddr ) // [R]MAP [E]nable
             {
                 /** This function sets the [R]MAP [E]nable bit of the GRSPW control register.
                  *
                  * @param val is the value, 0 or 1, used to set the value of the RE bit.
                  * @param regAddr is the address of the GRSPW control register.
                  *
                  * RE is the bit 16 of the GRSPW control register.
                  *
                  */
                 unsigned int *spwptr = (unsigned int*) regAddr;
                 if (val == 1)
                 {
                     *spwptr = *spwptr | 0x00010000; // [RE] set the RMAP Enable bit
                 }
                 if (val== 0)
                 {
                     *spwptr = *spwptr & 0xfffdffff;
                 }
             }
             void spacewire_compute_stats_offsets( void )
             {
                 /** This function computes the SpaceWire statistics offsets in case of a SpaceWire related interruption raising.
                  *
                  * The offsets keep a record of the statistics in case of a reset of the statistics. They are added to the current statistics
                  * to keep the counters consistent even after a reset of the SpaceWire driver (the counter are set to zero by the driver when it
                  * during the open systel call).
                  *
                  */
                 spw_stats spacewire_stats_grspw;
                 rtems_status_code status;
                 status = ioctl( fdSPW, SPACEWIRE_IOCTRL_GET_STATISTICS, &spacewire_stats_grspw );
                 spacewire_stats_backup.packets_received = spacewire_stats_grspw.packets_received
                         + spacewire_stats.packets_received;
                 spacewire_stats_backup.packets_sent = spacewire_stats_grspw.packets_sent
                         + spacewire_stats.packets_sent;
                 spacewire_stats_backup.parity_err = spacewire_stats_grspw.parity_err
                         + spacewire_stats.parity_err;
                 spacewire_stats_backup.disconnect_err = spacewire_stats_grspw.disconnect_err
                         + spacewire_stats.disconnect_err;
                 spacewire_stats_backup.escape_err = spacewire_stats_grspw.escape_err
                         + spacewire_stats.escape_err;
                 spacewire_stats_backup.credit_err = spacewire_stats_grspw.credit_err
                         + spacewire_stats.credit_err;
                 spacewire_stats_backup.write_sync_err = spacewire_stats_grspw.write_sync_err
                         + spacewire_stats.write_sync_err;
                 spacewire_stats_backup.rx_rmap_header_crc_err = spacewire_stats_grspw.rx_rmap_header_crc_err
                         + spacewire_stats.rx_rmap_header_crc_err;
                 spacewire_stats_backup.rx_rmap_data_crc_err = spacewire_stats_grspw.rx_rmap_data_crc_err
                         + spacewire_stats.rx_rmap_data_crc_err;
                 spacewire_stats_backup.early_ep = spacewire_stats_grspw.early_ep
                         + spacewire_stats.early_ep;
                 spacewire_stats_backup.invalid_address = spacewire_stats_grspw.invalid_address
                         + spacewire_stats.invalid_address;
                 spacewire_stats_backup.rx_eep_err = spacewire_stats_grspw.rx_eep_err
                         + spacewire_stats.rx_eep_err;
                 spacewire_stats_backup.rx_truncated = spacewire_stats_grspw.rx_truncated
                         + spacewire_stats.rx_truncated;
             }
             void spacewire_update_statistics( void )
             {
                 rtems_status_code status;
                 spw_stats spacewire_stats_grspw;
                 status = ioctl( fdSPW, SPACEWIRE_IOCTRL_GET_STATISTICS, &spacewire_stats_grspw );
                 spacewire_stats.packets_received = spacewire_stats_backup.packets_received
                         + spacewire_stats_grspw.packets_received;
                 spacewire_stats.packets_sent = spacewire_stats_backup.packets_sent
                         + spacewire_stats_grspw.packets_sent;
                 spacewire_stats.parity_err = spacewire_stats_backup.parity_err
                         + spacewire_stats_grspw.parity_err;
                 spacewire_stats.disconnect_err = spacewire_stats_backup.disconnect_err
                         + spacewire_stats_grspw.disconnect_err;
                 spacewire_stats.escape_err = spacewire_stats_backup.escape_err
                         + spacewire_stats_grspw.escape_err;
                 spacewire_stats.credit_err = spacewire_stats_backup.credit_err
                         + spacewire_stats_grspw.credit_err;
                 spacewire_stats.write_sync_err = spacewire_stats_backup.write_sync_err
                         + spacewire_stats_grspw.write_sync_err;
                 spacewire_stats.rx_rmap_header_crc_err = spacewire_stats_backup.rx_rmap_header_crc_err
                         + spacewire_stats_grspw.rx_rmap_header_crc_err;
                 spacewire_stats.rx_rmap_data_crc_err = spacewire_stats_backup.rx_rmap_data_crc_err
                         + spacewire_stats_grspw.rx_rmap_data_crc_err;
                 spacewire_stats.early_ep = spacewire_stats_backup.early_ep
                         + spacewire_stats_grspw.early_ep;
                 spacewire_stats.invalid_address = spacewire_stats_backup.invalid_address
                         + spacewire_stats_grspw.invalid_address;
                 spacewire_stats.rx_eep_err = spacewire_stats_backup.rx_eep_err
                         +  spacewire_stats_grspw.rx_eep_err;
                 spacewire_stats.rx_truncated = spacewire_stats_backup.rx_truncated
                         + spacewire_stats_grspw.rx_truncated;
                 //spacewire_stats.tx_link_err;
                 //****************************
                 // DPU_SPACEWIRE_IF_STATISTICS
                 housekeeping_packet.hk_lfr_dpu_spw_pkt_rcv_cnt[0] = (unsigned char) (spacewire_stats.packets_received >> 8);
                 housekeeping_packet.hk_lfr_dpu_spw_pkt_rcv_cnt[1] = (unsigned char) (spacewire_stats.packets_received);
                 housekeeping_packet.hk_lfr_dpu_spw_pkt_sent_cnt[0] = (unsigned char) (spacewire_stats.packets_sent >> 8);
                 housekeeping_packet.hk_lfr_dpu_spw_pkt_sent_cnt[1] = (unsigned char) (spacewire_stats.packets_sent);
                 //housekeeping_packet.hk_lfr_dpu_spw_tick_out_cnt;
                 //housekeeping_packet.hk_lfr_dpu_spw_last_timc;
                 //******************************************
                 // ERROR COUNTERS / SPACEWIRE / LOW SEVERITY
                 housekeeping_packet.hk_lfr_dpu_spw_parity = (unsigned char) spacewire_stats.parity_err;
                 housekeeping_packet.hk_lfr_dpu_spw_disconnect = (unsigned char) spacewire_stats.disconnect_err;
                 housekeeping_packet.hk_lfr_dpu_spw_escape = (unsigned char) spacewire_stats.escape_err;
                 housekeeping_packet.hk_lfr_dpu_spw_credit = (unsigned char) spacewire_stats.credit_err;
                 housekeeping_packet.hk_lfr_dpu_spw_write_sync = (unsigned char) spacewire_stats.write_sync_err;
                 // housekeeping_packet.hk_lfr_dpu_spw_rx_ahb;
                 // housekeeping_packet.hk_lfr_dpu_spw_tx_ahb;
                 housekeeping_packet.hk_lfr_dpu_spw_header_crc = (unsigned char) spacewire_stats.rx_rmap_header_crc_err;
                 housekeeping_packet.hk_lfr_dpu_spw_data_crc = (unsigned char) spacewire_stats.rx_rmap_data_crc_err;
                 //*********************************************
                 // ERROR COUNTERS / SPACEWIRE / MEDIUM SEVERITY
                 housekeeping_packet.hk_lfr_dpu_spw_early_eop = (unsigned char) spacewire_stats.early_ep;
                 housekeeping_packet.hk_lfr_dpu_spw_invalid_addr = (unsigned char) spacewire_stats.invalid_address;
                 housekeeping_packet.hk_lfr_dpu_spw_eep = (unsigned char) spacewire_stats.rx_eep_err;
                 housekeeping_packet.hk_lfr_dpu_spw_rx_too_big = (unsigned char) spacewire_stats.rx_truncated;
             }
             void timecode_irq_handler( void *pDev, void *regs, int minor, unsigned int tc )
             {
                 //if (rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_1 ) != RTEMS_SUCCESSFUL) {
                 //    printf("In timecode_irq_handler *** Error sending event to DUMB\n");
                 //}
             }
             rtems_timer_service_routine user_routine( rtems_id timer_id, void *user_data )
             {
                 int linkStatus;
                 rtems_status_code status;
                 ioctl(fdSPW, SPACEWIRE_IOCTRL_GET_LINK_STATUS, &linkStatus);   // get the link status
                 if ( linkStatus == 5) {
                     PRINTF("in spacewire_reset_link *** link is running\n")
                     status = RTEMS_SUCCESSFUL;
                 }
             }
             rtems_status_code rtems_message_queue_send_lfr( rtems_id id, const void *buffer, size_t size )
             {
                 rtems_status_code status;
                 rtems_mode previous_mode_set;
                 // set the preemption OFF
                 status =  rtems_task_mode( RTEMS_NO_PREEMPT, RTEMS_PREEMPT_MASK, &previous_mode_set );
                 // use the message queue
                 status = rtems_message_queue_send_lfr( id, buffer, size );
                 // set the preemption ON
                 status =  rtems_task_mode( RTEMS_PREEMPT , RTEMS_PREEMPT_MASK, &previous_mode_set );
                 return status;
             }

src/tc_load_dump_parameters.c +3 -3

             /** Functions to load and dump parameters in the LFR registers.
              *
              * @file
              * @author P. LEROY
              *
              * A group of functions to handle TC related to parameter loading and dumping.\n
              * TC_LFR_LOAD_COMMON_PAR\n
              * TC_LFR_LOAD_NORMAL_PAR\n
              * TC_LFR_LOAD_BURST_PAR\n
              * TC_LFR_LOAD_SBM1_PAR\n
              * TC_LFR_LOAD_SBM2_PAR\n
              *
              */
             #include "tc_load_dump_parameters.h"
             int action_load_common_par(ccsdsTelecommandPacket_t *TC)
             {
                 /** This function updates the LFR registers with the incoming common parameters.
                  *
                  * @param TC points to the TeleCommand packet that is being processed
                  *
                  *
                  */
                 parameter_dump_packet.unused0 = TC->dataAndCRC[0];
                 parameter_dump_packet.bw_sp0_sp1_r0_r1 = TC->dataAndCRC[1];
                 set_wfp_data_shaping(parameter_dump_packet.bw_sp0_sp1_r0_r1);
                 return LFR_SUCCESSFUL;
             }
             int action_load_normal_par(ccsdsTelecommandPacket_t *TC, rtems_id queue_id)
             {
                 /** This function updates the LFR registers with the incoming normal parameters.
                  *
                  * @param TC points to the TeleCommand packet that is being processed
                  * @param queue_id is the id of the queue which handles TM related to this execution step
                  *
                  */
                 int result;
                 int flag;
                 flag = LFR_SUCCESSFUL;
-                result = LFR_SUCCESSFUL;
-                if ( lfrCurrentMode == LFR_MODE_NORMAL ) {
+                if ( (lfrCurrentMode == LFR_MODE_NORMAL) ||
+                     (lfrCurrentMode == LFR_MODE_SBM1) || (lfrCurrentMode == LFR_MODE_SBM2) ) {
                     send_tm_lfr_tc_exe_not_executable( TC, queue_id );
                     flag = LFR_DEFAULT;
                 }
                 //***************
                 // sy_lfr_n_swf_l
                 if (flag == LFR_SUCCESSFUL)
                 {
                     result = set_sy_lfr_n_swf_l( TC, queue_id );
                     if (result != LFR_SUCCESSFUL)
                     {
                         flag = LFR_DEFAULT;
                     }
                 }
                 //***************
                 // sy_lfr_n_swf_p
                 if (flag == LFR_SUCCESSFUL)
                 {
                     result = set_sy_lfr_n_swf_p( TC, queue_id );
                     if (result != LFR_SUCCESSFUL)
                     {
                         flag = LFR_DEFAULT;
                     }
                 }
                 //***************
                 // SY_LFR_N_ASM_P
                 if (flag == LFR_SUCCESSFUL)
                 {
                     result = set_sy_lfr_n_asm_p( TC, queue_id );
                     if (result != LFR_SUCCESSFUL)
                     {
                         flag = LFR_DEFAULT;
                     }
                 }
                 //***************
                 // SY_LFR_N_BP_P0
                 if (flag == LFR_SUCCESSFUL)
                 {
                     result = set_sy_lfr_n_bp_p0( TC, queue_id );
                     if (result != LFR_SUCCESSFUL)
                     {
                         flag = LFR_DEFAULT;
                     }
                 }
                 //***************
                 // sy_lfr_n_bp_p1
                 if (flag == LFR_SUCCESSFUL)
                 {
                     result = set_sy_lfr_n_bp_p1( TC, queue_id );
                     if (result != LFR_SUCCESSFUL)
                     {
                         flag = LFR_DEFAULT;
                     }
                 }
-                return result;
+                return flag;
             }
             int action_load_burst_par(ccsdsTelecommandPacket_t *TC, rtems_id queue_id)
             {
                 /** This function updates the LFR registers with the incoming burst parameters.
                  *
                  * @param TC points to the TeleCommand packet that is being processed
                  * @param queue_id is the id of the queue which handles TM related to this execution step
                  *
                  */
                 int result;
                 unsigned char lfrMode;
                 result = LFR_DEFAULT;
                 lfrMode = (housekeeping_packet.lfr_status_word[0] & 0xf0) >> 4;
                 if ( lfrMode == LFR_MODE_BURST ) {
                     send_tm_lfr_tc_exe_not_executable( TC, queue_id );
                     result = LFR_DEFAULT;
                 }
                 else {
                     parameter_dump_packet.sy_lfr_b_bp_p0 = TC->dataAndCRC[0];
                     parameter_dump_packet.sy_lfr_b_bp_p1 = TC->dataAndCRC[1];
                     result = LFR_SUCCESSFUL;
                 }
                 return result;
             }
             int action_load_sbm1_par(ccsdsTelecommandPacket_t *TC, rtems_id queue_id)
             {
                 /** This function updates the LFR registers with the incoming sbm1 parameters.
                  *
                  * @param TC points to the TeleCommand packet that is being processed
                  * @param queue_id is the id of the queue which handles TM related to this execution step
                  *
                  */
                 int result;
                 unsigned char lfrMode;
                 result = LFR_DEFAULT;
                 lfrMode = (housekeeping_packet.lfr_status_word[0] & 0xf0) >> 4;
                 if ( (lfrMode == LFR_MODE_SBM1) || (lfrMode == LFR_MODE_SBM2) ) {
                     send_tm_lfr_tc_exe_not_executable( TC, queue_id );
                     result = LFR_DEFAULT;
                 }
                 else {
                     parameter_dump_packet.sy_lfr_s1_bp_p0 = TC->dataAndCRC[0];
                     parameter_dump_packet.sy_lfr_s1_bp_p1 = TC->dataAndCRC[1];
                     result = LFR_SUCCESSFUL;
                 }
                 return result;
             }
             int action_load_sbm2_par(ccsdsTelecommandPacket_t *TC, rtems_id queue_id)
             {
                 /** This function updates the LFR registers with the incoming sbm2 parameters.
                  *
                  * @param TC points to the TeleCommand packet that is being processed
                  * @param queue_id is the id of the queue which handles TM related to this execution step
                  *
                  */
                 int result;
                 unsigned char lfrMode;
                 result = LFR_DEFAULT;
                 lfrMode = (housekeeping_packet.lfr_status_word[0] & 0xf0) >> 4;
                 if ( (lfrMode == LFR_MODE_SBM2) || (lfrMode == LFR_MODE_SBM2) ) {
                     send_tm_lfr_tc_exe_not_executable( TC, queue_id );
                     result = LFR_DEFAULT;
                 }
                 else {
                     parameter_dump_packet.sy_lfr_s2_bp_p0 = TC->dataAndCRC[0];
                     parameter_dump_packet.sy_lfr_s2_bp_p1 = TC->dataAndCRC[1];
                     result = LFR_SUCCESSFUL;
                 }
                 return result;
             }
             int action_dump_par( rtems_id queue_id )
             {
                 /** This function dumps the LFR parameters by sending the appropriate TM packet to the dedicated RTEMS message queue.
                  *
                  * @param queue_id is the id of the queue which handles TM related to this execution step.
                  *
                  * @return RTEMS directive status codes:
                  * - RTEMS_SUCCESSFUL - message sent successfully
                  * - RTEMS_INVALID_ID - invalid queue id
                  * - RTEMS_INVALID_SIZE - invalid message size
                  * - RTEMS_INVALID_ADDRESS - buffer is NULL
                  * - RTEMS_UNSATISFIED - out of message buffers
                  * - RTEMS_TOO_MANY - queue s limit has been reached
                  *
                  */
                 int status;
                 // UPDATE TIME
                 increment_seq_counter( parameter_dump_packet.packetSequenceControl );
                 parameter_dump_packet.time[0] = (unsigned char) (time_management_regs->coarse_time>>24);
                 parameter_dump_packet.time[1] = (unsigned char) (time_management_regs->coarse_time>>16);
                 parameter_dump_packet.time[2] = (unsigned char) (time_management_regs->coarse_time>>8);
                 parameter_dump_packet.time[3] = (unsigned char) (time_management_regs->coarse_time);
                 parameter_dump_packet.time[4] = (unsigned char) (time_management_regs->fine_time>>8);
                 parameter_dump_packet.time[5] = (unsigned char) (time_management_regs->fine_time);
                 // SEND DATA
                 status =  rtems_message_queue_send( queue_id, &parameter_dump_packet,
                                                     PACKET_LENGTH_PARAMETER_DUMP + CCSDS_TC_TM_PACKET_OFFSET + CCSDS_PROTOCOLE_EXTRA_BYTES);
                 if (status != RTEMS_SUCCESSFUL) {
                     PRINTF1("in action_dump *** ERR sending packet, code %d", status)
                 }
                 return status;
             }
             //***********************
             // NORMAL MODE PARAMETERS
             int set_sy_lfr_n_swf_l( ccsdsTelecommandPacket_t *TC, rtems_id queue_id )
             {
                 /** This function sets the number of points of a snapshot (sy_lfr_n_swf_l).
                  *
                  * @param TC points to the TeleCommand packet that is being processed
                  * @param queue_id is the id of the queue which handles TM related to this execution step
                  *
                  */
                 unsigned int tmp;
                 int result;
                 unsigned char msb;
                 unsigned char lsb;
                 msb = TC->dataAndCRC[ BYTE_POS_SY_LFR_N_SWF_L ];
                 lsb = TC->dataAndCRC[ BYTE_POS_SY_LFR_N_SWF_L+1 ];
                 tmp = ( unsigned int ) floor(
                             ( ( msb*256 ) + lsb ) / 16
                         ) * 16;
                 if ( (tmp < 16) || (tmp > 2048) )   // the snapshot period is a multiple of 16
                 {                                   // 2048 is the maximum limit due to the size of the buffers
                     send_tm_lfr_tc_exe_inconsistent( TC, queue_id, BYTE_POS_SY_LFR_N_SWF_L+10, lsb );
                     result = WRONG_APP_DATA;
                 }
                 else if (tmp != 2048)
                 {
                     send_tm_lfr_tc_exe_not_implemented( TC, queue_id );
                     result = FUNCT_NOT_IMPL;
                 }
                 else
                 {
                     parameter_dump_packet.sy_lfr_n_swf_l[0] = (unsigned char) (tmp >> 8);
                     parameter_dump_packet.sy_lfr_n_swf_l[1] = (unsigned char) (tmp     );
                     result = LFR_SUCCESSFUL;
                 }
                 return result;
             }
             int set_sy_lfr_n_swf_p( ccsdsTelecommandPacket_t *TC, rtems_id queue_id )
             {
                 /** This function sets the time between two snapshots, in s (sy_lfr_n_swf_p).
                  *
                  * @param TC points to the TeleCommand packet that is being processed
                  * @param queue_id is the id of the queue which handles TM related to this execution step
                  *
                  */
                 unsigned int tmp;
                 int result;
                 unsigned char msb;
                 unsigned char lsb;
                 msb = TC->dataAndCRC[ BYTE_POS_SY_LFR_N_SWF_P ];
                 lsb = TC->dataAndCRC[ BYTE_POS_SY_LFR_N_SWF_P+1 ];
                 tmp = ( unsigned int ) floor(
                             ( ( msb*256 ) + lsb ) / 8
                         ) * 8;
                 if ( (tmp < 16) || (tmp > 65528) )
                 {
                     send_tm_lfr_tc_exe_inconsistent( TC, queue_id, BYTE_POS_SY_LFR_N_SWF_P+10, lsb );
                     result = WRONG_APP_DATA;
                 }
                 else
                 {
                     parameter_dump_packet.sy_lfr_n_swf_p[0] = (unsigned char) (tmp >> 8);
                     parameter_dump_packet.sy_lfr_n_swf_p[1] = (unsigned char) (tmp     );
                     result = LFR_SUCCESSFUL;
                 }
                 return result;
             }
             int set_sy_lfr_n_asm_p( ccsdsTelecommandPacket_t *TC, rtems_id queue_id )
             {
                 /** This function sets the time between two full spectral matrices transmission, in s (SY_LFR_N_ASM_P).
                  *
                  * @param TC points to the TeleCommand packet that is being processed
                  * @param queue_id is the id of the queue which handles TM related to this execution step
                  *
                  */
                 int result;
                 unsigned char msb;
                 unsigned char lsb;
                 msb = TC->dataAndCRC[ BYTE_POS_SY_LFR_N_ASM_P ];
                 lsb = TC->dataAndCRC[ BYTE_POS_SY_LFR_N_ASM_P+1 ];
                 parameter_dump_packet.sy_lfr_n_asm_p[0] = msb;
                 parameter_dump_packet.sy_lfr_n_asm_p[1] = lsb;
                 result = LFR_SUCCESSFUL;
                 return result;
             }
             int set_sy_lfr_n_bp_p0( ccsdsTelecommandPacket_t *TC, rtems_id queue_id )
             {
                 /** This function sets the time between two basic parameter sets, in s (SY_LFR_N_BP_P0).
                  *
                  * @param TC points to the TeleCommand packet that is being processed
                  * @param queue_id is the id of the queue which handles TM related to this execution step
                  *
                  */
                 int status;
                 status = LFR_SUCCESSFUL;
                 parameter_dump_packet.sy_lfr_n_bp_p0 = TC->dataAndCRC[ BYTE_POS_SY_LFR_N_BP_P0 ];
                 return status;
             }
             int set_sy_lfr_n_bp_p1(ccsdsTelecommandPacket_t *TC, rtems_id queue_id)
             {
                 /** This function sets the time between two basic parameter sets (autocorrelation + crosscorrelation), in s (sy_lfr_n_bp_p1).
                  *
                  * @param TC points to the TeleCommand packet that is being processed
                  * @param queue_id is the id of the queue which handles TM related to this execution step
                  *
                  */
                 int status;
                 status = LFR_SUCCESSFUL;
                 parameter_dump_packet.sy_lfr_n_bp_p1 = TC->dataAndCRC[ BYTE_POS_SY_LFR_N_BP_P1 ];
                 return status;
             }
             //**********************
             // BURST MODE PARAMETERS
             //*********************
             // SBM1 MODE PARAMETERS
             //*********************
             // SBM2 MODE PARAMETERS
             //**********
             // init dump
             void init_parameter_dump( void )
             {
                 /** This function initialize the parameter_dump_packet global variable with default values.
                  *
                  */
                 parameter_dump_packet.targetLogicalAddress = CCSDS_DESTINATION_ID;
                 parameter_dump_packet.protocolIdentifier = CCSDS_PROTOCOLE_ID;
                 parameter_dump_packet.reserved = CCSDS_RESERVED;
                 parameter_dump_packet.userApplication = CCSDS_USER_APP;
                 parameter_dump_packet.packetID[0] = (unsigned char) (TM_PACKET_ID_PARAMETER_DUMP >> 8);
                 parameter_dump_packet.packetID[1] = (unsigned char) TM_PACKET_ID_PARAMETER_DUMP;
                 parameter_dump_packet.packetSequenceControl[0] = TM_PACKET_SEQ_CTRL_STANDALONE;
                 parameter_dump_packet.packetSequenceControl[1] = TM_PACKET_SEQ_CNT_DEFAULT;
                 parameter_dump_packet.packetLength[0] = (unsigned char) (PACKET_LENGTH_PARAMETER_DUMP >> 8);
                 parameter_dump_packet.packetLength[1] = (unsigned char) PACKET_LENGTH_PARAMETER_DUMP;
                 // DATA FIELD HEADER
                 parameter_dump_packet.spare1_pusVersion_spare2 = SPARE1_PUSVERSION_SPARE2;
                 parameter_dump_packet.serviceType = TM_TYPE_PARAMETER_DUMP;
                 parameter_dump_packet.serviceSubType = TM_SUBTYPE_PARAMETER_DUMP;
                 parameter_dump_packet.destinationID = TM_DESTINATION_ID_GROUND;
                 parameter_dump_packet.time[0] = (unsigned char) (time_management_regs->coarse_time>>24);
                 parameter_dump_packet.time[1] = (unsigned char) (time_management_regs->coarse_time>>16);
                 parameter_dump_packet.time[2] = (unsigned char) (time_management_regs->coarse_time>>8);
                 parameter_dump_packet.time[3] = (unsigned char) (time_management_regs->coarse_time);
                 parameter_dump_packet.time[4] = (unsigned char) (time_management_regs->fine_time>>8);
                 parameter_dump_packet.time[5] = (unsigned char) (time_management_regs->fine_time);
                 parameter_dump_packet.sid = SID_PARAMETER_DUMP;
                 //******************
                 // COMMON PARAMETERS
                 parameter_dump_packet.unused0 = DEFAULT_SY_LFR_COMMON0;
                 parameter_dump_packet.bw_sp0_sp1_r0_r1 = DEFAULT_SY_LFR_COMMON1;
                 //******************
                 // NORMAL PARAMETERS
                 parameter_dump_packet.sy_lfr_n_swf_l[0] = (unsigned char) (SY_LFR_N_SWF_L >> 8);
                 parameter_dump_packet.sy_lfr_n_swf_l[1] = (unsigned char) (SY_LFR_N_SWF_L     );
                 parameter_dump_packet.sy_lfr_n_swf_p[0] = (unsigned char) (SY_LFR_N_SWF_P >> 8);
                 parameter_dump_packet.sy_lfr_n_swf_p[1] = (unsigned char) (SY_LFR_N_SWF_P     );
                 parameter_dump_packet.sy_lfr_n_asm_p[0] = (unsigned char) (SY_LFR_N_ASM_P >> 8);
                 parameter_dump_packet.sy_lfr_n_asm_p[1] = (unsigned char) (SY_LFR_N_ASM_P     );
                 parameter_dump_packet.sy_lfr_n_bp_p0 = (unsigned char) SY_LFR_N_BP_P0;
                 parameter_dump_packet.sy_lfr_n_bp_p1 = (unsigned char) SY_LFR_N_BP_P1;
                 //*****************
                 // BURST PARAMETERS
                 parameter_dump_packet.sy_lfr_b_bp_p0 = (unsigned char) DEFAULT_SY_LFR_B_BP_P0;
                 parameter_dump_packet.sy_lfr_b_bp_p1 = (unsigned char) DEFAULT_SY_LFR_B_BP_P1;
                 //****************
                 // SBM1 PARAMETERS
                 parameter_dump_packet.sy_lfr_s1_bp_p0 = (unsigned char) DEFAULT_SY_LFR_S1_BP_P0; // min value is 0.25 s for the period
                 parameter_dump_packet.sy_lfr_s1_bp_p1 = (unsigned char) DEFAULT_SY_LFR_S1_BP_P1;
                 //****************
                 // SBM2 PARAMETERS
                 parameter_dump_packet.sy_lfr_s2_bp_p0 = (unsigned char) DEFAULT_SY_LFR_S2_BP_P0;
                 parameter_dump_packet.sy_lfr_s2_bp_p1 = (unsigned char) DEFAULT_SY_LFR_S2_BP_P1;
             }

src/wf_handler.c +2 -2

             /** Functions and tasks related to waveform packet generation.
              *
              * @file
              * @author P. LEROY
              *
              * A group of functions to handle waveforms, in snapshot or continuous format.\n
              *
              */
             #include "wf_handler.h"
             // SWF
             Header_TM_LFR_SCIENCE_SWF_t headerSWF_F0[7];
             Header_TM_LFR_SCIENCE_SWF_t headerSWF_F1[7];
             Header_TM_LFR_SCIENCE_SWF_t headerSWF_F2[7];
             // CWF
             Header_TM_LFR_SCIENCE_CWF_t headerCWF_F1[7];
             Header_TM_LFR_SCIENCE_CWF_t headerCWF_F2_BURST[7];
             Header_TM_LFR_SCIENCE_CWF_t headerCWF_F2_SBM2[7];
             Header_TM_LFR_SCIENCE_CWF_t headerCWF_F3[7];
             Header_TM_LFR_SCIENCE_CWF_t headerCWF_F3_light[7];
             unsigned char doubleSendCWF1 = 0;
             unsigned char doubleSendCWF2 = 0;
             rtems_isr waveforms_isr( rtems_vector_number vector )
             {
                 /** This is the interrupt sub routine called by the waveform picker core.
                  *
                  * This ISR launch different actions depending mainly on two pieces of information:
                  * 1. the values read in the registers of the waveform picker.
                  * 2. the current LFR mode.
                  *
                  */
             #ifdef GSA
             #else
                 if ( (lfrCurrentMode == LFR_MODE_NORMAL)
                      || (lfrCurrentMode == LFR_MODE_SBM1) || (lfrCurrentMode == LFR_MODE_SBM2) )
                 { // in modes other than STANDBY and BURST, send the CWF_F3 data
                     if ((waveform_picker_regs->status & 0x08) == 0x08){     // [1000] f3 is full
                         // (1) change the receiving buffer for the waveform picker
                         if (waveform_picker_regs->addr_data_f3 == (int) wf_cont_f3) {
                             waveform_picker_regs->addr_data_f3 = (int) (wf_cont_f3_bis);
                         }
                         else {
                             waveform_picker_regs->addr_data_f3 = (int) (wf_cont_f3);
                         }
                         // (2) send an event for the waveforms transmission
                         if (rtems_event_send( Task_id[TASKID_CWF3], RTEMS_EVENT_0 ) != RTEMS_SUCCESSFUL) {
                             rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_2 );
                         }
                         waveform_picker_regs->status = waveform_picker_regs->status & 0xfffff777; // reset f3 bits to 0, [1111 0111 0111 0111]
                     }
                 }
             #endif
                 switch(lfrCurrentMode)
                 {
                     //********
                     // STANDBY
                     case(LFR_MODE_STANDBY):
                     break;
                     //******
                     // NORMAL
                     case(LFR_MODE_NORMAL):
             #ifdef GSA
                     PRINTF("in waveform_isr *** unexpected waveform picker interruption\n")
             #else
                     if ( (waveform_picker_regs->burst_enable & 0x7) == 0x0 ){ // if no channel is enable
                         rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_2 );
                     }
                     else {
                         if ( (waveform_picker_regs->status & 0x7) == 0x7 ){ // f2 f1 and f0 are full
                             waveform_picker_regs->burst_enable = waveform_picker_regs->burst_enable & 0x08;
                             if (rtems_event_send( Task_id[TASKID_WFRM], RTEMS_EVENT_MODE_NORMAL ) != RTEMS_SUCCESSFUL) {
                                 rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_2 );
                             }
             //                waveform_picker_regs->status = waveform_picker_regs->status & 0x00;
                             waveform_picker_regs->status = waveform_picker_regs->status & 0xfffff888;
                             waveform_picker_regs->burst_enable = waveform_picker_regs->burst_enable | 0x07; // [0111] enable f2 f1 f0
                         }
                    }
             #endif
                     break;
                     //******
                     // BURST
                     case(LFR_MODE_BURST):
             #ifdef GSA
                     PRINTF("in waveform_isr *** unexpected waveform picker interruption\n")
             #else
                     if ((waveform_picker_regs->status & 0x04) == 0x04){ // [0100] check the f2 full bit
                         // (1) change the receiving buffer for the waveform picker
                         if (waveform_picker_regs->addr_data_f2 == (int) wf_snap_f2) {
                             waveform_picker_regs->addr_data_f2 = (int) (wf_snap_f2_bis);
                         }
                         else {
                             waveform_picker_regs->addr_data_f2 = (int) (wf_snap_f2);
                         }
                         // (2) send an event for the waveforms transmission
                         if (rtems_event_send( Task_id[TASKID_CWF2], RTEMS_EVENT_MODE_BURST ) != RTEMS_SUCCESSFUL) {
                             rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_2 );
                         }
                         waveform_picker_regs->status = waveform_picker_regs->status & 0xfffffbbb; // [1111 1011 1011 1011] f2 bits = 0
                     }
             #endif
                     break;
                     //*****
                     // SBM1
                     case(LFR_MODE_SBM1):
             #ifdef GSA
                     PRINTF("in waveform_isr *** unexpected waveform picker interruption\n")
             #else
                     if ((waveform_picker_regs->status & 0x02) == 0x02){ // [0010] check the f1 full bit
                         // (1) change the receiving buffer for the waveform picker
                         if ( param_local.local_sbm1_nb_cwf_sent == (param_local.local_sbm1_nb_cwf_max-1) )
                         {
                             waveform_picker_regs->addr_data_f1 = (int) (wf_snap_f1_norm);
                         }
                         else if ( waveform_picker_regs->addr_data_f1 == (int) wf_snap_f1_norm )
                         {
                             doubleSendCWF1 = 1;
                             waveform_picker_regs->addr_data_f1 = (int) (wf_snap_f1);
                         }
                         else if ( waveform_picker_regs->addr_data_f1 == (int) wf_snap_f1 ) {
                             waveform_picker_regs->addr_data_f1 = (int) (wf_snap_f1_bis);
                         }
                         else {
                             waveform_picker_regs->addr_data_f1 = (int) (wf_snap_f1);
                         }
                         // (2) send an event for the waveforms transmission
                         if (rtems_event_send( Task_id[TASKID_CWF1], RTEMS_EVENT_MODE_SBM1 ) != RTEMS_SUCCESSFUL) {
                             rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_2 );
                         }
                         waveform_picker_regs->status = waveform_picker_regs->status & 0xfffffddd; // [1111 1101 1101 1101] f1 bit = 0
                     }
                     if ( ( (waveform_picker_regs->status & 0x05) == 0x05 ) ) { // [0101] check the f2 and f0 full bit
                         if (rtems_event_send( Task_id[TASKID_WFRM], RTEMS_EVENT_MODE_NORMAL ) != RTEMS_SUCCESSFUL) {
                             rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_2 );
                         }
                         waveform_picker_regs->status = waveform_picker_regs->status & 0xfffffaaa; // [1111 1010 1010 1010] f2 and f0 bits = 0
                         reset_local_sbm1_nb_cwf_sent();
                     }
             #endif
                     break;
                     //*****
                     // SBM2
                     case(LFR_MODE_SBM2):
             #ifdef GSA
                     PRINTF("in waveform_isr *** unexpected waveform picker interruption\n")
             #else
                     if ((waveform_picker_regs->status & 0x04) == 0x04){ // [0100] check the f2 full bit
                         // (1) change the receiving buffer for the waveform picker
                         if ( param_local.local_sbm2_nb_cwf_sent == (param_local.local_sbm2_nb_cwf_max-1) )
                         {
                             waveform_picker_regs->addr_data_f2 = (int) (wf_snap_f2_norm);
                         }
                         else if ( waveform_picker_regs->addr_data_f2 == (int) wf_snap_f2_norm ) {
                             waveform_picker_regs->addr_data_f2 = (int) (wf_snap_f2);
                             doubleSendCWF2 = 1;
                             if (rtems_event_send( Task_id[TASKID_WFRM], RTEMS_EVENT_MODE_SBM2_WFRM ) != RTEMS_SUCCESSFUL) {
                                 rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_2 );
                             }
                             reset_local_sbm2_nb_cwf_sent();
                         }
                         else if ( waveform_picker_regs->addr_data_f2 == (int) wf_snap_f2 ) {
                             waveform_picker_regs->addr_data_f2 = (int) (wf_snap_f2_bis);
                         }
                         else {
                             waveform_picker_regs->addr_data_f2 = (int) (wf_snap_f2);
                         }
                         // (2) send an event for the waveforms transmission
                         if (rtems_event_send( Task_id[TASKID_CWF2], RTEMS_EVENT_MODE_SBM2 ) != RTEMS_SUCCESSFUL) {
                             rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_2 );
                         }
                         waveform_picker_regs->status = waveform_picker_regs->status & 0xfffffbbb; // [1111 1011 1011 1011] f2 bit = 0
                     }
                     if ( ( (waveform_picker_regs->status & 0x03) == 0x03 ) ) { // [0011] f3 f2 f1 f0, f1 and f0 are full
                         if (rtems_event_send( Task_id[TASKID_WFRM], RTEMS_EVENT_MODE_SBM2 ) != RTEMS_SUCCESSFUL) {
                             rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_2 );
                         }
                         waveform_picker_regs->status = waveform_picker_regs->status & 0xfffffccc; // [1111 1100 1100 1100] f1, f0 bits = 0
                     }
             #endif
                     break;
                     //********
                     // DEFAULT
                     default:
                     break;
                 }
             }
             rtems_isr waveforms_simulator_isr( rtems_vector_number vector )
             {
                 /** This is the interrupt sub routine called by the waveform picker simulator.
                  *
                  * This ISR is for debug purpose only.
                  *
                  */
                 unsigned char lfrMode;
                 lfrMode = (housekeeping_packet.lfr_status_word[0] & 0xf0) >> 4;
                 switch(lfrMode) {
                 case (LFR_MODE_STANDBY):
                     break;
                 case (LFR_MODE_NORMAL):
                     if (rtems_event_send( Task_id[TASKID_WFRM], RTEMS_EVENT_MODE_NORMAL ) != RTEMS_SUCCESSFUL) {
                         rtems_event_send( Task_id[TASKID_DUMB], RTEMS_EVENT_5 );
                     }
                     break;
                 case (LFR_MODE_BURST):
                     break;
                 case (LFR_MODE_SBM1):
                     break;
                 case (LFR_MODE_SBM2):
                     break;
                 }
             }
             rtems_task wfrm_task(rtems_task_argument argument) //used with the waveform picker VHDL IP
             {
                 /** This RTEMS task is dedicated to the transmission of snapshots of the NORMAL mode.
                  *
                  * @param unused is the starting argument of the RTEMS task
                  *
                  * The following data packets are sent by this task:
                  * - TM_LFR_SCIENCE_NORMAL_SWF_F0
                  * - TM_LFR_SCIENCE_NORMAL_SWF_F1
                  * - TM_LFR_SCIENCE_NORMAL_SWF_F2
                  *
                  */
                 rtems_event_set event_out;
                 rtems_id queue_id;
                 init_header_snapshot_wf_table( SID_NORM_SWF_F0, headerSWF_F0 );
                 init_header_snapshot_wf_table( SID_NORM_SWF_F1, headerSWF_F1 );
                 init_header_snapshot_wf_table( SID_NORM_SWF_F2, headerSWF_F2 );
                 init_waveforms();
                 queue_id = get_pkts_queue_id();
                 BOOT_PRINTF("in WFRM ***\n")
                 while(1){
                     // wait for an RTEMS_EVENT
                     rtems_event_receive(RTEMS_EVENT_MODE_NORMAL | RTEMS_EVENT_MODE_SBM1
                                         | RTEMS_EVENT_MODE_SBM2 | RTEMS_EVENT_MODE_SBM2_WFRM,
                                         RTEMS_WAIT | RTEMS_EVENT_ANY, RTEMS_NO_TIMEOUT, &event_out);
                     if (event_out == RTEMS_EVENT_MODE_NORMAL)
                     {
                         send_waveform_SWF(wf_snap_f0, SID_NORM_SWF_F0, headerSWF_F0, queue_id);
                         send_waveform_SWF(wf_snap_f1, SID_NORM_SWF_F1, headerSWF_F1, queue_id);
                         send_waveform_SWF(wf_snap_f2, SID_NORM_SWF_F2, headerSWF_F2, queue_id);
             #ifdef GSA
                         waveform_picker_regs->status = waveform_picker_regs->status & 0xf888; // [1111 1000 1000 1000] f2, f1, f0 bits =0
             #endif
                     }
                     else if (event_out == RTEMS_EVENT_MODE_SBM1)
                     {
                         send_waveform_SWF(wf_snap_f0, SID_NORM_SWF_F0, headerSWF_F0, queue_id);
                         send_waveform_SWF(wf_snap_f1_norm, SID_NORM_SWF_F1, headerSWF_F1, queue_id);
                         send_waveform_SWF(wf_snap_f2, SID_NORM_SWF_F2, headerSWF_F2, queue_id);
             #ifdef GSA
                         waveform_picker_regs->status = waveform_picker_regs->status & 0xfffffaaa; // [1111 1010 1010 1010] f2, f0 bits = 0
             #endif
                     }
                     else if (event_out == RTEMS_EVENT_MODE_SBM2)
                     {
                         send_waveform_SWF(wf_snap_f0, SID_NORM_SWF_F0, headerSWF_F0, queue_id);
                         send_waveform_SWF(wf_snap_f1, SID_NORM_SWF_F1, headerSWF_F1, queue_id);
             #ifdef GSA
                         waveform_picker_regs->status = waveform_picker_regs->status & 0xfffffccc; // [1111 1100 1100 1100] f1, f0 bits = 0
             #endif
                     }
                     else if (event_out == RTEMS_EVENT_MODE_SBM2_WFRM)
                     {
                         send_waveform_SWF(wf_snap_f2_norm, SID_NORM_SWF_F2, headerSWF_F2, queue_id);
                     }
                     else
                     {
                         PRINTF("in WFRM *** unexpected event")
                     }
             #ifdef GSA
                     // irq processed, reset the related register of the timer unit
                     gptimer_regs->timer[TIMER_WF_SIMULATOR].ctrl = gptimer_regs->timer[TIMER_WF_SIMULATOR].ctrl | 0x00000010;
                     // clear the interruption
                     LEON_Unmask_interrupt( IRQ_WF );
             #endif
                 }
             }
             rtems_task cwf3_task(rtems_task_argument argument) //used with the waveform picker VHDL IP
             {
                 /** This RTEMS task is dedicated to the transmission of continuous waveforms at f3.
                  *
                  * @param unused is the starting argument of the RTEMS task
                  *
                  * The following data packet is sent by this task:
                  * - TM_LFR_SCIENCE_NORMAL_CWF_F3
                  *
                  */
                 rtems_event_set event_out;
                 rtems_id queue_id;
                 init_header_continuous_wf_table( SID_NORM_CWF_F3, headerCWF_F3 );
                 init_header_continuous_wf3_light_table( headerCWF_F3_light );
                 queue_id = get_pkts_queue_id();
                 BOOT_PRINTF("in CWF3 ***\n")
                 while(1){
                     // wait for an RTEMS_EVENT
                     rtems_event_receive( RTEMS_EVENT_0,
                                         RTEMS_WAIT | RTEMS_EVENT_ANY, RTEMS_NO_TIMEOUT, &event_out);
                     PRINTF("send CWF F3 \n")
             #ifdef GSA
             #else
                     if (waveform_picker_regs->addr_data_f3 == (int) wf_cont_f3) {
                         send_waveform_CWF3_light( wf_cont_f3_bis, headerCWF_F3_light, queue_id );
                     }
                     else {
                         send_waveform_CWF3_light( wf_cont_f3, headerCWF_F3_light, queue_id );
                     }
             #endif
                 }
             }
             rtems_task cwf2_task(rtems_task_argument argument)  // ONLY USED IN BURST AND SBM2
             {
                 /** This RTEMS task is dedicated to the transmission of continuous waveforms at f2.
                  *
                  * @param unused is the starting argument of the RTEMS task
                  *
                  * The following data packet is sent by this function:
                  * - TM_LFR_SCIENCE_BURST_CWF_F2
                  * - TM_LFR_SCIENCE_SBM2_CWF_F2
                  *
                  */
                 rtems_event_set event_out;
                 rtems_id queue_id;
                 init_header_continuous_wf_table( SID_BURST_CWF_F2, headerCWF_F2_BURST );
                 init_header_continuous_wf_table( SID_SBM2_CWF_F2, headerCWF_F2_SBM2 );
                 queue_id = get_pkts_queue_id();
                 BOOT_PRINTF("in CWF2 ***\n")
                 while(1){
                     // wait for an RTEMS_EVENT
                     rtems_event_receive( RTEMS_EVENT_MODE_BURST | RTEMS_EVENT_MODE_SBM2,
                                         RTEMS_WAIT | RTEMS_EVENT_ANY, RTEMS_NO_TIMEOUT, &event_out);
                     if (event_out == RTEMS_EVENT_MODE_BURST)
                     {
                         // F2
             #ifdef GSA
             #else
                         if (waveform_picker_regs->addr_data_f2 == (int) wf_snap_f2) {
                             send_waveform_CWF( wf_snap_f2_bis, SID_BURST_CWF_F2, headerCWF_F2_BURST, queue_id );
                         }
                         else {
                             send_waveform_CWF( wf_snap_f2, SID_BURST_CWF_F2, headerCWF_F2_BURST, queue_id );
                         }
                     #endif
                     }
                     else if (event_out == RTEMS_EVENT_MODE_SBM2)
                     {
             #ifdef GSA
             #else
                         if (doubleSendCWF2 == 1)
                         {
                             doubleSendCWF2 = 0;
                             send_waveform_CWF( wf_snap_f2_norm, SID_SBM2_CWF_F2, headerCWF_F2_SBM2, queue_id );
                         }
                         else if (waveform_picker_regs->addr_data_f2 == (int) wf_snap_f2) {
                             send_waveform_CWF( wf_snap_f2_bis, SID_SBM2_CWF_F2, headerCWF_F2_SBM2, queue_id );
                         }
                         else {
                             send_waveform_CWF( wf_snap_f2, SID_SBM2_CWF_F2, headerCWF_F2_SBM2, queue_id );
                         }
                         param_local.local_sbm2_nb_cwf_sent ++;
             #endif
                     }
                     else
                     {
                         PRINTF1("in CWF2 *** ERR mode = %d\n", lfrCurrentMode)
                     }
                 }
             }
             rtems_task cwf1_task(rtems_task_argument argument)  // ONLY USED IN SBM1
             {
                 /** This RTEMS task is dedicated to the transmission of continuous waveforms at f1.
                  *
                  * @param unused is the starting argument of the RTEMS task
                  *
                  * The following data packet is sent by this function:
                  * - TM_LFR_SCIENCE_SBM1_CWF_F1
                  *
                  */
                 rtems_event_set event_out;
                 rtems_id queue_id;
                 init_header_continuous_wf_table( SID_SBM1_CWF_F1, headerCWF_F1 );
                 queue_id = get_pkts_queue_id();
                 BOOT_PRINTF("in CWF1 ***\n")
                 while(1){
                     // wait for an RTEMS_EVENT
                     rtems_event_receive( RTEMS_EVENT_MODE_SBM1,
                                         RTEMS_WAIT | RTEMS_EVENT_ANY, RTEMS_NO_TIMEOUT, &event_out);
                     if (event_out == RTEMS_EVENT_MODE_SBM1)
                     {
             #ifdef GSA
             #else
                         if (doubleSendCWF1 == 1)
                         {
                             doubleSendCWF1 = 0;
                             send_waveform_CWF( wf_snap_f1_norm, SID_SBM1_CWF_F1, headerCWF_F1, queue_id );
                         }
                         else if (waveform_picker_regs->addr_data_f1 == (int) wf_snap_f1) {
                            send_waveform_CWF( wf_snap_f1_bis, SID_SBM1_CWF_F1, headerCWF_F1, queue_id );
                         }
                         else {
                             send_waveform_CWF( wf_snap_f1, SID_SBM1_CWF_F1, headerCWF_F1, queue_id );
                         }
                         param_local.local_sbm1_nb_cwf_sent ++;
             #endif
                     }
                     else
                     {
                         PRINTF1("in CWF1 *** ERR mode = %d\n", lfrCurrentMode)
                     }
                 }
             }
             //******************
             // general functions
             void init_waveforms( void )
             {
                 int i = 0;
                 for (i=0; i< NB_SAMPLES_PER_SNAPSHOT; i++)
                 {
                     //***
                     // F0
                     wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET ] = 0x88887777;     //
                     wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET  ] = 0x22221111;    //
                     wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET  ] = 0x44443333;    //
                     //***
                     // F1
                     wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET  ] = 0x22221111;
                     wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET  ] = 0x44443333;
                     wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET  ] = 0xaaaa0000;
                     //***
                     // F2
                     wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET  ] = 0x44443333;
                     wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET  ] = 0x22221111;
                     wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET  ] = 0xaaaa0000;
                     //***
                     // F3
                     //wf_cont_f3[ (i* NB_WORDS_SWF_BLK) + 0 ] = val1;
                     //wf_cont_f3[ (i* NB_WORDS_SWF_BLK) + 1 ] = val2;
                     //wf_cont_f3[ (i* NB_WORDS_SWF_BLK) + 2 ] = 0xaaaa0000;
                 }
             }
             int init_header_snapshot_wf_table( unsigned int sid, Header_TM_LFR_SCIENCE_SWF_t *headerSWF)
             {
                 unsigned char i;
                 for (i=0; i<7; i++)
                 {
                     headerSWF[ i ].targetLogicalAddress = CCSDS_DESTINATION_ID;
                     headerSWF[ i ].protocolIdentifier = CCSDS_PROTOCOLE_ID;
                     headerSWF[ i ].reserved = DEFAULT_RESERVED;
                     headerSWF[ i ].userApplication = CCSDS_USER_APP;
                     headerSWF[ i ].packetID[0] = (unsigned char) (TM_PACKET_ID_SCIENCE_NORMAL_BURST >> 8);
                     headerSWF[ i ].packetID[1] = (unsigned char) (TM_PACKET_ID_SCIENCE_NORMAL_BURST);
                     if (i == 0)
                     {
                         headerSWF[ i ].packetSequenceControl[0] = TM_PACKET_SEQ_CTRL_FIRST;
                         headerSWF[ i ].packetLength[0] = (unsigned char) (TM_LEN_SCI_SWF_340 >> 8);
                         headerSWF[ i ].packetLength[1] = (unsigned char) (TM_LEN_SCI_SWF_340     );
                         headerSWF[ i ].blkNr[0] = (unsigned char) (BLK_NR_340 >> 8);
                         headerSWF[ i ].blkNr[1] = (unsigned char) (BLK_NR_340     );
                     }
                     else if (i == 6)
                     {
                         headerSWF[ i ].packetSequenceControl[0] = TM_PACKET_SEQ_CTRL_LAST;
                         headerSWF[ i ].packetLength[0] = (unsigned char) (TM_LEN_SCI_SWF_8 >> 8);
                         headerSWF[ i ].packetLength[1] = (unsigned char) (TM_LEN_SCI_SWF_8     );
                         headerSWF[ i ].blkNr[0] = (unsigned char) (BLK_NR_8 >> 8);
                         headerSWF[ i ].blkNr[1] = (unsigned char) (BLK_NR_8     );
                     }
                     else
                     {
                         headerSWF[ i ].packetSequenceControl[0] = TM_PACKET_SEQ_CTRL_CONTINUATION;
                         headerSWF[ i ].packetLength[0] = (unsigned char) (TM_LEN_SCI_SWF_340 >> 8);
                         headerSWF[ i ].packetLength[1] = (unsigned char) (TM_LEN_SCI_SWF_340     );
                         headerSWF[ i ].blkNr[0] = (unsigned char) (BLK_NR_340 >> 8);
                         headerSWF[ i ].blkNr[1] = (unsigned char) (BLK_NR_340     );
                     }
                     headerSWF[ i ].packetSequenceControl[1] = TM_PACKET_SEQ_CNT_DEFAULT;
                     headerSWF[ i ].pktCnt = DEFAULT_PKTCNT;  // PKT_CNT
                     headerSWF[ i ].pktNr = i+1;    // PKT_NR
                     // DATA FIELD HEADER
                     headerSWF[ i ].spare1_pusVersion_spare2 = DEFAULT_SPARE1_PUSVERSION_SPARE2;
                     headerSWF[ i ].serviceType = TM_TYPE_LFR_SCIENCE; // service type
                     headerSWF[ i ].serviceSubType = TM_SUBTYPE_LFR_SCIENCE; // service subtype
                     headerSWF[ i ].destinationID = TM_DESTINATION_ID_GROUND;
                     // AUXILIARY DATA HEADER
                     headerSWF[ i ].time[0] = 0x00;
                     headerSWF[ i ].time[0] = 0x00;
                     headerSWF[ i ].time[0] = 0x00;
                     headerSWF[ i ].time[0] = 0x00;
                     headerSWF[ i ].time[0] = 0x00;
                     headerSWF[ i ].time[0] = 0x00;
                     headerSWF[ i ].sid = sid;
                     headerSWF[ i ].hkBIA = DEFAULT_HKBIA;
                 }
                 return LFR_SUCCESSFUL;
             }
             int init_header_continuous_wf_table( unsigned int sid, Header_TM_LFR_SCIENCE_CWF_t *headerCWF )
             {
                 unsigned int i;
                 for (i=0; i<7; i++)
                 {
                     headerCWF[ i ].targetLogicalAddress = CCSDS_DESTINATION_ID;
                     headerCWF[ i ].protocolIdentifier = CCSDS_PROTOCOLE_ID;
                     headerCWF[ i ].reserved = DEFAULT_RESERVED;
                     headerCWF[ i ].userApplication = CCSDS_USER_APP;
                     if ( (sid == SID_SBM1_CWF_F1) || (sid == SID_SBM2_CWF_F2) )
                     {
                         headerCWF[ i ].packetID[0] = (unsigned char) (TM_PACKET_ID_SCIENCE_SBM1_SBM2 >> 8);
                         headerCWF[ i ].packetID[1] = (unsigned char) (TM_PACKET_ID_SCIENCE_SBM1_SBM2);
                     }
                     else
                     {
                         headerCWF[ i ].packetID[0] = (unsigned char) (TM_PACKET_ID_SCIENCE_NORMAL_BURST >> 8);
                         headerCWF[ i ].packetID[1] = (unsigned char) (TM_PACKET_ID_SCIENCE_NORMAL_BURST);
                     }
                     if (i == 0)
                     {
                         headerCWF[ i ].packetSequenceControl[0] = TM_PACKET_SEQ_CTRL_FIRST;
                         headerCWF[ i ].packetLength[0] = (unsigned char) (TM_LEN_SCI_CWF_340 >> 8);
                         headerCWF[ i ].packetLength[1] = (unsigned char) (TM_LEN_SCI_CWF_340     );
                         headerCWF[ i ].blkNr[0] = (unsigned char) (BLK_NR_340 >> 8);
                         headerCWF[ i ].blkNr[1] = (unsigned char) (BLK_NR_340     );
                     }
                     else if (i == 6)
                     {
                         headerCWF[ i ].packetSequenceControl[0] = TM_PACKET_SEQ_CTRL_LAST;
                         headerCWF[ i ].packetLength[0] = (unsigned char) (TM_LEN_SCI_CWF_8 >> 8);
                         headerCWF[ i ].packetLength[1] = (unsigned char) (TM_LEN_SCI_CWF_8     );
                         headerCWF[ i ].blkNr[0] = (unsigned char) (BLK_NR_8 >> 8);
                         headerCWF[ i ].blkNr[1] = (unsigned char) (BLK_NR_8     );
                     }
                     else
                     {
                         headerCWF[ i ].packetSequenceControl[0] = TM_PACKET_SEQ_CTRL_CONTINUATION;
                         headerCWF[ i ].packetLength[0] = (unsigned char) (TM_LEN_SCI_CWF_340 >> 8);
                         headerCWF[ i ].packetLength[1] = (unsigned char) (TM_LEN_SCI_CWF_340     );
                         headerCWF[ i ].blkNr[0] = (unsigned char) (BLK_NR_340 >> 8);
                         headerCWF[ i ].blkNr[1] = (unsigned char) (BLK_NR_340     );
                     }
                     headerCWF[ i ].packetSequenceControl[1] = TM_PACKET_SEQ_CNT_DEFAULT;
                     // PKT_CNT
                     // PKT_NR
                     // DATA FIELD HEADER
                     headerCWF[ i ].spare1_pusVersion_spare2 = DEFAULT_SPARE1_PUSVERSION_SPARE2;
                     headerCWF[ i ].serviceType = TM_TYPE_LFR_SCIENCE; // service type
                     headerCWF[ i ].serviceSubType = TM_SUBTYPE_LFR_SCIENCE; // service subtype
                     headerCWF[ i ].destinationID = TM_DESTINATION_ID_GROUND;
                     // AUXILIARY DATA HEADER
                     headerCWF[ i ].sid = sid;
                     headerCWF[ i ].hkBIA = DEFAULT_HKBIA;
                     headerCWF[ i ].time[0] = 0x00;
                     headerCWF[ i ].time[0] = 0x00;
                     headerCWF[ i ].time[0] = 0x00;
                     headerCWF[ i ].time[0] = 0x00;
                     headerCWF[ i ].time[0] = 0x00;
                     headerCWF[ i ].time[0] = 0x00;
                 }
                 return LFR_SUCCESSFUL;
             }
             int init_header_continuous_wf3_light_table( Header_TM_LFR_SCIENCE_CWF_t *headerCWF )
             {
                 unsigned int i;
                 for (i=0; i<7; i++)
                 {
                     headerCWF[ i ].targetLogicalAddress = CCSDS_DESTINATION_ID;
                     headerCWF[ i ].protocolIdentifier = CCSDS_PROTOCOLE_ID;
                     headerCWF[ i ].reserved = DEFAULT_RESERVED;
                     headerCWF[ i ].userApplication = CCSDS_USER_APP;
                     headerCWF[ i ].packetID[0] = (unsigned char) (TM_PACKET_ID_SCIENCE_NORMAL_BURST >> 8);
                     headerCWF[ i ].packetID[1] = (unsigned char) (TM_PACKET_ID_SCIENCE_NORMAL_BURST);
                     if (i == 0)
                     {
                         headerCWF[ i ].packetSequenceControl[0] = TM_PACKET_SEQ_CTRL_FIRST;
                         headerCWF[ i ].packetLength[0] = (unsigned char) (TM_LEN_SCI_CWF3_LIGHT_340 >> 8);
                         headerCWF[ i ].packetLength[1] = (unsigned char) (TM_LEN_SCI_CWF3_LIGHT_340     );
                         headerCWF[ i ].blkNr[0] = (unsigned char) (BLK_NR_340 >> 8);
                         headerCWF[ i ].blkNr[1] = (unsigned char) (BLK_NR_340     );
                     }
                     else if (i == 6)
                     {
                         headerCWF[ i ].packetSequenceControl[0] = TM_PACKET_SEQ_CTRL_LAST;
                         headerCWF[ i ].packetLength[0] = (unsigned char) (TM_LEN_SCI_CWF3_LIGHT_8 >> 8);
                         headerCWF[ i ].packetLength[1] = (unsigned char) (TM_LEN_SCI_CWF3_LIGHT_8     );
                         headerCWF[ i ].blkNr[0] = (unsigned char) (BLK_NR_8 >> 8);
                         headerCWF[ i ].blkNr[1] = (unsigned char) (BLK_NR_8     );
                     }
                     else
                     {
                         headerCWF[ i ].packetSequenceControl[0] = TM_PACKET_SEQ_CTRL_CONTINUATION;
                         headerCWF[ i ].packetLength[0] = (unsigned char) (TM_LEN_SCI_CWF3_LIGHT_340 >> 8);
                         headerCWF[ i ].packetLength[1] = (unsigned char) (TM_LEN_SCI_CWF3_LIGHT_340     );
                         headerCWF[ i ].blkNr[0] = (unsigned char) (BLK_NR_340 >> 8);
                         headerCWF[ i ].blkNr[1] = (unsigned char) (BLK_NR_340     );
                     }
                     headerCWF[ i ].packetSequenceControl[1] = TM_PACKET_SEQ_CNT_DEFAULT;
                     // DATA FIELD HEADER
                     headerCWF[ i ].spare1_pusVersion_spare2 = DEFAULT_SPARE1_PUSVERSION_SPARE2;
                     headerCWF[ i ].serviceType = TM_TYPE_LFR_SCIENCE; // service type
                     headerCWF[ i ].serviceSubType = TM_SUBTYPE_LFR_SCIENCE; // service subtype
                     headerCWF[ i ].destinationID = TM_DESTINATION_ID_GROUND;
                     // AUXILIARY DATA HEADER
                     headerCWF[ i ].sid = SID_NORM_CWF_F3;
                     headerCWF[ i ].hkBIA = DEFAULT_HKBIA;
                     headerCWF[ i ].time[0] = 0x00;
                     headerCWF[ i ].time[0] = 0x00;
                     headerCWF[ i ].time[0] = 0x00;
                     headerCWF[ i ].time[0] = 0x00;
                     headerCWF[ i ].time[0] = 0x00;
                     headerCWF[ i ].time[0] = 0x00;
                 }
                 return LFR_SUCCESSFUL;
             }
             void reset_waveforms( void )
             {
                 int i = 0;
                 for (i=0; i< NB_SAMPLES_PER_SNAPSHOT; i++)
                 {
                     wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET] = 0x10002000;
                     wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET] = 0x20001000;
                     wf_snap_f0[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET] = 0x40008000;
                     //***
                     // F1
                     wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET] = 0x1000f000;
                     wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET] = 0xf0001000;
                     wf_snap_f1[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET] = 0x40008000;
                     //***
                     // F2
                     wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 0 + TIME_OFFSET] = 0x40008000;
                     wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 1 + TIME_OFFSET] = 0x20001000;
                     wf_snap_f2[ (i* NB_WORDS_SWF_BLK) + 2 + TIME_OFFSET] = 0x10002000;
                     //***
                     // F3
                     /*wf_cont_f3[ i* NB_WORDS_SWF_BLK + 0 ] = build_value(   i, i );   // v  and 1
                     wf_cont_f3[ i* NB_WORDS_SWF_BLK + 1 ] = build_value(   i, i );   // e2 and b1
                     wf_cont_f3[ i* NB_WORDS_SWF_BLK + 2 ] = build_value(   i, i );   // b2 and b3*/
                 }
             }
             int send_waveform_SWF( volatile int *waveform, unsigned int sid,
                                    Header_TM_LFR_SCIENCE_SWF_t *headerSWF, rtems_id queue_id )
             {
                 /** This function sends SWF CCSDS packets (F2, F1 or F0).
                  *
                  * @param waveform points to the buffer containing the data that will be send.
                  * @param sid is the source identifier of the data that will be sent.
                  * @param headerSWF points to a table of headers that have been prepared for the data transmission.
                  * @param queue_id is the id of the rtems queue to which spw_ioctl_pkt_send structures will be send. The structures
                  * contain information to setup the transmission of the data packets.
                  *
                  * One group of 2048 samples is sent as 7 consecutive packets, 6 packets containing 340 blocks and 8 packets containing 8 blocks.
                  *
                  */
                 unsigned int i;
                 int ret;
                 rtems_status_code status;
                 spw_ioctl_pkt_send spw_ioctl_send_SWF;
                 spw_ioctl_send_SWF.hlen = TM_HEADER_LEN + 4 + 12; // + 4 is for the protocole extra header, + 12 is for the auxiliary header
                 spw_ioctl_send_SWF.options = 0;
                 ret = LFR_DEFAULT;
                 for (i=0; i<7; i++) // send waveform
                 {
                     spw_ioctl_send_SWF.data = (char*) &waveform[ (i * 340 * NB_WORDS_SWF_BLK) ];
                     spw_ioctl_send_SWF.hdr = (char*) &headerSWF[ i ];
                     // BUILD THE DATA
                     if (i==6) {
                         spw_ioctl_send_SWF.dlen = 8 * NB_BYTES_SWF_BLK;
                     }
                     else {
                         spw_ioctl_send_SWF.dlen = 340 * NB_BYTES_SWF_BLK;
                     }
                     // SET PACKET SEQUENCE COUNTER
                     increment_seq_counter_source_id( headerSWF[ i ].packetSequenceControl, sid );
                     // SET PACKET TIME
                     headerSWF[ i ].acquisitionTime[0] = (unsigned char) (time_management_regs->coarse_time>>24);
                     headerSWF[ i ].acquisitionTime[1] = (unsigned char) (time_management_regs->coarse_time>>16);
                     headerSWF[ i ].acquisitionTime[2] = (unsigned char) (time_management_regs->coarse_time>>8);
                     headerSWF[ i ].acquisitionTime[3] = (unsigned char) (time_management_regs->coarse_time);
                     headerSWF[ i ].acquisitionTime[4] = (unsigned char) (time_management_regs->fine_time>>8);
                     headerSWF[ i ].acquisitionTime[5] = (unsigned char) (time_management_regs->fine_time);
                     headerSWF[ i ].time[0] = (unsigned char) (time_management_regs->coarse_time>>24);
                     headerSWF[ i ].time[1] = (unsigned char) (time_management_regs->coarse_time>>16);
                     headerSWF[ i ].time[2] = (unsigned char) (time_management_regs->coarse_time>>8);
                     headerSWF[ i ].time[3] = (unsigned char) (time_management_regs->coarse_time);
                     headerSWF[ i ].time[4] = (unsigned char) (time_management_regs->fine_time>>8);
                     headerSWF[ i ].time[5] = (unsigned char) (time_management_regs->fine_time);
                     // SEND PACKET
                     status =  rtems_message_queue_send( queue_id, &spw_ioctl_send_SWF, ACTION_MSG_SPW_IOCTL_SEND_SIZE);
                     if (status != RTEMS_SUCCESSFUL) {
                         printf("%d-%d, ERR %d\n", sid, i, (int) status);
                         ret = LFR_DEFAULT;
                     }
                     rtems_task_wake_after(TIME_BETWEEN_TWO_SWF_PACKETS);  // 300 ms between each packet => 7 * 3 = 21 packets => 6.3 seconds
                 }
                 return ret;
             }
             int send_waveform_CWF(volatile int *waveform, unsigned int sid,
                                   Header_TM_LFR_SCIENCE_CWF_t *headerCWF, rtems_id queue_id)
             {
                 /** This function sends CWF CCSDS packets (F2, F1 or F0).
                  *
                  * @param waveform points to the buffer containing the data that will be send.
                  * @param sid is the source identifier of the data that will be sent.
                  * @param headerCWF points to a table of headers that have been prepared for the data transmission.
                  * @param queue_id is the id of the rtems queue to which spw_ioctl_pkt_send structures will be send. The structures
                  * contain information to setup the transmission of the data packets.
                  *
                  * One group of 2048 samples is sent as 7 consecutive packets, 6 packets containing 340 blocks and 8 packets containing 8 blocks.
                  *
                  */
                 unsigned int i;
                 int ret;
                 rtems_status_code status;
                 spw_ioctl_pkt_send spw_ioctl_send_CWF;
                 spw_ioctl_send_CWF.hlen = TM_HEADER_LEN + 4 + 10; // + 4 is for the protocole extra header, + 10 is for the auxiliary header
                 spw_ioctl_send_CWF.options = 0;
                 ret = LFR_DEFAULT;
                 for (i=0; i<7; i++) // send waveform
                 {
                     int coarseTime = 0x00;
                     int fineTime = 0x00;
                     spw_ioctl_send_CWF.data = (char*) &waveform[ (i * 340 * NB_WORDS_SWF_BLK) ];
                     spw_ioctl_send_CWF.hdr = (char*) &headerCWF[ i ];
                     // BUILD THE DATA
                     if (i==6) {
                         spw_ioctl_send_CWF.dlen = 8 * NB_BYTES_SWF_BLK;
                     }
                     else {
                         spw_ioctl_send_CWF.dlen = 340 * NB_BYTES_SWF_BLK;
                     }
                     // SET PACKET SEQUENCE COUNTER
                     increment_seq_counter_source_id( headerCWF[ i ].packetSequenceControl, sid );
                     // SET PACKET TIME
                     coarseTime = time_management_regs->coarse_time;
                     fineTime = time_management_regs->fine_time;
                     headerCWF[ i ].acquisitionTime[0] = (unsigned char) (coarseTime>>24);
                     headerCWF[ i ].acquisitionTime[1] = (unsigned char) (coarseTime>>16);
                     headerCWF[ i ].acquisitionTime[2] = (unsigned char) (coarseTime>>8);
                     headerCWF[ i ].acquisitionTime[3] = (unsigned char) (coarseTime);
                     headerCWF[ i ].acquisitionTime[4] = (unsigned char) (fineTime>>8);
                     headerCWF[ i ].acquisitionTime[5] = (unsigned char) (fineTime);
                     headerCWF[ i ].time[0] = (unsigned char) (coarseTime>>24);
                     headerCWF[ i ].time[1] = (unsigned char) (coarseTime>>16);
                     headerCWF[ i ].time[2] = (unsigned char) (coarseTime>>8);
                     headerCWF[ i ].time[3] = (unsigned char) (coarseTime);
                     headerCWF[ i ].time[4] = (unsigned char) (fineTime>>8);
                     headerCWF[ i ].time[5] = (unsigned char) (fineTime);
                     // SEND PACKET
                     if (sid == SID_NORM_CWF_F3)
                     {
                         status =  rtems_message_queue_send( queue_id, &spw_ioctl_send_CWF, sizeof(spw_ioctl_send_CWF));
                         if (status != RTEMS_SUCCESSFUL) {
                             printf("%d-%d, ERR %d\n", sid, i, (int) status);
                             ret = LFR_DEFAULT;
                         }
                         rtems_task_wake_after(TIME_BETWEEN_TWO_CWF3_PACKETS);
                     }
                     else
                     {
                         status =  rtems_message_queue_send( queue_id, &spw_ioctl_send_CWF, sizeof(spw_ioctl_send_CWF));
                         if (status != RTEMS_SUCCESSFUL) {
                             printf("%d-%d, ERR %d\n", sid, i, (int) status);
                             ret = LFR_DEFAULT;
                         }
                     }
                 }
                 return ret;
             }
             int send_waveform_CWF3_light(volatile int *waveform, Header_TM_LFR_SCIENCE_CWF_t *headerCWF, rtems_id queue_id)
             {
                 /** This function sends CWF_F3 CCSDS packets without the b1, b2 and b3 data.
                  *
                  * @param waveform points to the buffer containing the data that will be send.
                  * @param headerCWF points to a table of headers that have been prepared for the data transmission.
                  * @param queue_id is the id of the rtems queue to which spw_ioctl_pkt_send structures will be send. The structures
                  * contain information to setup the transmission of the data packets.
                  *
                  * By default, CWF_F3 packet are send without the b1, b2 and b3 data. This function rebuilds a data buffer
                  * from the incoming data and sends it in 7 packets, 6 containing 340 blocks and 1 one containing 8 blocks.
                  *
                  */
                 unsigned int i;
                 int ret;
                 rtems_status_code status;
                 spw_ioctl_pkt_send spw_ioctl_send_CWF;
                 char *sample;
                 spw_ioctl_send_CWF.hlen = TM_HEADER_LEN + 4 + 10; // + 4 is for the protocole extra header, + 10 is for the auxiliary header
                 spw_ioctl_send_CWF.options = 0;
                 ret = LFR_DEFAULT;
                 //**********************
                 // BUILD CWF3_light DATA
                 for ( i=0; i< 2048; i++)
                 {
                     sample = (char*) &waveform[ i * NB_WORDS_SWF_BLK ];
                     wf_cont_f3_light[ (i * NB_BYTES_CWF3_LIGHT_BLK)     ] = sample[ 0 ];
                     wf_cont_f3_light[ (i * NB_BYTES_CWF3_LIGHT_BLK) + 1 ] = sample[ 1 ];
                     wf_cont_f3_light[ (i * NB_BYTES_CWF3_LIGHT_BLK) + 2 ] = sample[ 2 ];
                     wf_cont_f3_light[ (i * NB_BYTES_CWF3_LIGHT_BLK) + 3 ] = sample[ 3 ];
                     wf_cont_f3_light[ (i * NB_BYTES_CWF3_LIGHT_BLK) + 4 ] = sample[ 4 ];
                     wf_cont_f3_light[ (i * NB_BYTES_CWF3_LIGHT_BLK) + 5 ] = sample[ 5 ];
                 }
                 //*********************
                 // SEND CWF3_light DATA
                 for (i=0; i<7; i++) // send waveform
                 {
                     int coarseTime = 0x00;
                     int fineTime = 0x00;
                     spw_ioctl_send_CWF.data = (char*) &wf_cont_f3_light[ (i * 340 * NB_BYTES_CWF3_LIGHT_BLK) ];
                     spw_ioctl_send_CWF.hdr = (char*) &headerCWF[ i ];
                     // BUILD THE DATA
                     if ( i == WFRM_INDEX_OF_LAST_PACKET ) {
                         spw_ioctl_send_CWF.dlen = 8 * NB_BYTES_CWF3_LIGHT_BLK;
                     }
                     else {
                         spw_ioctl_send_CWF.dlen = 340 * NB_BYTES_CWF3_LIGHT_BLK;
                     }
                     // SET PACKET SEQUENCE COUNTER
                     increment_seq_counter_source_id( headerCWF[ i ].packetSequenceControl, SID_NORM_CWF_F3 );
                     // SET PACKET TIME
                     coarseTime = time_management_regs->coarse_time;
                     fineTime = time_management_regs->fine_time;
                     headerCWF[ i ].acquisitionTime[0] = (unsigned char) (coarseTime>>24);
                     headerCWF[ i ].acquisitionTime[1] = (unsigned char) (coarseTime>>16);
                     headerCWF[ i ].acquisitionTime[2] = (unsigned char) (coarseTime>>8);
                     headerCWF[ i ].acquisitionTime[3] = (unsigned char) (coarseTime);
                     headerCWF[ i ].acquisitionTime[4] = (unsigned char) (fineTime>>8);
                     headerCWF[ i ].acquisitionTime[5] = (unsigned char) (fineTime);
                     headerCWF[ i ].time[0] = (unsigned char) (coarseTime>>24);
                     headerCWF[ i ].time[1] = (unsigned char) (coarseTime>>16);
                     headerCWF[ i ].time[2] = (unsigned char) (coarseTime>>8);
                     headerCWF[ i ].time[3] = (unsigned char) (coarseTime);
                     headerCWF[ i ].time[4] = (unsigned char) (fineTime>>8);
                     headerCWF[ i ].time[5] = (unsigned char) (fineTime);
                     // SEND PACKET
                     status =  rtems_message_queue_send( queue_id, &spw_ioctl_send_CWF, sizeof(spw_ioctl_send_CWF));
                     if (status != RTEMS_SUCCESSFUL) {
                         printf("%d-%d, ERR %d\n", SID_NORM_CWF_F3, i, (int) status);
                         ret = LFR_DEFAULT;
                     }
                     rtems_task_wake_after(TIME_BETWEEN_TWO_CWF3_PACKETS);
                 }
                 return ret;
             }
             //**************
             // wfp registers
             void set_wfp_data_shaping()
             {
                 /** This function sets the data_shaping register of the waveform picker module.
                  *
                  * The value is read from one field of the parameter_dump_packet structure:\n
                  * bw_sp0_sp1_r0_r1
                  *
                  */
                 unsigned char data_shaping;
                 // get the parameters for the data shaping [BW SP0 SP1 R0 R1] in sy_lfr_common1 and configure the register
                 // waveform picker : [R1 R0 SP1 SP0 BW]
                 data_shaping = parameter_dump_packet.bw_sp0_sp1_r0_r1;
             #ifdef GSA
             #else
                 waveform_picker_regs->data_shaping =
                           ( (data_shaping & 0x10) >> 4 )     // BW
                         + ( (data_shaping & 0x08) >> 2 )     // SP0
                         + ( (data_shaping & 0x04)      )     // SP1
                         + ( (data_shaping & 0x02) << 2 )     // R0
                         + ( (data_shaping & 0x01) << 4 );    // R1
             #endif
             }
             char set_wfp_delta_snapshot()
             {
                 /** This function sets the delta_snapshot register of the waveform picker module.
                  *
                  * The value is read from two (unsigned char) of the parameter_dump_packet structure:
                  * - sy_lfr_n_swf_p[0]
                  * - sy_lfr_n_swf_p[1]
                  *
                  */
                 char ret;
                 unsigned int delta_snapshot;
                 unsigned int aux;
                 aux = 0;
                 ret = LFR_DEFAULT;
                 delta_snapshot = parameter_dump_packet.sy_lfr_n_swf_p[0]*256
                         + parameter_dump_packet.sy_lfr_n_swf_p[1];
             #ifdef GSA
             #else
                 if ( delta_snapshot < MIN_DELTA_SNAPSHOT )
                 {
                     aux = MIN_DELTA_SNAPSHOT;
                     ret = LFR_DEFAULT;
                 }
                 else
                 {
                     aux = delta_snapshot ;
                     ret = LFR_SUCCESSFUL;
                 }
                 waveform_picker_regs->delta_snapshot = aux - 1;             // max 2 bytes
             #endif
                 return ret;
             }
             void set_wfp_burst_enable_register( unsigned char mode)
             {
                 /** This function sets the waveform picker burst_enable register depending on the mode.
                  *
                  * @param mode is the LFR mode to launch.
                  *
                  * The burst bits shall be before the enable bits.
                  *
                  */
             #ifdef GSA
             #else
                 // [0000 0000] burst f2, f1, f0 enable f3 f2 f1 f0
                 // the burst bits shall be set first, before the enable bits
                 switch(mode) {
                 case(LFR_MODE_NORMAL):
                     waveform_picker_regs->burst_enable = 0x00;  // [0000 0000] no burst enable
                     waveform_picker_regs->burst_enable = 0x0f; // [0000 1111] enable f3 f2 f1 f0
                     break;
                 case(LFR_MODE_BURST):
                     waveform_picker_regs->burst_enable = 0x40;  // [0100 0000] f2 burst enabled
                     waveform_picker_regs->burst_enable =  waveform_picker_regs->burst_enable | 0x04; // [0100] enable f2
                     break;
                 case(LFR_MODE_SBM1):
                     waveform_picker_regs->burst_enable = 0x20;  // [0010 0000] f1 burst enabled
                     waveform_picker_regs->burst_enable =  waveform_picker_regs->burst_enable | 0x0f; // [1111] enable f3 f2 f1 f0
                     break;
                 case(LFR_MODE_SBM2):
                     waveform_picker_regs->burst_enable = 0x40;  // [0100 0000] f2 burst enabled
                     waveform_picker_regs->burst_enable =  waveform_picker_regs->burst_enable | 0x0f; // [1111] enable f3 f2 f1 f0
                     break;
                 default:
                     waveform_picker_regs->burst_enable = 0x00;  // [0000 0000] no burst enabled, no waveform enabled
                     break;
                 }
             #endif
             }
             void reset_wfp_burst_enable()
             {
                 /** This function resets the waveform picker burst_enable register.
                  *
                  * The burst bits [f2 f1 f0] and the enable bits [f3 f2 f1 f0] are set to 0.
                  *
                  */
             #ifdef GSA
             #else
                 waveform_picker_regs->burst_enable = 0x00;              // burst f2, f1, f0     enable f3, f2, f1, f0
             #endif
             }
             void reset_wfp_status()
             {
                 /** This function resets the waveform picker status register.
                  *
                  * All status bits are set to 0 [new_err full_err full].
                  *
                  */
             #ifdef GSA
             #else
                 waveform_picker_regs->status = 0x00;              // burst f2, f1, f0     enable f3, f2, f1, f0
             #endif
             }
             void reset_waveform_picker_regs()
             {
                 /** This function resets the waveform picker module registers.
                  *
                  * The registers affected by this function are located at the following offset addresses:
                  * - 0x00 data_shaping
                  * - 0x04 burst_enable
                  * - 0x08 addr_data_f0
                  * - 0x0C addr_data_f1
                  * - 0x10 addr_data_f2
                  * - 0x14 addr_data_f3
                  * - 0x18 status
                  * - 0x1C delta_snapshot
                  * - 0x20 delta_f2_f1
                  * - 0x24 delta_f2_f0
                  * - 0x28 nb_burst
                  * - 0x2C nb_snapshot
                  *
                  */
             #ifdef GSA
             #else
                 reset_wfp_burst_enable();
                 reset_wfp_status();
                 // set buffer addresses
                 waveform_picker_regs->addr_data_f0 = (int) (wf_snap_f0);    //
                 waveform_picker_regs->addr_data_f1 = (int) (wf_snap_f1);    //
                 waveform_picker_regs->addr_data_f2 = (int) (wf_snap_f2);    //
                 waveform_picker_regs->addr_data_f3 = (int) (wf_cont_f3);    //
                 // set other parameters
                 set_wfp_data_shaping();
                 set_wfp_delta_snapshot();                           // time in seconds between two snapshots
                 waveform_picker_regs->delta_f2_f1 = 0xffff;         // 0x16800 => 92160 (max 4 bytes)
                 waveform_picker_regs->delta_f2_f0 = 0x17c00;        // 97 280 (max 5 bytes)
                 waveform_picker_regs->nb_burst_available = 0x180;   // max 3 bytes, size of the buffer in burst (1 burst = 16 x 4 octets)
                 waveform_picker_regs->nb_snapshot_param = 0x7ff;    // max 3 octets, 2048 - 1
             #endif
             }
             //*****************
             // local parameters
             void set_local_sbm1_nb_cwf_max()
             {
                 /** This function sets the value of the sbm1_nb_cwf_max local parameter.
                  *
                  * The sbm1_nb_cwf_max parameter counts the number of CWF_F1 records that have been sent.\n
                  * This parameter is used to send CWF_F1 data as normal data when the SBM1 is active.\n\n
                  * (2 snapshots of 2048 points per seconds) * (period of the NORM snashots) - 8 s (duration of the f2 snapshot)
                  *
                  */
                 param_local.local_sbm1_nb_cwf_max = 2 *
                         (parameter_dump_packet.sy_lfr_n_swf_p[0] * 256
                         + parameter_dump_packet.sy_lfr_n_swf_p[1]) - 8; // 16 CWF1 parts during 1 SWF2
             }
             void set_local_sbm2_nb_cwf_max()
             {
                 /** This function sets the value of the sbm1_nb_cwf_max local parameter.
                  *
                  * The sbm1_nb_cwf_max parameter counts the number of CWF_F1 records that have been sent.\n
                  * This parameter is used to send CWF_F2 data as normal data when the SBM2 is active.\n\n
                  * (period of the NORM snashots) / (8 seconds per snapshot at f2 = 256 Hz)
                  *
                  */
                 param_local.local_sbm2_nb_cwf_max = (parameter_dump_packet.sy_lfr_n_swf_p[0] * 256
                         + parameter_dump_packet.sy_lfr_n_swf_p[1]) / 8;
             }
             void set_local_nb_interrupt_f0_MAX()
             {
                 /** This function sets the value of the nb_interrupt_f0_MAX local parameter.
                  *
                  * This parameter is used for the SM validation only.\n
                  * The software waits param_local.local_nb_interrupt_f0_MAX interruptions from the spectral matrices
                  * module before launching a basic processing.
                  *
                  */
                 param_local.local_nb_interrupt_f0_MAX = ( (parameter_dump_packet.sy_lfr_n_asm_p[0]) * 256
                         + parameter_dump_packet.sy_lfr_n_asm_p[1] ) * 100;
             }
             void reset_local_sbm1_nb_cwf_sent()
             {
                 /** This function resets the value of the sbm1_nb_cwf_sent local parameter.
                  *
                  * The sbm1_nb_cwf_sent parameter counts the number of CWF_F1 records that have been sent.\n
                  * This parameter is used to send CWF_F1 data as normal data when the SBM1 is active.
                  *
                  */
                 param_local.local_sbm1_nb_cwf_sent = 0;
             }
             void reset_local_sbm2_nb_cwf_sent()
             {
                 /** This function resets the value of the sbm2_nb_cwf_sent local parameter.
                  *
                  * The sbm2_nb_cwf_sent parameter counts the number of CWF_F2 records that have been sent.\n
                  * This parameter is used to send CWF_F2 data as normal data when the SBM2 mode is active.
                  *
                  */
                 param_local.local_sbm2_nb_cwf_sent = 0;
             }
             rtems_id get_pkts_queue_id( void )
             {
                 rtems_id queue_id;
                 rtems_status_code status;
                 rtems_name queue_send_name;
                 queue_send_name = rtems_build_name( 'Q', '_', 'S', 'D' );
                 status =  rtems_message_queue_ident( queue_send_name, 0, &queue_id );
                 if (status != RTEMS_SUCCESSFUL)
                 {
                     PRINTF1("in get_pkts_queue_id *** ERR %d\n", status)
                 }
                 return queue_id;
             }
             void increment_seq_counter_source_id( unsigned char *packet_sequence_control, unsigned int sid )
             {
                 unsigned short *sequence_cnt;
                 unsigned short segmentation_grouping_flag;
                 unsigned short new_packet_sequence_control;
-                if ( (sid ==SID_NORM_SWF_F0) || (sid ==SID_NORM_SWF_F1) || (sid ==SID_NORM_SWF_F2)
+                if ( (sid ==SID_NORM_SWF_F0)    || (sid ==SID_NORM_SWF_F1) || (sid ==SID_NORM_SWF_F2)
-                     || (sid ==SID_BURST_CWF_F2) )
+                     || (sid ==SID_NORM_CWF_F3) || (sid ==SID_BURST_CWF_F2) )
                 {
                     sequence_cnt = &sequenceCounters_SCIENCE_NORMAL_BURST;
                 }
                 else if ( (sid ==SID_SBM1_CWF_F1) || (sid ==SID_SBM2_CWF_F2) )
                 {
                     sequence_cnt = &sequenceCounters_SCIENCE_SBM1_SBM2;
                 }
                 else
                 {
                     sequence_cnt = &sequenceCounters_TC_EXE[ UNKNOWN ];
                     PRINTF1("in increment_seq_counter_source_id *** ERR apid_destid %d not known\n", sid)
                 }
                 segmentation_grouping_flag  = (packet_sequence_control[ 0 ] & 0xc0) << 8;
                 *sequence_cnt                = (*sequence_cnt) & 0x3fff;
                 new_packet_sequence_control = segmentation_grouping_flag | *sequence_cnt ;
                 packet_sequence_control[0] = (unsigned char) (new_packet_sequence_control >> 8);
                 packet_sequence_control[1] = (unsigned char) (new_packet_sequence_control     );
                 // increment the seuqence counter for the next packet
                 if ( *sequence_cnt < SEQ_CNT_MAX)
                 {
                     *sequence_cnt = *sequence_cnt + 1;
                 }
                 else
                 {
                     *sequence_cnt = 0;
                 }
             }

General Comments 0

Write
Preview

You need to be logged in to leave comments. Login now

No TODOs yet

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages