fc-selenite: src/gpf/tst/drv/mux

annotate src/gpf/tst/drv/mux_pei.c @ 83:92fde62400ef

.../gcc/exceptions.S: added 2nd part that was missing in Citrine

author	Mychaela Falconia <falcon@freecalypso.org>
date	Fri, 20 Jul 2018 18:21:46 +0000
parents	8b2a9a374324
children

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

FreeCalypso > hg > fc-selenite

annotate src/gpf/tst/drv/mux_pei.c @ 83:92fde62400ef