freecalypso-sw: gsm-fw/riviera/rvt/ti_profiler/ti

annotate gsm-fw/riviera/rvt/ti_profiler/ti_profiler.c @ 435:c6e1c813e7f0

README.hosttools: updated for serterm

author	Michael Spacefalcon <msokolov@ivan.Harhan.ORG>
date	Sun, 22 Jun 2014 01:40:59 +0000
parents	afceeeb2cba1
children

rev	line source
118 21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1 /************************************************************************************
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	2 * ti_profiler.c : contains ti profiling module function *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	3 * *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	4 * *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	5 * Author: Philippe Martinez *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	6 * *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	7 * version: 1.0 *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	8 * *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	9 * Date: 07/16/2001 *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	10 * (C) Copyright 2001 by Texas Instruments Incorporated, All Rights Reserved *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	11 ************************************************************************************/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	12
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	13 #include "config/debug.cfg"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	14
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	15 #if (TI_PROFILER == 1) \|\| (TI_NUC_MONITOR == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	16
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	17 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	18 /* include files */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	19 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	20
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	21 #include <string.h>
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	22
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	23 #include "main/sys_types.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	24
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	25 #include "nucleus.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	26 #include "qu_defs.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	27 #include "tc_defs.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	28
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	29 #include "rvf/rvf_api.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	30 #include "rvt/rvt_gen.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	31 #include "rvt/rvt_def_i.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	32
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	33 #include "mem.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	34 #include "iq.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	35
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	36 #include "rvt/ti_profiler/ti_profiler.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	37
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	38 #include "timer.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	39 #include "inth.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	40
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	41 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	42 /* Global instances */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	43 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	44
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	45 // task variable instance
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	46 T_RVF_MB_ID prof_mb_id;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	47 T_RVT_USER_ID prof_trace_id;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	48 T_RVF_ADDR_ID prof_addr_id;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	49
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	50 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	51 /* internal prototypes */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	52 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	53
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	54 void ti_prf_init( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	55 T_RV_RET ti_prf_core(void);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	56 void ti_profiler_trace_rx_callback( T_RVT_BUFFER trace_msg, UINT16 trace_msg_size );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	57 #if (L1_TRACER == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	58 extern void SendTraces(char *s);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	59 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	60
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	61 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	62
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	63
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	64 #if (TI_PROFILER == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	65
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	66 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	67 /* Global instances */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	68 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	69
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	70 // Internal state of profiling
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	71 T_PROFILER_STATE profiler_state = PROFILER_STOPPED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	72
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	73
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	74 // Buffer that contains the Profiling samples.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	75 // Structure (SYS_UWORD32 buffer):
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	76 // C_OP_CODE_TDMA_BEGIN
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	77 // PC Samples ......
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	78 // C_OP_CODE_TDMA_END
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	79 // ......
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	80 // C_OP_CODE_TDMA_BEGIN
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	81 // PC Samples ......
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	82 // C_OP_CODE_TDMA_END
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	83
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	84 SYS_UWORD32 pr_buffer[PR_BUFFER_SIZE];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	85 // pointer on pr_buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	86 SYS_UWORD32 pos_pr_buffer = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	87 SYS_UWORD32 pr_buffer_length = PR_BUFFER_SIZE;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	88
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	89 T_PROFILER_BUFFER_STATE ti_profiler_buffer_state = LOGGING;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	90 T_PROFILER_HANDLER ti_profiler_active = NOT_ACTIVE;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	91
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	92 // hisr variable instance
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	93 NU_HISR ti_profiler_cb;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	94 SYS_UWORD8 ti_profiler_hisr_stack[500];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	95
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	96 // Event variables
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	97 // NO_SLEEP_EVENT
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	98 SYS_UWORD32 ti_profiler_nb_sleep_call = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	99 SYS_UWORD32 ti_profiler_nb_sleep_counter_ref = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	100
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	101 T_PROFILER_EVENTS ti_profiler_event_state = NO_EVENT;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	102
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	103 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	104 /* internal prototypes */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	105 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	106
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	107 void ti_profiler_start( BOOL enable );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	108 void ti_profiler_handler( SYS_UWORD32 programCounter );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	109 void ti_profiler_freeze( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	110 void ti_profiler_unfreeze( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	111 void ti_profiler_tdma_action( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	112 void ti_profiler_init_profiler_module( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	113 void ti_profiler_hisr( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	114
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	115 void l1_profiler_open( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	116 void l1_profiler_close( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	117 void l1_profiler_flush( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	118
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	119 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	120 /* external prototypes */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	121 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	122
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	123 SYS_UWORD32 l1_get_next_absolute_fn( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	124
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	125 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	126 /* ti_profiler_start() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	127 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	128 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	129 /* Description: Start or Stop the timer */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	130 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	131 /* parameters */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	132 /* enable = 1 => Unmask + start the timer 1 */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	133 /* Initialize buffer. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	134 /* enable = 0 => mask + stop the timer 1 */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	135 /* Close Buffer. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	136 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	137
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	138 void ti_profiler_start( BOOL enable )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	139 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	140 if( enable )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	141 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	142 TM_EnableTimer( PR_TIMER_NUM );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	143 IQ_Unmask( IQ_TIM1 );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	144 IQ_InitLevel( IQ_TIM1, FIQ, 0, 1 );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	145
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	146 TM_ResetTimer( PR_TIMER_NUM, PR_TIMER_RESET_VALUE, 1, 0 );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	147 TM_StartTimer( PR_TIMER_NUM );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	148 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	149 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	150 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	151 IQ_Mask( IQ_TIM1 );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	152 IQ_InitLevel( IQ_TIM1, 0, 0, 1 );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	153 TM_StopTimer( PR_TIMER_NUM );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	154 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	155 } // ti_profiler_start
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	156
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	157
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	158 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	159 /* ti_profiler_handler() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	160 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	161 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	162 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	163 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	164 /* Store the Program counter in a static buffer */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	165 /* If buffer is full, deactivate the profiling and */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	166 /* activate the ti_profiler_hisr(); */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	167 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	168
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	169 void ti_profiler_handler( SYS_UWORD32 programCounter )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	170 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	171
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	172 // Store the program Counter in log buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	173 pr_buffer[ pos_pr_buffer++ ] = programCounter;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	174
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	175 } // ti_profiler_handler
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	176
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	177
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	178 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	179 /* ti_profiler_freeze() ti_profiler_unfreeze() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	180 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	181 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	182 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	183 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	184 /* Function to suspend/resume the profiling */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	185 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	186
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	187 void ti_profiler_freeze()
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	188 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	189 TM_StopTimer( PR_TIMER_NUM );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	190 } // ti_profiler_freeze
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	191
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	192 void ti_profiler_unfreeze()
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	193 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	194 TM_StartTimer( PR_TIMER_NUM );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	195 } // ti_profiler_unfreeze
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	196
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	197 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	198 /* ti_profiler_init_profiler_module() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	199 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	200 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	201 /* Description: Initialize profiling task and hisr */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	202 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	203 /* Note : this init will changed */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	204 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	205 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	206
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	207 void ti_profiler_init_profiler_module( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	208 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	209 // Fill the entire stack with the pattern 0xFE
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	210 memset( ti_profiler_hisr_stack, 0xFE, sizeof( ti_profiler_hisr_stack ) );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	211
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	212 // Create the HISR which is called from power interrupts
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	213 NU_Create_HISR( &ti_profiler_cb,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	214 "TI PROF",
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	215 ti_profiler_hisr,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	216 2,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	217 ti_profiler_hisr_stack,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	218 sizeof( ti_profiler_hisr_stack ) ); // lowest prty
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	219
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	220 } // ti_profiler_init_profiler_module
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	221
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	222
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	223 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	224 /* ti_profiler_hisr() High Interrupt service routine */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	225 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	226 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	227 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	228 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	229 /* This hisr stands as relay for the profiler LISR. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	230 /* It sends a message to the profiler task to start the */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	231 /* buffer extraction. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	232 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	233
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	234 void ti_profiler_hisr( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	235 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	236 T_PROFILER_MSG * msg;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	237
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	238 //send a message to the ti profiler task
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	239 if( rvf_get_buf( prof_mb_id, sizeof( T_PROFILER_MSG ), ( T_RVF_BUFFER** ) &msg ) == RVF_GREEN )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	240 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	241 msg->msg_id = TI_PROFILER_OUTPUT_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	242 rvf_send_msg( prof_addr_id, msg );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	243 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	244 } // ti_profiler_hisr
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	245
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	246 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	247 /* ti_profiler_tdma_action() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	248 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	249 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	250 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	251 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	252 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	253 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	254 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	255
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	256 void ti_profiler_tdma_action(void)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	257 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	258
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	259 switch( profiler_state )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	260 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	261 case PROFILER_RUNNING :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	262 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	263 SYS_UWORD8 output_buffer_condition = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	264
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	265 // suspend the profiler
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	266 //ti_profiler_freeze();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	267 ti_profiler_start( FALSE );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	268
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	269 if( ti_profiler_event_state == NO_SLEEP_EVENT )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	270 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	271 // Need to reach the event to output the buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	272 if( ti_profiler_nb_sleep_call++ >= ti_profiler_nb_sleep_counter_ref )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	273 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	274 output_buffer_condition = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	275 ti_profiler_nb_sleep_call = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	276 // ti_profiler_buffer_state = FLUSH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	277 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	278 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	279 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	280 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	281 output_buffer_condition = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	282 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	283
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	284
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	285 // Check if buffer threshold reached
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	286 if( pos_pr_buffer >= PR_BUFFER_THRESHOLD )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	287 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	288 // change the status of the buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	289 ti_profiler_buffer_state = LOGGING;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	290
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	291 // Insert the End of Buffer OP code
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	292 pr_buffer[ pos_pr_buffer++ ] = C_OP_CODE_END_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	293
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	294 // Specifie used length of buffer in SYS_UWORD32
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	295 pr_buffer_length = pos_pr_buffer;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	296
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	297 if( output_buffer_condition == 1 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	298 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	299 // Change profiler state to freezed
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	300 profiler_state = PROFILER_FREEZED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	301
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	302 // Activate the hisr in order to start the buffer output
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	303 NU_Activate_HISR( &ti_profiler_cb );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	304 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	305 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	306 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	307 // insert TDMA begin OP Code
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	308 pr_buffer[ 0 ] = C_OP_CODE_BEGIN_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	309 pr_buffer[ 1 ] = C_OP_CODE_TDMA_BEGIN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	310 // Insert current fn
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	311 pr_buffer[ 2 ] = l1_get_next_absolute_fn();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	312
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	313 // initialize buffer pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	314 pos_pr_buffer = 3;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	315
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	316 ti_profiler_start( TRUE );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	317 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	318
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	319 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	320 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	321 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	322 // insert OP Code begining of TDMA
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	323 pr_buffer[pos_pr_buffer++] = C_OP_CODE_TDMA_BEGIN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	324 // Insert current fn
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	325 pr_buffer[pos_pr_buffer++] = l1_get_next_absolute_fn();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	326
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	327 // resume profiler
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	328 //ti_profiler_unfreeze();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	329 ti_profiler_start( TRUE );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	330 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	331
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	332
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	333 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	334 } // PROFILER_RUNNING
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	335
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	336 case PROFILER_TO_BE_RAN :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	337 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	338 // insert TDMA begin OP Code
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	339 pr_buffer[ 0 ] = C_OP_CODE_BEGIN_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	340 pr_buffer[ 1 ] = C_OP_CODE_TDMA_BEGIN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	341 // Insert current fn
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	342 pr_buffer[ 2 ] = l1_get_next_absolute_fn();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	343
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	344 // initialize buffer pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	345 pos_pr_buffer = 3;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	346 // start the profiler
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	347 profiler_state = PROFILER_RUNNING;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	348
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	349 // start the profiler
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	350 ti_profiler_start( TRUE );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	351
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	352 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	353 } // PROFILER_TO_BE_RAN
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	354
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	355 case PROFILER_TO_BE_STOPPED :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	356 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	357 // stop the profiler
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	358 ti_profiler_start( FALSE );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	359
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	360 // Insert End Buffer Op Code.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	361 pr_buffer[pos_pr_buffer++] = C_OP_CODE_END_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	362 profiler_state = PROFILER_STOPPED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	363
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	364 // Activate the hisr in order to start the buffer output
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	365 NU_Activate_HISR( &ti_profiler_cb );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	366
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	367 // Returns to inactive
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	368 ti_profiler_active = NOT_ACTIVE;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	369
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	370 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	371 } // PROFILER_TO_BE_STOPPED
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	372
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	373 case PROFILER_TO_BE_UNFREEZED :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	374 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	375 // Init profiling buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	376 // insert TDMA begin OP Code
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	377 pr_buffer[ 0 ] = C_OP_CODE_BEGIN_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	378 pr_buffer[ 1 ] = C_OP_CODE_TDMA_BEGIN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	379 // Insert current fn
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	380 pr_buffer[ 2 ] = l1_get_next_absolute_fn();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	381
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	382 // initialize buffer pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	383 pos_pr_buffer = 3;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	384 // Insert the TDMA Start Op Code
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	385 profiler_state = PROFILER_RUNNING;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	386
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	387 // resume profiler
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	388 //ti_profiler_unfreeze();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	389 ti_profiler_start( TRUE );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	390
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	391 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	392 } // PROFILER_TO_BE_UNFREEZED
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	393
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	394 default :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	395 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	396 // nothing to do
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	397 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	398 } // default
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	399
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	400 } // End switch
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	401
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	402 } // ti_profiler_tdma_action
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	403
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	404 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	405 /* ti_profiler_open() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	406 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	407 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	408 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	409 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	410 /* Start the profiling on the next TDMA occurence */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	411 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	412 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	413
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	414 void ti_profiler_open( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	415 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	416 if( ti_profiler_active == NOT_ACTIVE )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	417 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	418
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	419 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	420 } // ti_profiler_open
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	421
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	422 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	423 /* ti_profiler_close() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	424 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	425 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	426 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	427 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	428 /* Stop the profiling on the next TDMA occurence */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	429 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	430 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	431
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	432 void ti_profiler_close( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	433 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	434 if( ti_profiler_active == NOT_ACTIVE )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	435 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	436 l1_profiler_close();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	437 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	438 } // ti_profiler_close
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	439
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	440 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	441 /* l1_profiler_flush() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	442 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	443 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	444 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	445 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	446 /* freeze the profiling and flush the current profiling */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	447 /* buffer. Profiling will restart after output of the */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	448 /* buffer. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	449 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	450
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	451 void ti_profiler_flush( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	452 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	453 if( ti_profiler_active == NOT_ACTIVE )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	454 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	455 l1_profiler_flush();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	456 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	457 } // ti_profiler_flush
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	458
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	459 // To be used only TI internal modules
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	460
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	461 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	462 /* ti_profiler_open() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	463 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	464 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	465 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	466 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	467 /* Start the profiling on the next TDMA occurence */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	468 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	469 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	470
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	471 void l1_profiler_open( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	472 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	473
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	474 if( ti_profiler_active != NOT_ACTIVE )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	475 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	476 // stop profiler timer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	477 ti_profiler_start( FALSE );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	478 // go to idle
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	479 profiler_state = PROFILER_STOPPED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	480 } // Endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	481
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	482 // insert TDMA begin OP Code
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	483 pr_buffer[ 0 ] = C_OP_CODE_BEGIN_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	484 pr_buffer[ 1 ] = C_OP_CODE_TDMA_BEGIN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	485
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	486 // Insert current fn
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	487 pr_buffer[ 2 ] = l1_get_next_absolute_fn();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	488
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	489 // initialize buffer pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	490 pos_pr_buffer = 3;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	491
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	492 // change state of profiler
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	493 profiler_state = PROFILER_TO_BE_RAN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	494
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	495 } // ti_profiler_open
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	496
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	497 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	498 /* ti_profiler_close() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	499 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	500 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	501 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	502 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	503 /* Stop the profiling on the next TDMA occurence */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	504 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	505 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	506
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	507 void l1_profiler_close( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	508 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	509 // stop the profiler
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	510 ti_profiler_start( FALSE );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	511
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	512 // Insert TDMA_BOUNDARY Op Code.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	513 pr_buffer[pos_pr_buffer++] = C_OP_CODE_END_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	514 profiler_state = PROFILER_STOPPED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	515
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	516 // Activate the hisr in order to start the buffer output
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	517 NU_Activate_HISR( &ti_profiler_cb );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	518
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	519 } // ti_profiler_close
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	520
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	521 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	522 /* l1_profiler_flush() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	523 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	524 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	525 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	526 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	527 /* freeze the profiling and flush the current profiling */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	528 /* buffer. Profiling will restart after output of the */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	529 /* buffer. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	530 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	531
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	532 void l1_profiler_flush( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	533 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	534 ti_profiler_buffer_state = FLUSH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	535 } // ti_profiler_flush
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	536
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	537 #endif // PROFILER
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	538
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	539 #if (TI_NUC_MONITOR == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	540
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	541 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	542 /* Global instances */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	543 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	544 // management of monitoring buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	545
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	546 // Internal state of nucleus monitoring
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	547
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	548 T_NUC_MONITOR_STATE ti_nuc_monitor_state = NUC_MONITOR_STOPPED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	549
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	550 // pointers on current buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	551 SYS_UWORD8* ti_nuc_monitor_current_buffer = NULL;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	552 SYS_UWORD8 ti_nuc_monitor_current_position = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	553
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	554 // Create static doubled bufferised LISR buffers (max 10 LISR by TDMA)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	555 SYS_UWORD8 ti_nuc_monitor_LISR_Buffer[C_NUC_LISR_BUF_PG_NB][C_NUC_MAX_LISR];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	556 SYS_UWORD8 ti_nuc_monitor_LISR_current_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	557 SYS_UWORD8 ti_nuc_monitor_LISR_current_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	558 SYS_UWORD8 ti_nuc_monitor_LISR_next_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	559 SYS_UWORD8 ti_nuc_monitor_LISR_next_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	560
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	561 // Create static doubled bufferised LISR buffers (max 10 LISR by TDMA)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	562 SYS_UWORD8 ti_nuc_monitor_Thread_Buffer[C_NUC_THREAD_BUF_PG_NB][C_NUC_MAX_THREAD];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	563 SYS_UWORD8 ti_nuc_monitor_Thread_current_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	564 SYS_UWORD8 ti_nuc_monitor_Thread_current_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	565 SYS_UWORD8 ti_nuc_monitor_Thread_next_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	566 SYS_UWORD8 ti_nuc_monitor_Thread_next_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	567
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	568 // hisr variable instance
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	569 NU_HISR ti_nuc_monitor_cb;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	570 SYS_UWORD8 ti_nuc_monitor_hisr_stack[ 500 ];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	571
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	572 // Array that store the ID <-> pointer of the Nucleus Components
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	573 //SYS_UWORD32* ti_nuc_monitor_thread_id[ NUC_MONITOR_MAX_ID ];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	574 SYS_UWORD32 ti_nuc_monitor_thread_id[ NUC_MONITOR_MAX_ID ];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	575 SYS_UWORD8 ti_nuc_monitor_thread_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	576
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	577 //SYS_UWORD32* ti_nuc_monitor_queue_id[ NUC_MONITOR_MAX_ID ];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	578 SYS_UWORD32 ti_nuc_monitor_queue_id[ NUC_MONITOR_MAX_ID ];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	579 SYS_UWORD8 ti_nuc_monitor_queue_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	580
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	581 // LISR IRQ value
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	582 SYS_UWORD8 IRQ_value;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	583
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	584 // Indicates the nucleus monitor part to switch Thread buffer page
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	585 SYS_UWORD8 ti_nuc_monitor_change_thread_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	586
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	587 // Indicates that the IDLE mode has been reached
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	588 // (to be reset in LISR or Thread monitor function)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	589 SYS_UWORD8 ti_nuc_monitor_idle_reached = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	590
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	591 // debug
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	592 SYS_UWORD32 ti_nuc_monitor_lost_messages = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	593
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	594 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	595 /* internal prototypes */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	596 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	597
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	598 void ti_nuc_monitor_tdma_action( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	599 void ti_nuc_monitor_init_module( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	600 void ti_nuc_monitor_hisr( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	601 void ti_nuc_monitor_check_ID_buffer( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	602 void ti_nuc_monitor_LISR_log( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	603 void ti_nuc_monitor_LISR_log_end( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	604 void ti_nuc_monitor_Thread_log( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	605 void ti_nuc_monitor_Queue_log( SYS_UWORD32* queue_pointer, SYS_UWORD8 status, SYS_UWORD8 Direction );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	606 void ti_nuc_monitor_sleep( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	607
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	608 T_RVT_RET ti_nuc_monitor_mem_alloc(T_RVT_USER_ID user_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	609 T_RVT_MSG_LG buffer_lenght,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	610 T_RVT_BUFFER * buff);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	611
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	612 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	613 /* external prototypes */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	614 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	615
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	616 extern SYS_UWORD16 l1_get_actual_fn_mod42432( void );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	617 extern SYS_UWORD32* TCD_Current_Thread;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	618
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	619 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	620 /* ti_nuc_monitor_init_module() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	621 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	622 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	623 /* Description: Initialize hisr */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	624 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	625 /* Create hisr and initialize thread/queue structures. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	626 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	627 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	628
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	629 void ti_nuc_monitor_init_module( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	630 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	631 SYS_UWORD8 i;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	632
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	633 // Fill the entire stack with the pattern 0xFE
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	634 memset( ti_nuc_monitor_hisr_stack, 0xFE, sizeof( ti_nuc_monitor_hisr_stack ) );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	635
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	636 // Create the HISR
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	637 NU_Create_HISR( &ti_nuc_monitor_cb,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	638 "TI MON",
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	639 ti_nuc_monitor_hisr,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	640 2,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	641 ti_nuc_monitor_hisr_stack,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	642 sizeof( ti_nuc_monitor_hisr_stack ) ); // lowest prty
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	643
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	644 } // ti_nuc_monitor_init_module
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	645
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	646
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	647 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	648 /* ti_nuc_monitor_hisr() High Interrupt service routine */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	649 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	650 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	651 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	652 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	653 /* It sends a message to the profiler task to start the */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	654 /* buffer extraction. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	655 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	656
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	657 void ti_nuc_monitor_hisr( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	658 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	659 SYS_UWORD8 remaining_bytes;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	660 SYS_UWORD16 fn;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	661 T_PROFILER_MSG *msg;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	662 SYS_UWORD8 i;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	663
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	664 // Allocate a buffer first time
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	665 if(( ti_nuc_monitor_state == NUC_MONITOR_TO_BE_RUN ) \|\|
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	666 ( ti_nuc_monitor_state == NUC_MONITOR_TO_BE_STARTED ))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	667 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	668 if((ti_nuc_monitor_mem_alloc (prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	669 NUC_MONITOR_BUFFER_SIZE,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	670 (T_RVT_BUFFER*) &ti_nuc_monitor_current_buffer))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	671 == RVT_OK)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	672 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	673
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	674 ti_nuc_monitor_current_position = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	675
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	676 // Insert the interrupt OP Code (0x00 0x00 0x00)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	677 if( ti_nuc_monitor_state == NUC_MONITOR_TO_BE_RUN )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	678 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	679 for( i=0; i < 3; i++)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	680 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	681 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] = 0x00;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	682 } // End for
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	683 } // Endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	684
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	685 // Reset intermediate buffer pointers
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	686 ti_nuc_monitor_Thread_current_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	687 ti_nuc_monitor_LISR_current_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	688 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	689 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	690 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	691 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	692 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	693
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	694 // Write FN OP CODE : (0x00 \| xx)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	695
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	696 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	697 (SYS_UWORD8) ( C_OP_CODE_FN_LOG );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	698
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	699 // Insert the fn%42432
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	700 fn = l1_get_actual_fn_mod42432();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	701
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	702 // insert LSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	703 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	704 (SYS_UWORD8) (fn & 0x00ff);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	705
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	706 // insert MSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	707 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	708 (SYS_UWORD8) ((fn & 0xff00) >> 8);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	709
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	710 ti_nuc_monitor_state = NUC_MONITOR_RUNNING;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	711
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	712 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	713 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	714
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	715 // Copy the LISR and Thread buffer into current buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	716
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	717 // - LISR array
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	718
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	719 // Check the number of byte remaining in the current
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	720 // log buffer vs LISR buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	721
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	722 remaining_bytes = NUC_MONITOR_BUFFER_SIZE - ti_nuc_monitor_current_position;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	723
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	724 if( remaining_bytes > ti_nuc_monitor_LISR_next_pos )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	725 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	726 // Copy ti_nuc_monitor_LISR_next_pos bytes to Nucleus log buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	727
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	728 memcpy( &ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	729 &ti_nuc_monitor_LISR_Buffer[ ti_nuc_monitor_LISR_next_page ][ 0 ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	730 ti_nuc_monitor_LISR_next_pos);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	731
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	732 ti_nuc_monitor_current_position += ti_nuc_monitor_LISR_next_pos;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	733
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	734 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	735 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	736 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	737
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	738 // Copy remaining_bytes bytes to Nucleus log buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	739
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	740 memcpy( &ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	741 &ti_nuc_monitor_LISR_Buffer[ ti_nuc_monitor_LISR_next_page ][ 0 ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	742 remaining_bytes);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	743
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	744 ti_nuc_monitor_current_position += remaining_bytes;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	745
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	746 // Send current buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	747
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	748 // send a message to the ti profiler task
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	749
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	750 if( rvf_get_buf( prof_mb_id, sizeof( T_PROFILER_MSG ), ( T_RVF_BUFFER** ) &msg ) == RVF_GREEN )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	751 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	752 msg->msg_id = TI_NUC_MONITOR_OUTPUT_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	753 msg->p_buffer = ti_nuc_monitor_current_buffer;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	754 msg->buffer_size = ti_nuc_monitor_current_position;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	755
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	756 ti_nuc_monitor_current_position = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	757
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	758 if( rvf_send_msg( prof_addr_id, msg ) != RV_OK )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	759 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	760 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_RUN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	761 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	762 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	763 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	764 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	765 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	766 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_RUN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	767 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	768 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	769
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	770 // Change Nucleus log buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	771
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	772 if((ti_nuc_monitor_mem_alloc (prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	773 NUC_MONITOR_BUFFER_SIZE,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	774 (T_RVT_BUFFER*) &ti_nuc_monitor_current_buffer))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	775 != RVT_OK)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	776 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	777 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_RUN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	778 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	779 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	780
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	781 // Copy remaining_bytes bytes to Nucleus log buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	782 memcpy( &ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	783 &ti_nuc_monitor_LISR_Buffer[ ti_nuc_monitor_LISR_next_page ][ remaining_bytes ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	784 ( ti_nuc_monitor_LISR_next_pos - remaining_bytes ));
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	785
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	786 ti_nuc_monitor_current_position += ( ti_nuc_monitor_LISR_next_pos - remaining_bytes );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	787
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	788 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	789
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	790 // - Thread Array
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	791
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	792 // Check the number of byte remaining in the current
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	793 // log buffer vs Thread buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	794
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	795 remaining_bytes = NUC_MONITOR_BUFFER_SIZE - ti_nuc_monitor_current_position;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	796
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	797 if( remaining_bytes > ti_nuc_monitor_Thread_next_pos )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	798 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	799 // Copy ti_nuc_monitor_Thread_next_pos bytes to Nucleus log buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	800
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	801 memcpy( &ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	802 &ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_next_page ][ 0 ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	803 ti_nuc_monitor_Thread_next_pos);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	804
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	805 ti_nuc_monitor_current_position += ti_nuc_monitor_Thread_next_pos;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	806
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	807 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	808 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	809 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	810
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	811 // Copy remaining_bytes bytes to Nucleus log buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	812
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	813 memcpy( &ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	814 &ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_next_page ][ 0 ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	815 remaining_bytes);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	816
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	817 ti_nuc_monitor_current_position += remaining_bytes;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	818
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	819 // Send current buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	820
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	821 // send a message to the ti profiler task
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	822
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	823 if( rvf_get_buf( prof_mb_id, sizeof( T_PROFILER_MSG ), ( T_RVF_BUFFER** ) &msg ) == RVF_GREEN )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	824 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	825 msg->msg_id = TI_NUC_MONITOR_OUTPUT_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	826 msg->p_buffer = ti_nuc_monitor_current_buffer;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	827 msg->buffer_size = ti_nuc_monitor_current_position;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	828
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	829 ti_nuc_monitor_current_position = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	830
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	831 if( rvf_send_msg( prof_addr_id, msg ) != RV_OK )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	832 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	833 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_RUN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	834 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	835 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	836 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	837 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	838 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	839 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_RUN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	840 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	841 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	842
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	843 // Change Nucleus log buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	844
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	845 if((ti_nuc_monitor_mem_alloc (prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	846 NUC_MONITOR_BUFFER_SIZE,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	847 (T_RVT_BUFFER*) &ti_nuc_monitor_current_buffer))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	848 != RVT_OK)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	849 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	850 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_RUN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	851 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	852 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	853
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	854 // Copy remaining_bytes bytes to Nucleus log buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	855 memcpy( &ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	856 &ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_next_page ][ remaining_bytes ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	857 ( ti_nuc_monitor_Thread_next_pos - remaining_bytes ));
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	858
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	859 ti_nuc_monitor_current_position += ( ti_nuc_monitor_Thread_next_pos - remaining_bytes );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	860
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	861 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	862
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	863 // Exit if monitoring must be stopped
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	864
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	865 if( ti_nuc_monitor_state == NUC_MONITOR_TO_BE_STOP )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	866 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	867 ti_nuc_monitor_state = NUC_MONITOR_STOPPED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	868 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	869 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	870
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	871 // Insert actual Frame number
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	872
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	873 // Check if enough space in current buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	874 if( ti_nuc_monitor_current_position >= (NUC_MONITOR_BUFFER_SIZE - 3) )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	875 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	876 // send a message to the ti profiler task
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	877
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	878 if( rvf_get_buf( prof_mb_id, sizeof( T_PROFILER_MSG ), ( T_RVF_BUFFER** ) &msg ) == RVF_GREEN )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	879 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	880 msg->msg_id = TI_NUC_MONITOR_OUTPUT_BUFFER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	881 msg->p_buffer = ti_nuc_monitor_current_buffer;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	882 msg->buffer_size = ti_nuc_monitor_current_position;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	883
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	884 ti_nuc_monitor_current_position = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	885
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	886 if( rvf_send_msg( prof_addr_id, msg ) != RV_OK )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	887 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	888 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_RUN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	889 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	890 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	891 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	892 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	893 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	894 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_RUN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	895 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	896 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	897
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	898 // Change Nucleus log buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	899
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	900 if((ti_nuc_monitor_mem_alloc (prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	901 NUC_MONITOR_BUFFER_SIZE,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	902 (T_RVT_BUFFER*) &ti_nuc_monitor_current_buffer))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	903 != RVT_OK)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	904 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	905 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_RUN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	906 return;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	907 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	908 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	909
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	910 // Write FN OP CODE : (0x00 \| xx)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	911
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	912 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	913 (SYS_UWORD8) ( C_OP_CODE_FN_LOG );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	914
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	915 // Insert the fn%42432
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	916 fn = l1_get_actual_fn_mod42432();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	917
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	918 // insert LSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	919 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	920 (SYS_UWORD8) (fn & 0x00ff);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	921
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	922 // insert MSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	923 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	924 (SYS_UWORD8) ((fn & 0xff00) >> 8);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	925
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	926 } // ti_nuc_monitor_hisr
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	927
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	928 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	929 /* ti_nuc_monitor_check_ID_buffer() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	930 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	931 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	932 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	933 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	934 /* During the Thread/Queue ID -> names buffer */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	935 /* transmission, change current buffer. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	936 /* Send the full buffer and allocate a new one. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	937 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	938
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	939 void ti_nuc_monitor_check_ID_buffer( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	940 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	941 // Reset pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	942 ti_nuc_monitor_current_position = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	943
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	944 // Send a message to the Riviera Tracer to Output the current buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	945 if( rvt_send_trace_no_cpy( ( T_RVT_BUFFER ) ti_nuc_monitor_current_buffer,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	946 prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	947 NUC_MONITOR_BUFFER_SIZE, // Length in bytes
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	948 RVT_BINARY_FORMAT ) != RVT_OK )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	949 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	950 // code to insert a breakpoint if failed.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	951 ti_nuc_monitor_state = NUC_MONITOR_STOPPED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	952 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	953
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	954
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	955 // Allocate one buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	956 do
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	957 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	958 ti_nuc_monitor_state = NUC_MONITOR_STOPPED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	959
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	960 if ((ti_nuc_monitor_mem_alloc (prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	961 NUC_MONITOR_BUFFER_SIZE,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	962 (T_RVT_BUFFER*) &ti_nuc_monitor_current_buffer))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	963 != RVT_OK)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	964 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	965 ti_nuc_monitor_state = NUC_MONITOR_WAITING;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	966 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	967 } while (ti_nuc_monitor_state == NUC_MONITOR_WAITING);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	968
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	969 } // ti_nuc_monitor_check_ID_buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	970
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	971 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	972 /* ti_nuc_monitor_tdma_action() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	973 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	974 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	975 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	976 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	977 /* this function activate the HISR monitor */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	978 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	979
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	980 void ti_nuc_monitor_tdma_action( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	981 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	982
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	983 if(( ti_nuc_monitor_state == NUC_MONITOR_RUNNING ) \|\|
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	984 ( ti_nuc_monitor_state == NUC_MONITOR_TO_BE_RUN ) \|\|
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	985 ( ti_nuc_monitor_state == NUC_MONITOR_TO_BE_STOP ) \|\|
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	986 ( ti_nuc_monitor_state == NUC_MONITOR_TO_BE_STARTED ))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	987 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	988
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	989 // Activate the hisr in order to start the buffer fill
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	990 NU_Activate_HISR( &ti_nuc_monitor_cb );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	991
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	992 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	993
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	994 } // ti_nuc_monitor_tdma_action
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	995
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	996 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	997 /* ti_nuc_monitor_LISR_log() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	998 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	999 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1000 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1001 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1002 /* This function permits to include the LISR IRQ and */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1003 /* timer value in the LISR log buffer */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1004 /* Warning : To save cpu, no overflow check is done */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1005 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1006
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1007 void ti_nuc_monitor_LISR_log( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1008 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1009 SYS_UWORD16 timer_value;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1010
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1011 if( ti_nuc_monitor_state == NUC_MONITOR_RUNNING )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1012 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1013
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1014 // Exit Idle mode if reached
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1015
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1016 ti_nuc_monitor_idle_reached = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1017
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1018 IRQ_value = (SYS_UWORD8) ((* (volatile SYS_UWORD16 *) INTH_B_IRQ_REG) & 0x001f);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1019
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1020 // Write LISR OP CODE and IRQ : (0xC0 \| IRQ)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1021
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1022 ti_nuc_monitor_LISR_Buffer[ ti_nuc_monitor_LISR_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1023 [ ti_nuc_monitor_LISR_current_pos ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1024 (SYS_UWORD8) (C_OP_CODE_LISR_FLAG \| IRQ_value);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1025
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1026 // Write the timer value
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1027
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1028 timer_value = TM_ReadTimer(2); // (* (SYS_UWORD16 *) TIMER2_READ_TIM)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1029
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1030 // insert LSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1031
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1032 ti_nuc_monitor_LISR_Buffer[ ti_nuc_monitor_LISR_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1033 [ ti_nuc_monitor_LISR_current_pos + 1 ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1034 (SYS_UWORD8) (timer_value & 0x00ff);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1035
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1036 // insert MSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1037
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1038 ti_nuc_monitor_LISR_Buffer[ ti_nuc_monitor_LISR_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1039 [ ti_nuc_monitor_LISR_current_pos + 2 ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1040 (SYS_UWORD8) ((timer_value & 0xff00) >> 8);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1041
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1042 ti_nuc_monitor_LISR_current_pos += 3;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1043
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1044 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1045
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1046 } // ti_nuc_monitor_LISR_log
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1047
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1048 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1049 /* ti_nuc_monitor_LISR_log_end() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1050 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1051 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1052 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1053 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1054 /* This function permits to include the LISR end */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1055 /* timer value in the LISR log buffer */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1056 /* Warning : To save cpu, no overflow check is done */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1057 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1058
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1059 void ti_nuc_monitor_LISR_log_end( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1060 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1061 SYS_UWORD16 timer_value;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1062
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1063 if( ti_nuc_monitor_state == NUC_MONITOR_RUNNING )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1064 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1065 // Write the timer value
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1066
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1067 timer_value = TM_ReadTimer(2);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1068
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1069 // insert LSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1070
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1071 ti_nuc_monitor_LISR_Buffer[ ti_nuc_monitor_LISR_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1072 [ ti_nuc_monitor_LISR_current_pos ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1073 (SYS_UWORD8) (timer_value & 0x00ff);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1074
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1075 // insert MSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1076
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1077 ti_nuc_monitor_LISR_Buffer[ ti_nuc_monitor_LISR_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1078 [ ti_nuc_monitor_LISR_current_pos + 1 ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1079 (SYS_UWORD8) ((timer_value & 0xff00) >> 8);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1080
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1081 ti_nuc_monitor_LISR_current_pos += 2;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1082
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1083 // Switch LISR & thread buffer page if IRQ4 (TDMA)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1084 if( IRQ_value == 4 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1085 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1086 // copy current to next
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1087 ti_nuc_monitor_LISR_next_pos = ti_nuc_monitor_LISR_current_pos;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1088 ti_nuc_monitor_LISR_next_page = ti_nuc_monitor_LISR_current_page;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1089
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1090 // instead of changing the Thread page here, set a boolean
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1091 ti_nuc_monitor_change_thread_page = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1092
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1093 //ti_nuc_monitor_Thread_next_pos = ti_nuc_monitor_Thread_current_pos;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1094 //ti_nuc_monitor_Thread_next_page = ti_nuc_monitor_Thread_current_page;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1095
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1096 // Reset current pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1097 ti_nuc_monitor_LISR_current_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1098 //ti_nuc_monitor_Thread_current_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1099
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1100 // Change page
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1101 if( ti_nuc_monitor_LISR_current_page == 0 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1102 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1103 ti_nuc_monitor_LISR_current_page = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1104 // ti_nuc_monitor_Thread_current_page = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1105 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1106 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1107 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1108 ti_nuc_monitor_LISR_current_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1109 // ti_nuc_monitor_Thread_current_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1110 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1111
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1112 // reset IRQ_value
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1113 IRQ_value = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1114
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1115 // reset timer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1116 TM_ResetTimer (2, 0xFFFF, 1, 0);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1117 TM_StartTimer (2);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1118
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1119 // Doesn't work
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1120 // * (volatile SYS_UWORD16 *) TIMER2_LOAD_TIM = 0xFFFF;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1121 // * (volatile SYS_UWORD16 *) TIMER2_CNTL = 0x0003;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1122
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1123 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1124
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1125 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1126
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1127 } // ti_nuc_monitor_LISR_log_end
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1128
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1129 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1130 /* ti_nuc_monitor_Thread_log() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1131 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1132 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1133 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1134 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1135 /* This function permits to include the Thread and */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1136 /* timer value in the log buffer */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1137 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1138
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1139 void ti_nuc_monitor_Thread_log( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1140 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1141 SYS_UWORD16 timer_value;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1142 SYS_UWORD8 i;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1143
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1144 if( ti_nuc_monitor_state == NUC_MONITOR_RUNNING )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1145 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1146
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1147 // Exit Idle mode if reached
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1148
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1149 ti_nuc_monitor_idle_reached = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1150
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1151 // Check if page must be changed
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1152 if( ti_nuc_monitor_change_thread_page == 1 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1153 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1154
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1155 ti_nuc_monitor_change_thread_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1156
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1157 // copy current to next
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1158 ti_nuc_monitor_Thread_next_pos = ti_nuc_monitor_Thread_current_pos;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1159 ti_nuc_monitor_Thread_next_page = ti_nuc_monitor_Thread_current_page;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1160
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1161 // Reset current pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1162 ti_nuc_monitor_Thread_current_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1163
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1164 // Change page
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1165 if( ti_nuc_monitor_Thread_current_page == 0 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1166 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1167 ti_nuc_monitor_Thread_current_page = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1168 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1169 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1170 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1171 ti_nuc_monitor_Thread_current_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1172 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1173
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1174 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1175
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1176 // Search the ID considering the Nucleus_Current_thread Pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1177
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1178 for( i = 0; i < ti_nuc_monitor_thread_pos ; i++ )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1179 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1180 if( ti_nuc_monitor_thread_id[ i ] == (SYS_UWORD32) TCD_Current_Thread )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1181 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1182 // insert the OP Code Thread \| ID
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1183 ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1184 [ ti_nuc_monitor_Thread_current_pos ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1185 (SYS_UWORD8) (C_OP_CODE_THREAD_FLAG \| i);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1186 // exit loop
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1187 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1188 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1189 } // End for
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1190
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1191 // Write the timer value
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1192
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1193 timer_value = TM_ReadTimer(2); // (* (SYS_UWORD16 *) TIMER2_READ_TIM)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1194
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1195 // insert LSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1196
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1197 ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1198 [ ti_nuc_monitor_Thread_current_pos + 1 ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1199 (SYS_UWORD8) (timer_value & 0x00ff);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1200
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1201 // insert MSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1202
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1203 ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1204 [ ti_nuc_monitor_Thread_current_pos + 2 ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1205 (SYS_UWORD8) ((timer_value & 0xff00) >> 8);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1206
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1207 ti_nuc_monitor_Thread_current_pos += 3;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1208
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1209 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1210
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1211 } // ti_nuc_monitor_Thread_log
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1212
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1213 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1214 /* ti_nuc_monitor_Queue_log() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1215 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1216 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1217 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1218 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1219 /* This function permits to include the Queue ID and */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1220 /* status value in the log buffer */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1221 /* Direction = 0 => Send message */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1222 /* Direction = 1 => Receive message */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1223 /* status = 0 => OK */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1224 /* status = 1 => Queue full */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1225 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1226
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1227 void ti_nuc_monitor_Queue_log( SYS_UWORD32* queue_pointer, SYS_UWORD8 status, SYS_UWORD8 Direction )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1228 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1229 SYS_UWORD8 status_word;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1230 SYS_UWORD8 i;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1231
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1232
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1233
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1234 if( ti_nuc_monitor_state == NUC_MONITOR_RUNNING )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1235 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1236
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1237 // Exit Idle mode if reached
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1238
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1239 ti_nuc_monitor_idle_reached = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1240
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1241 // Check if page must be changed
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1242 if( ti_nuc_monitor_change_thread_page == 1 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1243 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1244
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1245 ti_nuc_monitor_change_thread_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1246
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1247 // copy current to next
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1248 ti_nuc_monitor_Thread_next_pos = ti_nuc_monitor_Thread_current_pos;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1249 ti_nuc_monitor_Thread_next_page = ti_nuc_monitor_Thread_current_page;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1250
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1251 // Reset current pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1252 ti_nuc_monitor_Thread_current_pos = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1253
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1254 // Change page
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1255 if( ti_nuc_monitor_Thread_current_page == 0 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1256 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1257 ti_nuc_monitor_Thread_current_page = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1258 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1259 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1260 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1261 ti_nuc_monitor_Thread_current_page = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1262 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1263
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1264 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1265
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1266 // Search the ID considering the Nucleus_Current_thread Pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1267 for( i = 0; i < ti_nuc_monitor_queue_pos ; i++ )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1268 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1269 if( ti_nuc_monitor_queue_id[ i ] == (SYS_UWORD32) queue_pointer)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1270 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1271 // insert the OP Code Thread \| ID
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1272 ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1273 [ ti_nuc_monitor_Thread_current_pos ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1274 (SYS_UWORD8) (C_OP_CODE_QUEUE_FLAG \| i);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1275
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1276 // exit loop
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1277 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1278
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1279 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1280 } // End for
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1281
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1282 // Write the status value and Receive/send flag
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1283
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1284 status_word = (Direction << 8) \| (status << 7) \| i; // Direction \| Status \| ID
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1285
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1286 ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1287 [ ti_nuc_monitor_Thread_current_pos + 1 ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1288 (SYS_UWORD8) (status_word);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1289
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1290 ti_nuc_monitor_Thread_current_pos += 2;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1291
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1292 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1293
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1294 } // ti_nuc_monitor_Queue_log
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1295
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1296
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1297
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1298 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1299 /* ti_nuc_monitor_sleep() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1300 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1301 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1302 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1303 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1304 /* This function permits to include the sleep and */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1305 /* timer value in the log buffer */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1306 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1307
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1308 void ti_nuc_monitor_sleep( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1309 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1310
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1311 SYS_UWORD16 timer_value;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1312 SYS_UWORD8 i;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1313
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1314 if(( ti_nuc_monitor_state == NUC_MONITOR_RUNNING ) &&
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1315 ( ti_nuc_monitor_idle_reached == 0 ))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1316 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1317
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1318 ti_nuc_monitor_idle_reached = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1319
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1320 // insert the OP Code Thread \| ID
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1321 ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1322 [ ti_nuc_monitor_Thread_current_pos ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1323 (SYS_UWORD8) (0xBF);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1324
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1325 // Write the timer value
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1326
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1327 timer_value = TM_ReadTimer(2); // (* (SYS_UWORD16 *) TIMER2_READ_TIM)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1328
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1329 // insert LSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1330
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1331 ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1332 [ ti_nuc_monitor_Thread_current_pos + 1 ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1333 (SYS_UWORD8) (timer_value & 0x00ff);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1334
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1335 // insert MSB
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1336
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1337 ti_nuc_monitor_Thread_Buffer[ ti_nuc_monitor_Thread_current_page ]
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1338 [ ti_nuc_monitor_Thread_current_pos + 2 ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1339 (SYS_UWORD8) ((timer_value & 0xff00) >> 8);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1340
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1341 ti_nuc_monitor_Thread_current_pos += 3;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1342 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1343
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1344 } // ti_nuc_monitor_sleep
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1345
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1346 // -------------- RVT Copied function --------------------------------
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1347 // --- Modified Memory Bank ----
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1348
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1349 /********************************************************************************/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1350 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1351 /* Function Name: ti_nuc_monitor_mem_alloc */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1352 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1353 /* Purpose: this function creates a memory bank for the profiler task*/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1354 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1355 /* Input Parameters: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1356 /* refer to t_rvt_type.h */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1357 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1358 /* Output Parameters: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1359 /* refer to t_rvt_type.h */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1360 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1361 /* Global Parameters: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1362 /* None. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1363 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1364 /* Note: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1365 /* None. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1366 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1367 /********************************************************************************/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1368
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1369
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1370 T_RVT_RET ti_nuc_monitor_mem_alloc(T_RVT_USER_ID user_id, T_RVT_MSG_LG buffer_lenght, T_RVT_BUFFER * buff)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1371 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1372 T_RVF_MB_STATUS return_value;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1373
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1374 return_value = rvf_get_buf (prof_mb_id, (UINT32) buffer_lenght + RVT_HEADER_SIZE, (T_RVF_BUFFER**) buff);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1375
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1376 if (return_value == RVF_RED)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1377 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1378 *buff = NULL;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1379 return RVT_MEMORY_ERR;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1380 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1381 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1382 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1383 buff = buff + RVT_HEADER_SIZE;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1384 return RVT_OK;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1385 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1386 } // ti_nuc_monitor_mem_alloc
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1387
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1388 // -------------------------------------------------------------------
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1389
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1390 #endif // TI_NUC_MONITOR
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1391
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1392 #if (TI_PROFILER == 1) \|\| (TI_NUC_MONITOR == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1393
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1394 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1395 /* ti_prf_init() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1396 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1397 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1398 /* Description: Initialize profiling hisrs */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1399 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1400 /* Register the profiling to rvt */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1401 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1402 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1403
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1404 void ti_prf_init( void )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1405 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1406 #if (TI_PROFILER == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1407 ti_profiler_init_profiler_module();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1408 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1409 #if (TI_NUC_MONITOR == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1410 ti_nuc_monitor_init_module();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1411 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1412 // Register to Trace task module
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1413 rvt_register_id( "PROF", &prof_trace_id, ti_profiler_trace_rx_callback );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1414
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1415 } // ti_prf_init
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1416
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1417 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1418 /* ti_prf_core() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1419 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1420 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1421 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1422 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1423 /* this function : */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1424 /* - start the profiler on PC side message reception */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1425 /* - stop the profiler on PC side message reception */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1426 /* - cut the profiler buffer less than 256 bytes */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1427 /* messages to rvt */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1428 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1429 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1430
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1431 T_RV_RET ti_prf_core(void)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1432 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1433
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1434 SYS_UWORD16 i = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1435
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1436 SYS_UWORD16 event;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1437 SYS_UWORD16 message_length;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1438 T_PROFILER_MSG *msg;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1439
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1440 while( INFINITE_LOOP )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1441 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1442
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1443 // Suspend the task on empty queue
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1444 event = rvf_wait( RVF_TASK_MBOX_0_EVT_MASK, 0 );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1445 msg = ( T_PROFILER_MSG* ) rvf_read_mbox( RVF_TASK_MBOX_0 );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1446
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1447 // Check the msg ID code
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1448 switch( msg->msg_id )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1449 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1450
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1451 #if (TI_PROFILER == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1452 case TI_PROFILER_OUTPUT_BUFFER :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1453 // Cut the buffer in small element to be sent to
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1454 // PC by the RVT.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1455 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1456 message_length = TRACE_MESSAGE_SIZE;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1457 pos_pr_buffer = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1458
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1459 // loop until end of buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1460 while( pos_pr_buffer < pr_buffer_length )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1461 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1462 // Update message length for next loop turn
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1463 if ( pos_pr_buffer <= ( pr_buffer_length - TRACE_MESSAGE_SIZE ) )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1464 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1465 message_length = TRACE_MESSAGE_SIZE;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1466 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1467 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1468 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1469 message_length = pr_buffer_length - pos_pr_buffer;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1470 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1471
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1472 if( rvt_send_trace_cpy( ( T_RVT_BUFFER ) &pr_buffer[ pos_pr_buffer ],
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1473 prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1474 message_length * 4, // Length in bytes
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1475 RVT_BINARY_FORMAT ) == RVT_OK )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1476 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1477 // Update pr_buffer pointer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1478 pos_pr_buffer += message_length;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1479
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1480 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1481
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1482 } // End while
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1483
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1484 // Restart the profiling at vitam aeternam unless stop command received.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1485 if( profiler_state == PROFILER_FREEZED )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1486 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1487 profiler_state = PROFILER_TO_BE_UNFREEZED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1488 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1489
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1490 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1491 } // TI_PROFILER_OUTPUT_BUFFER
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1492
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1493 case TI_PROFILER_START_PROFILING :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1494 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1495 #if (L1_TRACER == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1496 SendTraces("TI_PROF: msg TI_PROFILER_START\n\r");
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1497 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1498
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1499 ti_profiler_event_state = (T_PROFILER_EVENTS) (msg->event_number);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1500
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1501 if( ti_profiler_event_state == NO_SLEEP_EVENT )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1502 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1503 ti_profiler_nb_sleep_counter_ref = msg->arg1; // nb_tdma
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1504 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1505
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1506 // Source of Activation
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1507 ti_profiler_active = ACTIVE_BY_HOST;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1508
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1509 // change state of profiler
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1510 profiler_state = PROFILER_TO_BE_RAN;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1511
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1512 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1513 } // TI_PROFILER_START_PROFILING
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1514
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1515 case TI_PROFILER_END_PROFILING :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1516 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1517 #if (L1_TRACER == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1518 SendTraces("TI_PROF: msg TI_PROFILER_STOP\n\r");
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1519 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1520
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1521 profiler_state = PROFILER_TO_BE_STOPPED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1522 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1523 } // TI_PROFILER_END_PROFILING
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1524
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1525 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1526
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1527 #if (TI_NUC_MONITOR == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1528
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1529 case TI_NUC_MONITOR_START :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1530 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1531 SYS_UWORD8 i = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1532 SYS_UWORD8 j = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1533 #if (L1_TRACER == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1534 SendTraces("TI_PROF: msg TI_NUC_MONITOR_START\n\r");
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1535 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1536
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1537 if( ti_nuc_monitor_state == NUC_MONITOR_STOPPED )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1538 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1539
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1540 // Output the task and queues create info.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1541 // buffer format is following :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1542 // C_OP_CODE_NUC_MON_THREAD_IDS \| (1 byte)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1543 // < Thread ID0 > \| (1 byte)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1544 // < Thread name > \| (8 bytes)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1545 // < Thread ID1 > \| (1 byte)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1546 // < Thread name > \| (8 bytes)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1547 // ..............
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1548 // C_OP_CODE_NUC_MON_THREAD_IDS \| (1 byte)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1549 // < Queue ID0 > \| (1 byte)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1550 // < Queue name > \| (8 bytes)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1551 // < Queue ID1 > \| (1 byte)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1552 // < Queue name > \| (8 bytes)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1553 // ..............
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1554 // C_OP_CODE_NUC_MON_THREAD_IDS \| (1 byte)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1555
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1556 // Allocate one buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1557
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1558 while ((ti_nuc_monitor_mem_alloc (prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1559 NUC_MONITOR_BUFFER_SIZE,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1560 (T_RVT_BUFFER*) &ti_nuc_monitor_current_buffer))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1561 != RVT_OK);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1562
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1563
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1564 // Output the ID (thread and Queue array)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1565
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1566 ti_nuc_monitor_current_buffer[ti_nuc_monitor_current_position++] = C_OP_CODE_NUC_MON_THREAD_IDS;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1567
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1568 // Output the Thread IDs and corresponding Thread name.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1569
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1570 for( i = 0 ; i < ti_nuc_monitor_thread_pos ; i++ )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1571 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1572 // distinghuish Task and HISR
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1573 if( (( TC_TCB * ) ( ti_nuc_monitor_thread_id[ i ]))->tc_id == TC_HISR_ID)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1574 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1575 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] = (0x80 \| i); // ID
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1576 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1577 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1578 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1579 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] = i; // ID
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1580 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1581
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1582 if( ti_nuc_monitor_current_position >= NUC_MONITOR_BUFFER_SIZE )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1583 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1584 ti_nuc_monitor_check_ID_buffer();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1585 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1586
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1587 // Write task priority
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1588 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1589 (SYS_UWORD8) ((( TC_TCB * ) ( ti_nuc_monitor_thread_id[ i ]))->tc_priority);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1590
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1591 if( ti_nuc_monitor_current_position >= NUC_MONITOR_BUFFER_SIZE )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1592 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1593 ti_nuc_monitor_check_ID_buffer();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1594 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1595
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1596 // Write name in the Log buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1597 for( j = 0 ; j < NU_MAX_NAME ; j++ )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1598 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1599 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1600 (SYS_UWORD8) ((( TC_TCB * ) ( ti_nuc_monitor_thread_id[ i ]))->tc_name[ j ]); // Thread_name
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1601 if( ti_nuc_monitor_current_position >= NUC_MONITOR_BUFFER_SIZE )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1602 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1603 ti_nuc_monitor_check_ID_buffer();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1604 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1605 } // End for
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1606
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1607 } // End for
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1608
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1609 // Output the ID (thread and Queue array)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1610 if( ti_nuc_monitor_queue_pos != 0 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1611 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1612 ti_nuc_monitor_current_buffer[ti_nuc_monitor_current_position++] = C_OP_CODE_NUC_MON_THREAD_IDS;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1613
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1614 // Output the Queue IDs and corresponding Queue name.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1615
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1616 if( ti_nuc_monitor_current_position >= NUC_MONITOR_BUFFER_SIZE )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1617 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1618 ti_nuc_monitor_check_ID_buffer();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1619 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1620
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1621 for( i = 0 ; i < ti_nuc_monitor_queue_pos ; i++ )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1622 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1623 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] = i; // ID
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1624
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1625 if( ti_nuc_monitor_current_position >= NUC_MONITOR_BUFFER_SIZE )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1626 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1627 ti_nuc_monitor_check_ID_buffer();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1628 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1629
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1630 // Write name in the Log buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1631 for( j = 0 ; j < NU_MAX_NAME ; j++ )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1632 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1633 ti_nuc_monitor_current_buffer[ ti_nuc_monitor_current_position++ ] =
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1634 (SYS_UWORD8) ((( QU_QCB * ) ( ti_nuc_monitor_queue_id[ i ] ))->qu_name[ j ]); // Thread_name
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1635 if( ti_nuc_monitor_current_position >= NUC_MONITOR_BUFFER_SIZE )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1636 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1637 ti_nuc_monitor_check_ID_buffer();
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1638 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1639 } // End for
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1640
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1641 } // End for
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1642 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1643
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1644 // Insert end op code (same as begin op code)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1645
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1646 ti_nuc_monitor_current_buffer[ti_nuc_monitor_current_position++] = C_OP_CODE_NUC_MON_THREAD_IDS;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1647
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1648 // flush the last buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1649
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1650 // Send a message to the Riviera Tracer to Output the current buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1651 if( rvt_send_trace_no_cpy( ( T_RVT_BUFFER ) ti_nuc_monitor_current_buffer,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1652 prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1653 ti_nuc_monitor_current_position, // Length in bytes
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1654 RVT_BINARY_FORMAT ) != RVT_OK )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1655 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1656 // Code to insert break point.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1657 ti_nuc_monitor_state = NUC_MONITOR_STOPPED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1658 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1659
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1660 // Configuration buffer has been logged out.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1661
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1662 /*
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1663 ** Allocate a buffer for Nucleus profiling
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1664 */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1665
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1666 while ((ti_nuc_monitor_mem_alloc (prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1667 NUC_MONITOR_BUFFER_SIZE,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1668 (T_RVT_BUFFER*) &ti_nuc_monitor_current_buffer))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1669 != RVT_OK);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1670
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1671 // reset the current pointer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1672 ti_nuc_monitor_current_position = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1673
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1674 // Set the new Monitoring state.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1675 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_STARTED;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1676 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1677
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1678 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1679
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1680 } // TI_NUC_MONITOR_START
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1681
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1682 case TI_NUC_MONITOR_OUTPUT_BUFFER :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1683 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1684 // The buffer is output only if it is full.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1685
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1686 // Send a message to the Riviera Tracer to Output the current buffer.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1687 if( rvt_send_trace_no_cpy( ( T_RVT_BUFFER ) msg->p_buffer,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1688 prof_trace_id,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1689 msg->buffer_size, // Length in bytes
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1690 RVT_BINARY_FORMAT ) != RVT_OK )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1691 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1692 // increment lost messages variable
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1693 ti_nuc_monitor_lost_messages++;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1694 } // End if
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1695
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1696 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1697
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1698 } // TI_NUC_MONITOR_OUTPUT_BUFFER
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1699
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1700 case TI_NUC_MONITOR_STOP :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1701 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1702 #if (L1_TRACER == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1703 SendTraces("TI_PROF: msg TI_NUC_MONITOR_STOP\n\r");
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1704 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1705
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1706 ti_nuc_monitor_state = NUC_MONITOR_TO_BE_STOP;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1707
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1708 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1709
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1710 } // TI_NUC_MONITOR_STOP
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1711
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1712 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1713
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1714 default :
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1715 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1716 #if (L1_TRACER == 1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1717 SendTraces("TI_PROF: msg default\n\r");
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1718 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1719
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1720 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1721 } // default
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1722
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1723 } // End switch
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1724
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1725
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1726 // Free the msg alloc
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1727 rvf_free_buf( msg );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1728
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1729 } // End while ( INFINITE_LOOP )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1730
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1731 } // ti_profiler_task
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1732
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1733
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1734 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1735 /* ti_profiler_trace_rx_callback() */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1736 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1737 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1738 /* Description: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1739 /* ------------ */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1740 /* callback function called when the trace */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1741 /* module receives a msg for the profiler */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1742 /* or the nucleus monitor. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1743 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1744 /-------------------------------------------------------/
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1745
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1746 void ti_profiler_trace_rx_callback(T_RVT_BUFFER trace_msg, UINT16 trace_msg_size)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1747 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1748 T_PROFILER_MSG * msg;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1749
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1750 // send a message to the ti profiler received from Rvt
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1751 if( rvf_get_buf( prof_mb_id, sizeof( T_PROFILER_MSG ), ( T_RVF_BUFFER** ) &msg ) == RVF_GREEN )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1752 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1753 /*
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1754 if( trace_msg[0] == 1 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1755 msg->msg_id = TI_PROFILER_START_PROFILING;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1756 else if ( trace_msg[0] == 0 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1757 msg->msg_id = TI_PROFILER_END_PROFILING;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1758 else if ( trace_msg[0] == 2 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1759 msg->msg_id = TI_NUC_MONITOR_START;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1760 else if ( trace_msg[0] == 3 )
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1761 msg->msg_id = TI_NUC_MONITOR_STOP;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1762 */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1763 msg->msg_id = ((T_PROFILER_MSG_UART*) trace_msg)->msg_id;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1764 msg->event_number = ((T_PROFILER_MSG_UART*) trace_msg)->event_number;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1765 msg->arg1 = ((T_PROFILER_MSG_UART*) trace_msg)->arg1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1766
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1767 rvf_send_msg( prof_addr_id, msg );
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1768 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1769
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1770 } // ti_profiler_trace_rx_callback
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1771
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1772 #endif // NUC_MONITOR \|\| PROFILER
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1773

FreeCalypso > hg > freecalypso-sw

annotate gsm-fw/riviera/rvt/ti_profiler/ti_profiler.c @ 435:c6e1c813e7f0