fc-magnetite: src/gpf2/tst/drv/mux

annotate src/gpf2/tst/drv/mux_pei.c @ 665:2795a11973b8

UART PS entity: added trace of line state changes

author	Mychaela Falconia <falcon@freecalypso.org>
date	Wed, 27 May 2020 22:46:55 +0000
parents	cd37d228dae0
children

rev	line source
294 cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	3 \| File: mux_pei.c
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	5 \| Copyright 2002 Texas Instruments Berlin, AG
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6 \| All rights reserved.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	8 \| This file is confidential and a trade secret of Texas
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	9 \| Instruments Berlin, AG
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10 \| The receipt of or possession of this file does not convey
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11 \| any rights to reproduce or disclose its contents or to
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	12 \| manufacture, use, or sell anything it may describe, in
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	13 \| whole, or in part, without the specific written consent of
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	14 \| Texas Instruments Berlin, AG.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	15 +-----------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	16 \| Purpose : This module implements the process body interface
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	17 \| for the entity mux (used by tst for multiplexer driver).
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	18 +-----------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	19 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	20
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21 #ifndef MUX_PEI_C
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	22 #define MUX_PEI_C
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23 #endif
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25 #ifndef ENTITY_MUX
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26 #define ENTITY_MUX
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	27 #endif
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29 #define ENTITY_UART /* test only */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	31 /==== INCLUDES =============================================================/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	34 #include "stdlib.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35 #include <stdio.h>
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36 #include "string.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37 #include "typedefs.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	39 #include "tools.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	40 #include "os.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41 #include "gdi.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42 #include "vsi.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 #include "glob_defs.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44 #include "frame.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 #include "prim.h" /* to get the definitions of used SAP and directions */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46 #include "gsm.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47 #include "pei.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48 #include "route.h"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 #include "dti.h" /* functionality of the dti library */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50 #include "mux.h" /* to get the global entity definitions */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52 /==== CONSTS ================================================================/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54 #undef VSI_CALLER
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55 #define VSI_CALLER m_handle,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58 * Wait as long as possible. This is the time in ms that is waited for a
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59 * message in the input queue in the active variant.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60 * It can be decreased by the customer.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 #define MUX_TIMEOUT 0xffffffff
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64 /==== TYPES =================================================================/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66 typedef struct
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68 char *version;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 } T_MONITOR;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71 /==== GLOBAL VARIABLES ======================================================/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72 /==== LOCALS ================================================================/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74 static int m_first = 1;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 static T_MONITOR m_mon;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 static int m_uart_ready = 0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79 static T_desc2 * m_send_data=NULL;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80 static USHORT m_send_len=0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82 T_HANDLE m_handle;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 T_DRV_SIGNAL m_signal;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 GLOBAL DTI_HANDLE mtst_hDTI; /* handle for DTI library */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 T_QMSG QueueMsg;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 /==== EXTERNAL DEFINED FUNCTIONS ==========================================/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89 /==== PRIMITIVE HANDLER FUNCTIONS ==========================================/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91 static void primitive_not_supported (T_PRIM_HEADER *data);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 static void dti_data_req (T_DTI2_DATA_REQ *ptr);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 * Jumptables to primitive handler functions. One table per SAP.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 *
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97 * Use MAK_FUNC_0 for primitives which contains no SDU.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98 * Use MAK_FUNC_S for primitives which contains a SDU.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 LOCAL const T_FUNC dti_ul_table[] = {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 MAK_FUNC_0( primitive_not_supported , DTI2_CONNECT_REQ ), /* 3700x */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 MAK_FUNC_0( primitive_not_supported , DTI2_CONNECT_RES ), /* 3701x */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104 MAK_FUNC_0( primitive_not_supported , DTI2_DISCONNECT_REQ ), /* 3702x */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105 MAK_FUNC_0( primitive_not_supported , DTI2_GETDATA_REQ ), /* 3703x */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106 MAK_FUNC_0( dti_data_req , DTI2_DATA_REQ ) /* 3704x */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107 #if defined (_SIMULATION_)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108 ,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109 MAK_FUNC_S( primitive_not_supported , DTI2_DATA_TEST_REQ )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110 #endif /* _SIMULATION_ */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 };
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 LOCAL const T_FUNC dti_dl_table[] = {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114 MAK_FUNC_0( pei_dti_dti_connect_ind , DTI2_CONNECT_IND ), /* 7700x */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115 MAK_FUNC_0( pei_dti_dti_connect_cnf , DTI2_CONNECT_CNF ), /* 7701x */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116 MAK_FUNC_0( pei_dti_dti_disconnect_ind , DTI2_DISCONNECT_IND ), /* 7702x */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117 MAK_FUNC_0( pei_dti_dti_ready_ind , DTI2_READY_IND ), /* 7703x */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 MAK_FUNC_0( pei_dti_dti_data_ind , DTI2_DATA_IND ) /* 7704x */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119 #if defined (_SIMULATION_)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120 ,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121 MAK_FUNC_S( pei_dti_dti_data_test_ind , DTI2_DATA_TEST_IND )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122 #endif /* _SIMULATION_ */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123 };
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126 /==== PRIVATE FUNCTIONS ====================================================/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 \| Function : primitive_not_supported
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 \| Description : This function handles unsupported primitives.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134 \| Parameters : data - not used
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136 \| Return : void
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 static void primitive_not_supported (T_PRIM_HEADER *data)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 //TRACE_FUNCTION ("primitive_not_supported");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143 PFREE (data);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148 \| Function : pei_primitive
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150 \| Description : Process protocol specific primitive.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 \| Parameters : prim - pointer to the received primitive
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154 \| Return : PEI_OK - function succeeded
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155 \| PEI_ERROR - function failed
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158 \| \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159 TST UART UPLINK
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160 \| \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161 +------v-----------v-------+
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162 \| \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163 \| MUX \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164 \| \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165 +-------------^------------+
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 UART DOWNLINK
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171 static short pei_primitive (void *ptr)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	173 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	174 * the following line of code causes a warning on tms470 compiler, that cannot be avoided
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175 * without changing the PEI interface. Warning will not cause a problem
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	176 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	177 T_PRIM * prim=(T_PRIM*)ptr;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179 //TRACE_FUNCTION ("pei_primitive");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	181 if (prim != NULL)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183 unsigned short opc = (unsigned short)prim->custom.opc;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184 unsigned short n;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185 const T_FUNC *table;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188 * This must be called for Partition Pool supervision. Will be replaced
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189 * by another macro some time.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	191 VSI_PPM_REC (&prim->custom, __FILE__, __LINE__);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	192
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	193 //PTRACE_IN (opc);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	194
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195 switch (opc & OPC_MASK)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	196 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197 case DTI_DL: /* defined in prim.h */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 table = dti_dl_table;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199 n = TAB_SIZE (dti_dl_table);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201 * to be able to distinguish DTI1/DTI2 opcodes,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	202 * the ones for DTI2 start at 0x50
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204 opc -= 0x50;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	205 break;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206 case DTI_UL: /* defined in prim.h */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 table = dti_ul_table;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208 n = TAB_SIZE (dti_ul_table);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210 * to be able to distinguish DTI1/DTI2 opcodes,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211 * the ones for DTI2 start at 0x50
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213 opc -= 0x50;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214 break;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215 default:
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216 table = NULL;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	217 n = 0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218 break;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	219 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	221 if (table != NULL)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223 if ((opc & PRM_MASK) < n)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	224 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	225 table += opc & PRM_MASK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 P_SDU(prim) = table->soff ?
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	227 (T_sdu) (((char)&prim->data) + table->soff) : 0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	228 P_LEN(prim) = table->size + sizeof (T_PRIM_HEADER);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229 JUMP (table->func) (P2D(prim));
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231 else
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	232 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	233 primitive_not_supported (P2D(prim));
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235 return PEI_OK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	236 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	237
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	238 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	239 * primitive is not a GSM primitive - forward it to the environment
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241 if (opc & SYS_MASK)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242 vsi_c_primitive (VSI_CALLER prim);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243 else
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	245 PFREE (P2D(prim));
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246 return PEI_ERROR;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	248 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249 return PEI_OK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 \| Function : pei_init
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256 \| Description : Initialize Protocol Stack Entity
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	257 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	258 \| Parameters : handle - task handle
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260 \| Return : PEI_OK - entity initialised
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	261 \| PEI_ERROR - entity not (yet) initialised
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	264 static short pei_init (T_HANDLE handle)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	266 /* Initialize task handle */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	267 m_handle = handle;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268 mux_data.dti_state = CLOSED;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	269
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	270 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271 * initialize dtilib for this entity
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	272 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273 mtst_hDTI = dti_init(
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	274 1, /* max simultaneous connections */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	275 handle,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	276 DTI_NO_TRACE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	277 pei_sig_callback
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278 );
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 if(!mtst_hDTI)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280 return PEI_ERROR;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	281
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	282 /* set no suspend for us and TST */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 vsi_trcsuspend ( VSI_CALLER vsi_c_open (0,"MTST"), 0);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	284 vsi_trcsuspend ( VSI_CALLER vsi_c_open (0,"TST"), 0);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	285
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286 return (PEI_OK);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	288
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	290 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	291 \| Function : pei_timeout
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	293 \| Description : Process timeout.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	294 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	295 \| Parameters : index - timer index
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	296 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	297 \| Return : PEI_OK - timeout processed
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	298 \| PEI_ERROR - timeout not processed
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	300 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	301 static short pei_timeout (unsigned short index)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	303 //TRACE_FUNCTION ("pei_timeout");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	304
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	305 /* Process timeout */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306 switch (index)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	307 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	308 case 0:
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	309 /* Call of timeout routine */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	310 break;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	311 default:
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	312 //TRACE_ERROR("Unknown Timeout");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	313 return PEI_ERROR;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	314 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	315
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	316 return PEI_OK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	317 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	318
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	319 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	321 \| Function : pei_signal
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	322 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	323 \| Description : Process signal.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	324 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	325 \| Parameters : opc - signal operation code
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	326 \| data - pointer to primitive
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	327 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	328 \| Return : PEI_OK - signal processed
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 \| PEI_ERROR - signal not processed
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	330 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	331 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	332 static short pei_signal (unsigned long opc, void* data)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	333 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	334 //TRACE_FUNCTION ("pei_signal");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	335
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	336 /* Process signal */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	337 switch (opc)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	338 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339 default:
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	340 //TRACE_ERROR("Unknown Signal OPC");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341 return PEI_ERROR;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	342 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	343
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	344 return PEI_OK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	345 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	346
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	347 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	348 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349 \| Function : pei_exit
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	351 \| Description : Close Resources and terminate.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	353 \| Parameters : -
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	354 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355 \| Return : PEI_OK - exit sucessful
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	357 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358 static short pei_exit (void)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	359 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	360 //TRACE_FUNCTION ("pei_exit");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	362 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	363 * Close communication channels
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	365
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	366 if (mux_data.dti_state NEQ CLOSED)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368 dti_close
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369 (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	370 mtst_hDTI,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	371 MTST_DTI_DN_INSTANCE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 MTST_DTI_DN_INTERFACE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373 MTST_DTI_DN_CHANNEL,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374 FALSE
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375 );
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376 mux_data.dti_state = CLOSED;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	379 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	380 * Shut down dtilib
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382 dti_deinit(mtst_hDTI);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	383
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 return PEI_OK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388 /* for test only - begin */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389 #define MTST_TRACE 0x4f20
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	390 typedef struct {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	391 char str[80];
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	392 } T_MTST_TRACE;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	393
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	394 void trace_aci(const char* str)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396 PALLOC(ptr,MTST_TRACE);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397 strcpy(ptr->str,str);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	398
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	399 PSEND(vsi_c_open(VSI_CALLER "MMI"), ptr);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401 /* for test only - end */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	403 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	404 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	405 \| Function : pei_config
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	407 \| Description : Dynamic Configuration.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	408 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409 \| Parameters : Buffer - configuration string (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410 \| to start: "<DTI-partner> <tui> <c_id>"
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411 \| to stop: "STOP")
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	413 \| Return : PEI_OK - sucessful
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	414 \| PEI_ERROR - not successful
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	415 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	416 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	417 static short pei_config (char *Buffer)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	419 char token [10];
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	420 char peer_name [10];
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422 USHORT len;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	423
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	424 ULONG link_id;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	425
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	426 //TRACE_FUNCTION ("pei_config");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	427 //TRACE_FUNCTION (Buffer);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	428
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	429 if ( ConfigTimer ( VSI_CALLER Buffer, NULL ) == VSI_OK )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430 return PEI_OK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	431
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	432 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	433 * further dynamic configuration
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	436 /* interprete configuration string */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	437 if (!(len = GetNextToken (Buffer, token, " #")))
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439 return DRV_INVALID_PARAMS;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	440 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	441 else
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	442 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443 Buffer += (len+1);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	444 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	445 if (strcmp(token,"STOP")==0)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	446 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	447 dti_close
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	448 (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	449 mtst_hDTI,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	450 MTST_DTI_DN_INSTANCE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	451 MTST_DTI_DN_INTERFACE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	452 MTST_DTI_DN_CHANNEL,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	453 FALSE
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	454 );
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	455 mux_data.dti_state=CLOSED;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	456 mux_data.h_comm_mtst=VSI_ERROR;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	457 m_uart_ready=0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	458 if (mux_data.send_data_buf_count>0) {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459 /* clear send_buffer */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460 T_desc2 *d_new;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461 T_desc2 *d=m_send_data;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462 while (d)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	464 d_new=(T_desc2 *)d->next;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	465 MFREE(d);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466 d=d_new;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469 mux_data.send_data_buf_count=0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	470 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472 return PEI_OK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	474 strcpy(peer_name, token);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	476 if (!(len = GetNextToken (Buffer, token, " #")))
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478 return DRV_INVALID_PARAMS;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480 else
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	482 Buffer += (len+1);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	483 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	484 link_id=atoi(token);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	485
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	486 if(
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	487 dti_open (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	488 mtst_hDTI,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	489 MTST_DTI_DN_INSTANCE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490 MTST_DTI_DN_INTERFACE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491 MTST_DTI_DN_CHANNEL,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	492 0,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493 DTI_CHANNEL_TO_LOWER_LAYER,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494 DTI_QUEUE_UNUSED,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	495 DTI_VERSION_10,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	496 (U8*)peer_name,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497 link_id
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	498 ) EQ FALSE)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499 return DRV_INVALID_PARAMS;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	501 /* reset send_data_buf counter */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	502 mux_data.send_data_buf_count=0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	503
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	504 /* set internal communication handle */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	505 while ( (mux_data.h_comm_mtst=vsi_c_open (0, "MTST")) == VSI_ERROR)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	506 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	507 vsi_t_sleep(0,100);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	508 };
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	509
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	510 /* inform UART that we are ready to receive next data package */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	511 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	512 dti_start
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	513 (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	514 mtst_hDTI,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	515 MTST_DTI_DN_INSTANCE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	516 MTST_DTI_DN_INTERFACE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	517 MTST_DTI_DN_CHANNEL
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	518 );
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	519 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	520
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	521 return PEI_OK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	522 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	523
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	524 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	525 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	526 \| Function : pei_monitor
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	527 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	528 \| Description : Monitoring of physical Parameters.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	529 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	530 \| Parameters : out_monitor - return the address of the data to be monitored
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	531 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	532 \| Return : PEI_OK - sucessful (address in out_monitor is valid)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	533 \| PEI_ERROR - not successful
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	534 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	535 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	536 static short pei_monitor (void ** out_monitor)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	537 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	538 //TRACE_FUNCTION ("pei_monitor");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	539
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	540 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	541 * Version = "0.S" (S = Step).
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	542 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	543 m_mon.version = "MTST 1.0";
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	544 *out_monitor = &m_mon;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	545
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	546 return PEI_OK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	547 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	548
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	549 /==== PUBLIC FUNCTIONS =====================================================/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	550
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	551 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	552 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	553 \| Function : pei_create
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	554 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	555 \| Description : Create the Protocol Stack Entity.
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	556 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	557 \| Parameters : info - Pointer to the structure of entity parameters
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	558 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	559 \| Return : PEI_OK - entity created successfully
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	560 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	561 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	562 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	563 SHORT pei_create (T_PEI_INFO const **info)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	564 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	565 static T_PEI_INFO pei_info =
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	566 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	567 "MTST", /* name */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	568 { /* pei-table */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	569 pei_init,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	570 pei_exit,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	571 pei_primitive,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	572 pei_timeout,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	573 pei_signal,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	574 0,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	575 pei_config,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	576 pei_monitor
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	577 },
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	578 1024, /* stack size */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	579 10, /* queue entries */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	580 100, /* priority (1->low, 255->high) */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	581 0, /* number of timers */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	582 PASSIVE_BODY\|COPY_BY_REF\|TRC_NO_SUSPEND
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	583 /* flags: bit 0 active(0) body/passive(1) */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	584 }; /* bit 1 com by copy(0)/reference(1) */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	585
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	586 //TRACE_FUNCTION ("pei_create");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	587
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	588 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	589 * Close Resources if open
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	590 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	591 if (!m_first)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	592 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	593 pei_exit();
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	594 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	595
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	596 m_first=0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	597
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	598 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	599 * Export startup configuration data
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	600 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	601 *info = &pei_info;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	602
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	603 return PEI_OK;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	604 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	605 /*********+++++-----------------+++++++***++----++********/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	606
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	607 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	608 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	609 \| Function : sig_dti_pei_tx_buffer_ready_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	610 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	611 \| Description : sent from UART to indicate that it is ready to
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	612 \| receive new data via DTI_DATA_REQ
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	613 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	614 \| Parameters :
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	615 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	616 \| Return :
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	617 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	618 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	619 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	620 GLOBAL const void sig_dti_pei_tx_buffer_ready_ind ()
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	621 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	622 m_uart_ready++;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	623 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	624
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	625 /*********+++++-----------------+++++++***++----++********/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	626
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	627 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	628 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	629 \| Function : dti_data_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	630 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	631 \| Description : sent from TST to deliver new data to MTST
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	632 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	633 \| Parameters : ptr - Pointer to the structure of the primitive
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	634 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	635 \| Return :
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	636 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	637 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	638 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	639 static void dti_data_req (T_DTI2_DATA_REQ *ptr)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	640 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	641 T_desc2 *d=0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	642
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	643 /* PPASS without traces */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	644 T_DTI2_DATA_IND prim = (T_DTI2_DATA_IND)ptr;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	645 D_OPC(prim) = (DTI2_DATA_IND);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	646
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	647 if (!m_uart_ready)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	648 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	649 if (mux_data.send_data_buf_count > MAX_SEND_BUF_COUNT-2)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	650 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	651 /* free data */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	652 T_desc2 *d_new;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	653 T_desc2 d=(T_desc2 )prim->desc_list2.first;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	654 while (d)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	655 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	656 d_new=(T_desc2 *)d->next;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	657 MFREE(d);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	658 d=d_new;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	659 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	660
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	661 if (mux_data.send_data_buf_count == MAX_SEND_BUF_COUNT)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	662 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	663 /* buffer full -> free prim and exit */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	664 PFREE(prim);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	665 return;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	666 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	667 else
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	668 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	669 /* buffer almost full -> send SYST information */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	670 char infostr[]="\x02T0036001FMTSTPCO ERROR: SEND-BUFFER FULL\x0a";
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	671 USHORT len=sizeof(infostr)-1;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	672 MALLOC(d,(USHORT)(sizeof(T_desc2)+len-1));
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	673 prim->desc_list2.first=(ULONG)d;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	674 prim->desc_list2.list_len=len;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	675 d->next = 0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	676 d->len = len;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	677 d->size = len;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	678 d->offset = 0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	679 memcpy(d->buffer,infostr,len);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	680 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	681 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	682
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	683 if (m_send_data)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	684 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	685 /* find last send_data descriptor */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	686 d=m_send_data;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	687 while (d->next)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	688 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	689 d=(T_desc2 *)d->next;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	690 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	691 /* concat new data */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	692 d->next=prim->desc_list2.first;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	693 m_send_len+=prim->desc_list2.list_len;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	694 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	695 else
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	696 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	697 m_send_data=(T_desc2 *)prim->desc_list2.first;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	698 d=m_send_data;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	699 while (d)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	700 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	701 m_send_len+=d->len;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	702 d=(T_desc2 *)d->next;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	703 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	704 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	705 mux_data.send_data_buf_count++;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	706
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	707 /* free prim */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	708 PFREE(prim);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	709 return;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	710 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	711
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	712 m_uart_ready--;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	713 mux_data.send_data_buf_count=0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	714
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	715 if (m_send_data)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	716 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	717 /* find last data descriptor in stored data */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	718 d=m_send_data;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	719 while (d->next)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	720 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	721 d=(T_desc2 *)d->next;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	722 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	723 /* concat new data to stored data */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	724 d->next=prim->desc_list2.first;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	725 prim->desc_list2.first=(ULONG)m_send_data;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	726 prim->desc_list2.list_len+=m_send_len;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	727
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	728 /* clear send_data */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	729 m_send_data=(T_desc2 *)0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	730 m_send_len=0;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	731 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	732
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	733 /* send prim */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	734 dti_send_data
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	735 (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	736 mtst_hDTI,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	737 MTST_DTI_DN_INSTANCE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	738 MTST_DTI_DN_INTERFACE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	739 MTST_DTI_DN_CHANNEL,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	740 prim
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	741 );
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	742 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	743
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	744 /*********+++++-----------------+++++++***++----++********/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	745
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	746 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	747 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	748 \| Function : sig_dti_pei_data_received_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	749 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	750 \| Description : sent from UART to deliver new data
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	751 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	752 \| Parameters : ptr - Pointer to the structure of the primitive
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	753 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	754 \| Return :
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	755 \|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	756 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	757 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	758 GLOBAL const void sig_dti_pei_data_received_ind (T_DTI2_DATA_IND *ptr)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	759 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	760 T_DTI2_DATA_IND *prim = ptr;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	761
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	762 /* prevent dtilib from automatically sending flow control primitives */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	763 dti_stop
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	764 (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	765 mtst_hDTI,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	766 MTST_DTI_DN_INSTANCE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	767 MTST_DTI_DN_INTERFACE,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	768 MTST_DTI_DN_CHANNEL
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	769 );
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	770
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	771 if ( mux_data.EnabledSignalType & DRV_SIGTYPE_READ )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	772 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	773 m_signal.SignalType = DRV_SIGTYPE_READ;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	774 m_signal.DrvHandle = mux_data.Handle;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	775
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	776 mux_data.recv_data=(T_desc2 *)prim->desc_list2.first;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	777
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	778 (mux_data.Callback)( &m_signal );
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	779 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	780 PFREE(prim);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	781 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	782
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	783 /*********+++++-----------------+++++++***++----++********/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	784
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	785 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	786 * dtilib wrapping and support functions
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	787 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	788
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	789 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	790 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	791 \| Function : pei_dti_dti_connect_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	792 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	793 \| PURPOSE : Call the process function dti_dti_connect_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	794 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	795 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	796
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	797 GLOBAL const void pei_dti_dti_connect_req (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	798 T_DTI2_CONNECT_REQ *dti_connect_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	799 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	800 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	801 dti_dti_connect_req (mtst_hDTI, dti_connect_req);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	802 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	803
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	804 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	805 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	806 \| Function : pei_dti_dti_connect_cnf
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	807 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	808 \| PURPOSE : Call the process function dti_dti_connect_cnf
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	809 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	810 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	811
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	812 GLOBAL const void pei_dti_dti_connect_cnf (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	813 T_DTI2_CONNECT_CNF *dti_connect_cnf
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	814 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	815 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	816 dti_dti_connect_cnf(mtst_hDTI, dti_connect_cnf);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	817 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	818
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	819 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	820 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	821 \| Function : pei_dti_dti_connect_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	822 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	823 \| PURPOSE : Call the process function dti_dti_connect_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	824 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	825 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	826
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	827 GLOBAL const void pei_dti_dti_connect_ind (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	828 T_DTI2_CONNECT_IND *dti_connect_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	829 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	830 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	831 dti_dti_connect_ind(mtst_hDTI, dti_connect_ind);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	832 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	833
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	834 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	835 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	836 \| Function : pei_dti_dti_connect_res
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	837 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	838 \| PURPOSE : Call the process function dti_dti_connect_res
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	839 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	840 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	841
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	842 GLOBAL const void pei_dti_dti_connect_res (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	843 T_DTI2_CONNECT_RES *dti_connect_res
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	844 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	845 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	846 dti_dti_connect_res(mtst_hDTI, dti_connect_res);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	847 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	848
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	849 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	850 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	851 \| Function : pei_dti_dti_disconnect_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	852 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	853 \| PURPOSE : Call the process function dti_dti_disconnect_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	854 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	855 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	856
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	857 GLOBAL const void pei_dti_dti_disconnect_req (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	858 T_DTI2_DISCONNECT_REQ *dti_disconnect_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	859 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	860 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	861 dti_dti_disconnect_req (mtst_hDTI, dti_disconnect_req);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	862 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	863
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	864 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	865 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	866 \| Function : pei_dti_dti_disconnect_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	867 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	868 \| PURPOSE : Call the process function dti_dti_disconnect_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	869 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	870 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	871
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	872 GLOBAL const void pei_dti_dti_disconnect_ind (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	873 T_DTI2_DISCONNECT_IND *dti_disconnect_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	874 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	875 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	876 dti_dti_disconnect_ind (mtst_hDTI, dti_disconnect_ind);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	877 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	878
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	879 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	880 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	881 \| Function : pei_dti_dti_data_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	882 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	883 \| PURPOSE : Call the process function dti_dti_data_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	884 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	885 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	886
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	887 GLOBAL const void pei_dti_dti_data_req (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	888 T_DTI2_DATA_REQ *dti_data_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	889 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	890 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	891 dti_dti_data_req (mtst_hDTI, dti_data_req);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	892 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	893
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	894 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	895 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	896 \| Function : pei_dti_dti_getdata_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	897 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	898 \| PURPOSE : Call the process function dti_dti_data_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	899 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	900 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	901
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	902 GLOBAL const void pei_dti_dti_getdata_req (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	903 T_DTI2_GETDATA_REQ *dti_getdata_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	904 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	905 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	906 dti_dti_getdata_req (mtst_hDTI, dti_getdata_req);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	907 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	908
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	909 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	910 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	911 \| Function : pei_dti_dti_data_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	912 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	913 \| PURPOSE : Call the process function dti_dti_data_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	914 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	915 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	916
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	917 GLOBAL const void pei_dti_dti_data_ind (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	918 T_DTI2_DATA_IND *dti_data_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	919 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	920 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	921 dti_dti_data_ind (mtst_hDTI, dti_data_ind);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	922 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	923
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	924 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	925 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	926 \| Function : pei_dti_dti_ready_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	927 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	928 \| PURPOSE : Call the process function dti_dti_ready_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	929 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	930 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	931
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	932 GLOBAL const void pei_dti_dti_ready_ind (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	933 T_DTI2_READY_IND *dti_ready_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	934 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	935 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	936 dti_dti_ready_ind (mtst_hDTI, dti_ready_ind);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	937 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	938
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	939 #ifdef _SIMULATION_
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	940
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	941 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	942 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	943 \| Function : pei_dti_dti_data_test_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	944 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	945 \| PURPOSE : Call the process function dti_dti_data_test_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	946 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	947 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	948
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	949 GLOBAL const void pei_dti_dti_data_test_req (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	950 T_DTI2_DATA_TEST_REQ *dti_data_test_req
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	951 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	952 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	953 dti_dti_data_test_req (mtst_hDTI, dti_data_test_req);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	954 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	955
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	956 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	957 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	958 \| Function : pei_dti_dti_data_test_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	959 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	960 \| PURPOSE : Call the process function dti_dti_data_test_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	961 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	962 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	963
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	964 GLOBAL const void pei_dti_dti_data_test_ind (
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	965 T_DTI2_DATA_TEST_IND *dti_data_test_ind
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	966 )
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	967 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	968 dti_dti_data_test_ind (mtst_hDTI, dti_data_test_ind);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	969 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	970
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	971 #endif /* _SIMULATION_ */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	972
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	973
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	974 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	975 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	976 \| Function: pei_sig_callback
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	977 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	978 \| PURPOSE : Callback function for DTILIB
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	979 +------------------------------------------------------------------------------
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	980 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	981
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	982 GLOBAL void pei_sig_callback(U8 instance, U8 interfac, U8 channel,
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	983 U8 reason, T_DTI2_DATA_IND *dti_data_ind)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	984 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	985 TRACE_FUNCTION("pei_sig_callback");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	986
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	987 #ifdef _SIMULATION_
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	988 if(instance NEQ MTST_DTI_UP_INSTANCE \|\|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	989 interfac NEQ MTST_DTI_UP_INTERFACE \|\|
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	990 channel NEQ MTST_DTI_UP_CHANNEL)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	991 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	992 TRACE_ERROR("[PEI_SIG_CALLBACK] invalid parameters!");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	993 return; /* error, not found */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	994 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	995 #endif /* _SIMULATION_ */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	996
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	997 if (mtst_hDTI NEQ D_NO_DATA_BASE)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	998 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	999 switch (reason)
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1000 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1001 case DTI_REASON_CONNECTION_OPENED:
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1002 sig_dti_pei_connection_opened_ind();
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1003 break;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1004
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1005 case DTI_REASON_CONNECTION_CLOSED:
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1006 sig_dti_pei_connection_closed_ind();
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1007 break;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1008
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1009 case DTI_REASON_DATA_RECEIVED:
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1010
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1011 /*
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1012 * DTI2_DATA_IND is interpreted as DTI2_DATA_REQ
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1013 */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1014 PACCESS (dti_data_ind);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1015 sig_dti_pei_data_received_ind(dti_data_ind);
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1016 break;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1017
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1018 case DTI_REASON_TX_BUFFER_FULL:
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1019 sig_dti_pei_tx_buffer_full_ind();
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1020 break;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1021
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1022 case DTI_REASON_TX_BUFFER_READY:
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1023 sig_dti_pei_tx_buffer_ready_ind();
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1024 break;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1025
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1026 default:
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1027 TRACE_ERROR("unknown DTILIB reason parameter");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1028 break;
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1029 } /* end switch */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1030 } /* end if */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1031 else
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1032 {
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1033 TRACE_ERROR("Pointer to DTILIB database not existing");
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1034 }
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1035 } /* pei_sig_callback() */
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1036
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1037 /==== END OF FILE ==========================================================/
cd37d228dae0 src/gpf2/{misc,tst}: import from TCS211 semi-src Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1038

FreeCalypso > hg > fc-magnetite

annotate src/gpf2/tst/drv/mux_pei.c @ 665:2795a11973b8