freecalypso-sw: nuc-fw/riviera/rvt/rvt

author	Michael Spacefalcon <msokolov@ivan.Harhan.ORG>
date	Tue, 29 Oct 2013 07:03:45 +0000
parents
children	28f967578233

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 *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	3 * rvt_task.c
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 * This contains the core of the Trace task.
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 * (C) Texas Instruments, all rights reserved
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 * Version number : 0.1
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	10 *
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	11 * History : 0.1 (7/5/2000) - Created
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 * Date : 7/5/2000
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 * Author : Guido Pagana
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 * Update : Pascal Puel
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	18 * : David Lamy-Charrier (changes for Riviera 1.6)
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
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 "nucleus.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 "rv/general.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	26 #include "rv/rv_general.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	27 #include "rvf/rvf_api.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	28 #include "rvt/rvt_gen.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	29 #include "rvt/rvt_def_i.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	30 #include "rvt/rvt_env.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	31 #include "rvt/rvt_env_i.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	32 #include "rvm/rvm_use_id_list.h"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	33
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	34 #include "uart/serialswitch.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 #ifndef _WINDOWS
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	37 #include "config/swconfig.cfg"
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	38 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	39
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	40 #include <string.h>
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 extern NU_HISR TI_rcv_HISR;
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 /* Time (in milliseconds) between two consecutive 'System Time' messages */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	45 #define RVT_ALIVE_POLLING_TIME (RVF_MS_TO_TICKS (20000))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	46
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	47 #define RVT_WAIT_FOR_HEADER (1)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	48 #define RVT_WAIT_FOR_DATA (2)
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 /********************************************************************************/
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 /* Function Name: rvt_task_core */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	54 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	55 /* Purpose: Core of Trace task. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	56 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	57 /* Input Parameters: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	58 /* None. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	59 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	60 /* Output Parameters: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	61 /* None. */
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 /* Global Parameters: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	64 /* None. */
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 /* Note: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	67 /* None. */
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 T_RVM_RETURN rvt_task_core (void)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	71 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	72 UINT16 event = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	73 UINT32 nb_bytes_sent = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	74
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	75 #ifdef FRAMING_PROTOCOL
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	76
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	77 // Request for the level of filtering, as well as the 32-bit
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	78 // mask related to the software entities to be monitored.
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 UINT8 trace_level_request[] = {RVM_INVALID_USE_ID, 0, 0, 0, 0, (RV_TRACE_LEVEL_ERROR - 1), 0, 0, 0, 0};
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	81
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	82 // Note that the level is defined as invalid
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	83 trace_level_request[0] = (char) rv_trace_user_id;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	84
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	85 // Transmit an 'empty' message
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	86 nb_bytes_sent = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	87 while (nb_bytes_sent < sizeof (trace_level_request))
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 nb_bytes_sent += SER_tr_WriteNBytes (SER_LAYER_1,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	90 trace_level_request + nb_bytes_sent,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	91 sizeof (trace_level_request) - nb_bytes_sent);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	92 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	93 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	94
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	95 // Start the 'Alive Polling Timer'
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	96 #if (OP_WCP == 0)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	97 rvf_start_timer (RVF_TIMER_0,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	98 RVT_ALIVE_POLLING_TIME,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	99 TRUE);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	100 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	101
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	102 for (;
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 )
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 // Infinite wait on 'Trace Task' mailbox or timer events
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	107 event = rvf_wait ((1 << RVT_TRACE_MAILBOX) \| (RVF_TIMER_0_EVT_MASK),
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	108 0);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	109
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	110 // Check for some messages lost
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	111 if (((rvt_lost_msg_cpt.bit_mask).count >= RVT_MAX_LOST_TRACE_MSG) && (p_rvt_lost_msg))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	112 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	113 INT8 count = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	114 UINT8 lost_msg_length = RVT_HDR_LENGTH + RVT_LOST_MSG_LENGTH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	115 UINT32 lost_msg_cpt = rvt_lost_msg_cpt.overall_value;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	116
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	117 // Append with the number of messages lost
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	118 rvt_lost_msg_cpt.overall_value = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	119 for (count = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	120 count < RVT_HEX_VALUE_LENGTH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	121 count++)
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 p_rvt_lost_msg[lost_msg_length + count] = Num2Char[(UINT8) ((lost_msg_cpt << (count << 2)) >> 28)];
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 lost_msg_length += RVT_HEX_VALUE_LENGTH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	126
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	127 // Send message to the UART with byte stuffing
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	128 nb_bytes_sent = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	129 while (nb_bytes_sent < lost_msg_length)
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 nb_bytes_sent += SER_tr_WriteNBytes (SER_LAYER_1,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	132 (UINT8 *) p_rvt_lost_msg + nb_bytes_sent,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	133 lost_msg_length - nb_bytes_sent);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	134 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	135
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	136 } // End of if ((rvt_lost_msg_cpt.bit_mask).count >= RVT_MAX_LOST_TRACE_MSG)
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 if (event & EVENT_MASK (RVT_TRACE_MAILBOX))
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 T_RV_HDR *msg = NULL;
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 // Read the message from the mailbox
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	143 if ((msg = (T_RV_HDR *) rvf_read_mbox (RVT_TRACE_MAILBOX)) != NULL)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	144 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	145 if (msg->msg_id == RVT_TRACE_RQST_ID)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	146 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	147 UINT8 msg_format = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	148 UINT32 msg_length = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	149
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	150 // Get the length
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	151 msg_length = ((T_RVT_TRACE_RQST *) msg)->msg_length;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	152
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	153 // Get the format
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	154 msg_format = ((T_RVT_TRACE_RQST *) msg)->format;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	155
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	156 // Copy the 'User ID'
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	157 ((UINT8 ) msg + RVT_HEADER_SIZE - 1)[0] = ((T_RVT_TRACE_RQST ) msg)->user_id;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	158 msg_length++;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	159
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	160 switch (msg_format)
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 case RVT_ASCII_FORMAT:
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 // Send message to the UART without byte stuffing
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	165 nb_bytes_sent = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	166 while (nb_bytes_sent < msg_length)
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 nb_bytes_sent += SER_tr_EncapsulateNChars (SER_LAYER_1,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	169 (char *) msg + RVT_HEADER_SIZE - 1 + nb_bytes_sent,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	170 msg_length - nb_bytes_sent);
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 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	173 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	174 case RVT_BINARY_FORMAT:
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	175 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	176 // Send message to the UART with byte stuffing
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	177 nb_bytes_sent = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	178 while (nb_bytes_sent < msg_length)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	179 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	180 nb_bytes_sent += SER_tr_WriteNBytes (SER_LAYER_1,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	181 (UINT8 *) msg + RVT_HEADER_SIZE - 1 + nb_bytes_sent,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	182 msg_length - nb_bytes_sent);
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 break;
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 default:
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	187 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	188 // Increment the number of messages lost.
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	189 // Is the buffer corrupted?
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	190 (rvt_lost_msg_cpt.bit_mask).count++;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	191 (rvt_lost_msg_cpt.bit_mask).unknown_format = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	192 break;
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 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	195
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	196 // Deallocate the buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	197 rvf_free_buf (msg);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	198
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	199 } // End of if (msg->msg_id == RVT_TRACE_RQST_ID)
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 else
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 // Increment the number of messages lost. Is the buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	204 // corrupted?
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	205 (rvt_lost_msg_cpt.bit_mask).count++;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	206 (rvt_lost_msg_cpt.bit_mask).unknown_request = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	207 }
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 } // End of if (msg != NULL)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	210
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	211 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	212 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	213 // Increment the number of messages lost. Is the buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	214 // corrupted?
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	215 (rvt_lost_msg_cpt.bit_mask).count++;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	216 (rvt_lost_msg_cpt.bit_mask).message_empty = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	217 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	218
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	219 } // End of if (event & EVENT_MASK (RVT_TRACE_MAILBOX))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	220
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	221 if ((event & (RVF_TIMER_0_EVT_MASK)) && (p_rvt_sys_time))
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 UINT8 count = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	224 UINT8 sys_time_length = RVT_HDR_LENGTH + RVT_SYS_TIME_LENGTH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	225 UINT32 current_time = rvf_get_tick_count ();
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 // Append with the system time
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	228 for (count = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	229 count < RVT_HEX_VALUE_LENGTH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	230 count++)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	231 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	232 p_rvt_sys_time[sys_time_length + count] = Num2Char[(UINT8) ((current_time << (count << 2)) >> 28)];
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 sys_time_length += RVT_HEX_VALUE_LENGTH;
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 // Send message to the UART with byte stuffing
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	237 nb_bytes_sent = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	238 while (nb_bytes_sent < sys_time_length)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	239 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	240 nb_bytes_sent += SER_tr_WriteNBytes (SER_LAYER_1,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	241 (UINT8 *) p_rvt_sys_time + nb_bytes_sent,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	242 sys_time_length - nb_bytes_sent);
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
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	245 } // End of if (event & (RVF_TIMER_0_EVT_MASK))
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 #else
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 // Start the 'Alive Polling Timer'
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	250 #if (OP_WCP == 0)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	251 rvf_start_timer (RVF_TIMER_0,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	252 RVT_ALIVE_POLLING_TIME,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	253 TRUE);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	254 #endif
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 for (;
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 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	260 // Infinite wait on 'Trace Task' mailbox or timer events
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	261 event = rvf_wait ((1 << RVT_TRACE_MAILBOX) \| (RVF_TIMER_0_EVT_MASK),
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	262 0);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	263
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	264 // Check for some messages lost
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	265 if (((rvt_lost_msg_cpt.bit_mask).count >= RVT_MAX_LOST_TRACE_MSG) && (p_rvt_lost_msg))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	266 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	267 INT8 count = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	268 UINT8 lost_msg_length = RVT_LOST_MSG_LENGTH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	269 UINT32 lost_msg_cpt = rvt_lost_msg_cpt.overall_value;
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 // Append with the number of messages lost
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	272 rvt_lost_msg_cpt.overall_value = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	273 for (count = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	274 count < RVT_HEX_VALUE_LENGTH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	275 count ++)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	276 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	277 p_rvt_lost_msg[lost_msg_length + count] = Num2Char[(UINT8) ((lost_msg_cpt << (count << 2)) >> 28)];
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 rvt_lost_msg_length += RVT_HEX_VALUE_LENGTH;
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 // Append with the '\n' and '\r' characters for the hyper terminal
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	282 p_rvt_lost_msg[lost_msg_length++] = '\n';
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	283 p_rvt_lost_msg[lost_msg_length++] = '\r';
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 // Send the message to the UART without byte stuffing
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	286 nb_bytes_sent = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	287 while (nb_bytes_sent < lost_msg_length)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	288 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	289 nb_bytes_sent += SER_tr_WriteNChars (SER_LAYER_1,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	290 (UINT8 *) p_rvt_lost_msg + nb_bytes_sent,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	291 lost_msg_length - nb_bytes_sent);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	292 }
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 } // End of if ((rvt_lost_msg_cpt.bit_mask).count >= RVT_MAX_LOST_TRACE_MSG)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	295
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	296 if (event & EVENT_MASK (RVT_TRACE_MAILBOX))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	297 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	298 T_RV_HDR *msg = NULL;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	299
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	300 // Read the message from the mailbox
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	301 if ((msg = (T_RV_HDR *) rvf_read_mbox (RVT_TRACE_MAILBOX)) != NULL)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	302 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	303 if (msg->msg_id == RVT_TRACE_RQST_ID)
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 UINT32 msg_length = 0;
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 // Get the length
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	308 msg_length = ((T_RVT_TRACE_RQST *) msg)->msg_length;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	309
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	310 // Send message to the UART without byte stuffing
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	311 nb_bytes_sent = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	312 while (nb_bytes_sent < msg_length)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	313 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	314 nb_bytes_sent += SER_tr_WriteNChars (SER_LAYER_1,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	315 msg + RVT_HEADER_SIZE + nb_bytes_sent,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	316 msg_length - nb_bytes_sent);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	317 }
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 // Append with the '\n' and '\r' characters for the hyper terminal
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	320 msg_length = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	321 msg[msg_length++] = '\n';
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	322 msg[msg_length++] = '\r';
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	323
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	324 // Send message to the UART without byte stuffing
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	325 nb_bytes_sent = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	326 while (nb_bytes_sent < msg_length)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	327 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	328 nb_bytes_sent += SER_tr_WriteNChars (SER_LAYER_1,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	329 msg + nb_bytes_sent,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	330 msg_length - nb_bytes_sent);
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 // Deallocate the buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	334 rvf_free_buf (msg);
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 } // End of if (msg->msg_id == RVT_TRACE_RQST_ID)
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 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	339 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	340 // Increment the number of messages lost. Is the buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	341 // corrupted?
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	342 (rvt_lost_msg_cpt.bit_mask).count++;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	343 (rvt_lost_msg_cpt.bit_mask).unknown_request = 1;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	344 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	345
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	346 } // End of if (msg != NULL)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	347
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	348 else
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	349 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	350 // Increment the number of messages lost. Is the buffer
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	351 // corrupted?
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	352 (rvt_lost_msg_cpt.bit_mask).count++;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	353 (rvt_lost_msg_cpt.bit_mask).message_empty = 1;
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
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	356 } // End of if (event & EVENT_MASK (RVT_TRACE_MAILBOX))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	357
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	358 if ((event & (RVF_TIMER_0_EVT_MASK)) && (p_rvt_sys_time))
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 UINT8 count = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	361 UINT8 sys_time_length = RVT_SYS_TIME_LENGTH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	362 UINT32 current_time = rvf_get_tick_count ();
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 // Append with the system time
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	365 for (count = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	366 count < RVT_HEX_VALUE_LENGTH;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	367 count++)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	368 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	369 p_rvt_sys_time[sys_time_length + count] = Num2Char[(UINT8) ((current_time << (count << 2)) >> 28)];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	370 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	371 sys_time_length += RVT_HEX_VALUE_LENGTH;
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 // Append with the '\n' and '\r' characters for the hyper terminal
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	374 p_rvt_sys_time[sys_time_length++] = '\n';
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	375 p_rvt_sys_time[sys_time_length++] = '\r';
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	376
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	377 // Send message to the UART without byte stuffing
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	378 nb_bytes_sent = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	379 while (nb_bytes_sent < sys_time_length)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	380 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	381 nb_bytes_sent += SER_tr_WriteNChars (SER_LAYER_1,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	382 (UINT8 *) p_rvt_sys_time + nb_bytes_sent,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	383 sys_time_length - nb_bytes_sent);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	384 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	385
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	386 } // End of if (event & (RVF_TIMER_0_EVT_MASK))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	387 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	388 #endif
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	389 }
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
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	392 /********************************************************************************/
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 /* Function Name: rvt_RX_process */
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 /* Purpose: This function is called when characters are received */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	397 /* on the serial port on receive HISR. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	398 /* */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	399 /* Input Parameters: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	400 /* None. */
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 /* Output Parameters: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	403 /* None. */
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 /* Global Parameters: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	406 /* None. */
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 /* Note: */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	409 /* None. */
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	410 /* */
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 void rvt_RX_process (void)
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 UINT32 bytesRead;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	415 static UINT8 inBuffer[255];
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	416
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	417 #ifdef FRAMING_PROTOCOL
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	418 BOOL eof = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	419 static UINT8 rcv_state = RVT_WAIT_FOR_HEADER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	420 static UINT32 total_bytesRead = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	421 static RVT_CALLBACK_FUNC rx_callback_func = NULL;
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 // Get all bytes from the UART RX FIFO
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	424 for (;
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 )
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 // Read and destuff the UART RX FIFO and fill inBuffer with received
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	429 // bytes
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	430 bytesRead = SER_tr_ReadNBytes (SER_LAYER_1,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	431 (char *) (inBuffer + total_bytesRead),
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	432 sizeof (inBuffer) - total_bytesRead,
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	433 &eof);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	434
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	435 // Check for the header. Hence, get the sendee
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	436 if ((rcv_state == RVT_WAIT_FOR_HEADER) && \
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	437 (bytesRead) && \
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	438 !(total_bytesRead))
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 if ((inBuffer[0] == RVT_RV_HEADER) \|\| \
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	441 (inBuffer[0] == RVT_L1_HEADER) \|\| \
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	442 (inBuffer[0] == RVT_L23_HEADER) \|\| \
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	443 (inBuffer[0] == RVT_TM_HEADER) \|\| \
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	444 (inBuffer[0] == RVT_RNET_HEADER) \|\| \
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	445 (inBuffer[0] == RVT_PROF_HEADER) \|\| \
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	446 (inBuffer[0] == RVT_GTTBACK_HEADER) \|\| \
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	447 (inBuffer[0] == RVT_OTHER_HEADER))
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	448 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	449 UINT8 idtab = 0;
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 // Search for the ID in the table
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	452 for (idtab = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	453 rvt_user_db[idtab].user_id != RVT_INVALID_HEADER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	454 idtab++)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	455 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	456 if (rvt_user_db[idtab].user_id == inBuffer[0])
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	457 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	458 rx_callback_func = rvt_user_db[idtab].rx_callback_func;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	459 break;
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 rcv_state = RVT_WAIT_FOR_DATA;
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
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	466 // Update the total number of bytes read, regarding the current frame
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	467 total_bytesRead += bytesRead;
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 // Call the corresponding callback function when a complete message is
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	470 // received (eof odd)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	471 if (eof & 0x01)
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 // Invoke the callback function
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	474 if (rx_callback_func != NULL)
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 rx_callback_func ((T_RVT_BUFFER) (inBuffer + 1),
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	477 total_bytesRead - 1);
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	478 rx_callback_func = NULL;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	479 }
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	480
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	481 // Wait for the next frame to come
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	482 rcv_state = RVT_WAIT_FOR_HEADER;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	483 total_bytesRead = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	484 }
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 // inBuffer may be full due to some synchro lost problems
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	487 else if (total_bytesRead == sizeof (inBuffer))
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 // If still waiting for the header, discard received characters and
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	490 // reset static variables for the next frame to come
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	491 if (rcv_state == RVT_WAIT_FOR_HEADER)
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	492 {
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	493 total_bytesRead = 0;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	494 break;
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	495 }
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 // Just discard characters received as payload
21de8d8e6ea7 checking in Riviera code from the Sotomodem version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	498 total_bytesRead = sizeof (inBuffer[0]);
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

118

21de8d8e6ea7 checking in Riviera code from the Sotomodem version