fc-magnetite: src/g23m-gsm/dl/dl

annotate src/g23m-gsm/dl/dl_pei.c @ 700:800bf29abf31

audio mode load change from Tourmaline Our FreeCalypso universe now has two kinds of audio mode config files: the old 164 byte kind and the new 176 byte kind. We are not enabling L1_NEW_AEC in Magnetite, only in Tourmaline, thus 164 byte audio mode files are still native to Magnetite. But we still desire graceful handling of the situation when a running Magnetite fw may load a 176 byte audio mode file (presumably with new AEC config), thus we incorporate the same audio mode loading change which we implemented in Tourmaline: if the loaded audio mode file is of the wrong kind, the AEC config is cleared to default disabled state.

author	Mychaela Falconia <falcon@freecalypso.org>
date	Fri, 30 Jul 2021 03:55:52 +0000
parents	dcc3b8646a34
children

rev	line source
104 27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2 +-----------------------------------------------------------------------------
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	3 \| Project :
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4 \| Modul :
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	5 +-----------------------------------------------------------------------------
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6 \| Copyright 2002 Texas Instruments Berlin, AG
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 \| All rights reserved.
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	8 \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	9 \| This file is confidential and a trade secret of Texas
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10 \| Instruments Berlin, AG
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11 \| The receipt of or possession of this file does not convey
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	12 \| any rights to reproduce or disclose its contents or to
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	13 \| manufacture, use, or sell anything it may describe, in
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	14 \| whole, or in part, without the specific written consent of
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	15 \| Texas Instruments Berlin, AG.
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	16 +-----------------------------------------------------------------------------
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	17 \| Purpose : This module implements the process body interface
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	18 \| for the entity DL of the mobile station.
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	19 +-----------------------------------------------------------------------------
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	20 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	22 #ifndef DL_PEI_C
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23 #define DL_PEI_C
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25 #define ENTITY_DL
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	27
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29 /==== INCLUDES ===================================================/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30 #include "typedefs.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	31 #include <string.h>
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32 #include <stdlib.h>
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33 #include <stddef.h>
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	34 #include "vsi.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35 #include "pconst.cdg"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36 #include "custom.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37 #include "gsm.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38 #include "mon_dl.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	39 #include "prim.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	40 #include "pei.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41 #include "tok.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42 #include "ccdapi.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 #include "dl.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44 #include "dl_em.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 #include "dl_trc.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47 /==== EXPORT =====================================================/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48 #ifdef TI_PS_HCOMM_CHANGE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50 GLOBAL T_HANDLE hCommDL = VSI_ERROR; /* Self Communication */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51 GLOBAL T_HANDLE hCommRR = VSI_ERROR; /* RR Communication */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52 GLOBAL T_HANDLE hCommPL = VSI_ERROR; /* PL Communication */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53 #ifdef FF_EM_MODE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54 GLOBAL T_HANDLE hCommMMI = VSI_ERROR; /* EM Communication */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55 #endif /* FF_EM_MODE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 GLOBAL USHORT dl_handle;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59 /==== PRIVATE ====================================================/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61 LOCAL void pei_not_supported (void *data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 LOCAL int dl_process_signal (ULONG opc, void *signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64 LOCAL SHORT pei_signal (T_SIGNAL_OPC opc, void *signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66 /==== VARIABLES ==================================================/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 #ifdef _SIMULATION_
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68 static UBYTE first_access = TRUE;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 #endif /* _SIMULATION_ */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71 static T_MONITOR dl_mon;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73 /==== FUNCTIONS ==================================================/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74 /* Please consider that the opc�s are not necessarily sorted in sequential order.
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 * DL doesn�t use the normal technique to get the primitive from the table.
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76 * Instead it uses the direct search and compare:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 * for (i=0; i<n; i++, table++)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78 * if (table->opc EQ opc)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79 * break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81 LOCAL const T_FUNC dl_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82 MAK_FUNC_S( drr_dl_establish_req , DL_ESTABLISH_REQ ), /* 0x80000003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x80010003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84 MAK_FUNC_0( drr_dl_release_req , DL_RELEASE_REQ ), /* 0x80020003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x80030003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 MAK_FUNC_S( drr_dl_data_req , DL_DATA_REQ ), /* 0x80040003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x80050003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88 MAK_FUNC_S( drr_dl_unitdata_req , DL_UNITDATA_REQ ), /* 0x80060003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x80070003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 MAK_FUNC_0( drr_dl_suspend_req , DL_SUSPEND_REQ ), /* 0x80080003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x80090003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 MAK_FUNC_S( drr_dl_resume_req , DL_RESUME_REQ ), /* 0x800a0003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x800b0003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 MAK_FUNC_S( drr_dl_reconnect_req , DL_RECONNECT_REQ ), /* 0x800c0003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x800d0003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 #if defined (DL_TRACE_ENABLED) && !defined(DL_IMMEDIATE_TRACE)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97 MAK_FUNC_0( dl_trace_read_all , DL_TRACE_REQ ), /* 0x800e0003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x800e0003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100 #endif /* DL_TRACE_ENABLED && !DL_IMMEDIATE_TRACE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x800f0003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 MAK_FUNC_S( drr_dl_short_unitdata_req , DL_SHORT_UNITDATA_REQ) /* 0x80100003 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105 LOCAL const T_FUNC mphc_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106 MAK_FUNC_0( dph_ph_data_ind, PH_DATA_IND ) /* 0x0000006d */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110 #if defined (DL_2TO1)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 #if defined(_SIMULATION_)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112 LOCAL const T_FUNC l1_test_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 MAK_FUNC_0( l1test_call_mphc_read_dcch, L1TEST_CALL_MPHC_READ_DCCH ), /* 8000409b */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114 MAK_FUNC_N( pei_not_supported , 0 ) /* removed */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115 MAK_FUNC_N( pei_not_supported , 0 ) /* removed */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117 #endif /* _SIMULATION_ */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 #else /* DL_2TO1 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120 LOCAL const T_FUNC mdl_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121 MAK_FUNC_0( drr_mdl_release_req , MDL_RELEASE_REQ ) /* 0x80004004 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124 #if defined (_SIMULATION_) \|\| (defined (DL_TRACE_ENABLED) && !defined(DL_IMMEDIATE_TRACE))
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125 LOCAL const T_FUNC ph_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126 #if defined(_SIMULATION_)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127 MAK_FUNC_0( dph_ph_ready_to_send , PH_READY_TO_SEND ), /* 0x4100 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x4100 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 #endif /* _SIMULATION_ */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131 MAK_FUNC_N( pei_not_supported , 0 ), /* 0x4101 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 #if defined (DL_TRACE_ENABLED) && !defined(DL_IMMEDIATE_TRACE)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 MAK_FUNC_0( dl_trace_read , PH_TRACE_IND ) /* 0x4102 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 MAK_FUNC_N( pei_not_supported , 0 ) /* 0x4102 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136 #endif /* DL_TRACE_ENABLED && !DL_IMMEDIATE_TRACE*/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138 #endif /* _SIMULATION_\|\|(DL_TRACE_ENABLED&& !DL_IMMEDIATE_TRACE) */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 #endif /* DL_2TO1 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 #ifdef FF_EM_MODE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142 LOCAL const T_FUNC em_ul_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143 MAK_FUNC_0( dl_em_dl_event_req , EM_DL_EVENT_REQ ), /* 0x3e0A*/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145 #endif /* FF_EM_MODE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150 \| PROJECT : GSM-PS (6147) MODULE : DL_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151 \| STATE : code ROUTINE : pei_primitive \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154 PURPOSE : Process protocol specific primitive.
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157 LOCAL SHORT pei_primitive (void * ptr)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159 GET_INSTANCE_DATA;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160 T_PRIM prim = (T_PRIM)ptr;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162 * \| \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163 * DL MDL
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164 * \| \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165 * +------v------------v------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166 * \| \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 * \| DL \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168 * \| \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169 * +-------------^------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170 * \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171 * MPHC/PH
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172 * \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	173 *
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	174 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	176 TRACE_FUNCTION ("pei_primitive()");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	177
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178 if (prim NEQ NULL)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180 ULONG opc = prim->custom.opc;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	181 USHORT n;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182 const T_FUNC *table;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184 VSI_PPM_REC ((T_PRIM_HEADER*)prim, __FILE__, __LINE__);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186 PTRACE_IN (opc);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188 switch (SAP_NR(opc))
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190 case SAP_NR(DL_UL): table = dl_table; n = TAB_SIZE (dl_table); break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	191 /case SAP_NR(MPHC_UL):/ /* same as MPHC_DL */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	192 case SAP_NR(MPHC_DL):
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	193 table = mphc_table;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	194 n = TAB_SIZE (mphc_table);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	196 * The opcodes for MPHC_DL start at 0x6d
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 opc -= 0x6d;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200 #if defined (DL_2TO1)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201 #if defined(_SIMULATION_)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	202 case SAP_NR(L1TEST_UL):
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203 case SAP_NR(L1TEST_DL): table = l1_test_table; n = TAB_SIZE (l1_test_table); break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204 #endif /* _SIMULATION_ */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	205 #else /* DL_2TO1 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206 case SAP_NR(MDL_DL): table = mdl_table; n = TAB_SIZE (mdl_table); break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 #if defined (_SIMULATION_) \|\| (defined (DL_TRACE_ENABLED) && !defined(DL_IMMEDIATE_TRACE))
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208 case SAP_NR(PH_UL):
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209 case SAP_NR(PH_DL): table = ph_table; n = TAB_SIZE (ph_table); break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210 #endif /* _SIMULATION_\|\|(DL_TRACE_ENABLED&&!DL_IMMEDIATE_TRACE) */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211 #endif /* DL_2TO1 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213 #ifdef FF_EM_MODE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214 case EM_Ul:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215 table = em_ul_table;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216 n = TAB_SIZE (em_ul_table);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	217 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218 * The opcodes for EM_Ul start at 0x0a
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	219 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220 opc -= 0x0a;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	221 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222 #endif /* FF_EM_MODE*/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223 default : table = NULL; n = 0; break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	224 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	225 if (table)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	227
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	228 #if defined (_SIMULATION_)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229 if (opc NEQ PH_READY_TO_SEND)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231 * this simulates function call of layer 1 in the
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	232 * windows environment
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	233 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234 #endif /* _SIMULATION_ */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235 dl_data->dl_active = TRUE;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	236
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	237
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	238 if (PRIM_NR(opc)<n)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	239 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240 table += PRIM_NR(opc);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241 #ifdef PALLOC_TRANSITION
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242 /lint -e661 (Warning -- Possible access of out-of-bounds) /
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243 P_SDU(prim) = table->soff ? (T_sdu) (((char)&prim->data) + table->soff) : 0;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244 /lint +e661 (Warning -- Possible access of out-of-bounds) /
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	245 #ifndef NO_COPY_ROUTING
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246 P_LEN(prim) = table->size + sizeof (T_PRIM_HEADER);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247 #endif /* NO_COPY_ROUTING */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	248 #endif /* PALLOC_TRANSITION */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250 #if defined (DL_TRACE_ENABLED) && !defined(DL_2TO1)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251 if ((opc EQ DL_TRACE_REQ) OR (opc EQ PH_TRACE_IND))
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252 /lint -e661 (Warning -- Possible access of out-of-bounds) /
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253 JUMP (table->func)();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 /lint +e661 (Warning -- Possible access of out-of-bounds) /
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255 else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256 #endif /* DL_TRACE_ENABLED && !DL_2TO1 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	257 /lint -e661 (Warning -- Possible access of out-of-bounds) /
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	258 JUMP (table->func) (P2D(prim));
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259 /lint +e661 (Warning -- Possible access of out-of-bounds) /
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	261 else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263 pei_not_supported (P2D(prim));
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	264 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 dl_data->dl_active = FALSE;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	266
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	267 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	269
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	270 #if defined (_SIMULATION_)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271 /* TDC is not able to send signals, therefore the redirection over primitives */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	272 if (opc EQ DL_SIGNAL_EM_READ)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273 { /* test ACI read of EM buffer only */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	274 return dl_process_signal(DL_SIGNAL_EM_READ, NULL);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	275 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	276 #endif /* _SIMULATION_ */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	277
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 * Primitive is no GSM Primitive
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280 * then forward to the environment
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	281 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	282
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 #ifdef GSM_ONLY
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	284 MY_PFREE (P2D(prim))
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	285
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	288 if (opc & SYS_MASK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289 vsi_c_primitive (VSI_CALLER prim);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	290 else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	291 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292 void* p = (void*)P2D(prim);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	293 MY_PFREE (p);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	294 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	295 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	296 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	297 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	298 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	300
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	301 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	303 \| PROJECT : GSM-PS (6147) MODULE : DL_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	304 \| STATE : code ROUTINE : pei_not_supported \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	305 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	307 PURPOSE : An unsupported primitive is received.
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	308
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	309 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	310
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	311 LOCAL void pei_not_supported (void * data)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	312 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	313 TRACE_FUNCTION ("pei_not_supported()");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	314
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	315 MY_PFREE (data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	316 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	317
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	318
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	319 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	321 \| PROJECT : GSM-PS (6147) MODULE : DL_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	322 \| STATE : code ROUTINE : pei_init \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	323 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	324
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	325 PURPOSE : Initialize Protocol Stack Entity
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	326
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	327 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	328
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 LOCAL SHORT pei_init (T_HANDLE handle)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	330 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	331 dl_handle = handle;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	332
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	333 TRACE_FUNCTION ("pei_init() " __DATE__ " " __TIME__);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	334
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	335 #ifdef TI_PS_HCOMM_CHANGE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	336 if (!cl_hcom_all_handles_open())
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	337 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	338 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	340 #else /* for hCommHandles backward compatibility */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341 if (hCommDL < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	342 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	343 if ((hCommDL = vsi_c_open (VSI_CALLER DL_NAME)) < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	344 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	345 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	346
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	347 if (hCommRR < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	348 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349 if ((hCommRR = vsi_c_open (VSI_CALLER RR_NAME)) < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	351 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	353
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	354 if (hCommPL < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356 if ((hCommPL = vsi_c_open (VSI_CALLER PL_NAME)) < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	357 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	359
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	360 #ifdef FF_EM_MODE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361 if (hCommMMI < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	362 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	363 if ((hCommMMI = vsi_c_open (VSI_CALLER ACI_NAME)) < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	365 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	366 #endif /* FF_EM_MODE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369 TRC_INIT ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	370
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	371 #if !defined(_SIMULATION_)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 TRACE_EVENT (dl_version());
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373 SYST_TRACE (dl_version());
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374 #endif /* !_SIMULATION_ */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377 * Initialize data base
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	379
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	380 #if defined(DL_TRACE_ENABLED) && !defined(DL_IMMEDIATE_TRACE)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381 dl_trace_init ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382 #endif /* DL_TRACE_ENABLED && !DL_IMMEDIATE_TRACE*/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	383
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 com_init_data ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 dcch0_init_dl_data ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386 sacch0_init_dl_data ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388 #ifdef FF_EM_MODE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	390 initialise event flags
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	391 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	392 em_init_dl_event_trace();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	393 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	394 initialise dl semaphor for EM event tracing
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396 em_dl_sem_init();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397 #endif /* FF_EM_MODE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	398
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	399 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402 #ifdef _SIMULATION_
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	403 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	404 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	405 \| PROJECT : GSM-PS (6147) MODULE : DL_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406 \| STATE : code ROUTINE : pei_exit \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	407 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	408
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409 PURPOSE : Close Resources and terminate
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412 LOCAL SHORT pei_exit (void)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	413 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	414 TRACE_FUNCTION ("pei_exit()");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	415
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	416 #if defined(DL_TRACE_ENABLED) && !defined(DL_IMMEDIATE_TRACE)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	417 dl_trace_exit ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418 #endif /* DL_TRACE_ENABLED && !DL_IMMEDIATE_TRACE*/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	419
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	420 #ifdef FF_EM_MODE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421 em_dl_sem_exit();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422 #endif /* FF_EM_MODE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	423
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	424 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	425 * clean up communication
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	426 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	427 #ifdef TI_PS_HCOMM_CHANGE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	428 #else /* for hCommHandles backward compatibility */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	429 vsi_c_close (VSI_CALLER hCommDL);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430 hCommDL = VSI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	431
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	432 vsi_c_close (VSI_CALLER hCommRR);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	433 hCommRR = VSI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435 vsi_c_close (VSI_CALLER hCommPL);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	436 hCommPL = VSI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	437
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438 #ifdef FF_EM_MODE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439 vsi_c_close (VSI_CALLER hCommMMI);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	440 hCommMMI = VSI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	441 #endif /* FF_EM_MODE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	442 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	444 TRC_EXIT ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	445
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	446 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	447 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	448 #endif /* _SIMULATION_ */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	449
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	450 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	451 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	452 \| PROJECT : GSM-PS (6147) MODULE : DL_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	453 \| STATE : code ROUTINE : pei_config \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	454 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	455
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	456 PURPOSE : Dynamic Configuration
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	457
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	458 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460 /* Implements Measure#36 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461 #ifdef NCONFIG
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462 #else /* NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463 LOCAL SHORT pei_config (T_PEI_CONFIG inString)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	464 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	465 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467 #endif /* NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	470 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471 \| PROJECT : GSM-PS (6147) MODULE : DL_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472 \| STATE : code ROUTINE : dl_pei_config \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	474
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475 PURPOSE : Dynamic Configuration
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	476
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478 /* Implements Measure#36 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 #ifdef NCONFIG
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480 #else /* NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 GLOBAL T_PEI_RETURN dl_pei_config ( char * inString, char * dummy )
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	482 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	483 return pei_config ( inString );
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	484 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	485 #endif /* NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	486
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	487 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	488 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	489 \| PROJECT : GSM-PS (6147) MODULE : DL_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490 \| STATE : code ROUTINE : pei_monitor \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	492
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493 PURPOSE : Monitoring of physical Parameters
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	495 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	496
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497 LOCAL SHORT pei_monitor (void ** monitor)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	498 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499 TRACE_FUNCTION ("pei_monitor()");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	501 /* Implements Measure#32: Row 50 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	502
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	503 * monitor = &dl_mon;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	504
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	505 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	506 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	507
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	508 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	509 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	510 \| PROJECT : GSM-PS (6147) MODULE : DL_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	511 \| STATE : code ROUTINE : pei_create \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	512 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	513
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	514 PURPOSE : Create the Protocol Stack Entity
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	515
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	516 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	517
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	518 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	519 * New Frame
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	520 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	521 GLOBAL T_PEI_RETURN dl_pei_create (T_PEI_INFO **info)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	522 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	523 static const T_PEI_INFO pei_info =
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	524 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	525 "DL",
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	526 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	527 pei_init,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	528 #ifdef _SIMULATION_
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	529 pei_exit,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	530 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	531 NULL,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	532 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	533 pei_primitive,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	534 NULL, /* no timeout function */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	535 pei_signal, /* signal function */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	536 NULL, /* no run function */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	537 /* Implements Measure#36 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	538 #ifdef NCONFIG
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	539 NULL, /* no pei_config function */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	540 #else /* NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	541 pei_config,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	542 #endif /* NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	543 pei_monitor,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	544 },
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	545 #if defined (GPRS)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	546 1536, /* Stack Size incresed for omaps00140330 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	547 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	548 #if defined (FAX_AND_DATA)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	549 1536, /* Stack Size incresed for omaps00140330 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	550 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	551 1394, /* Stack Size incresed for omaps00140330 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	552 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	553 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	554 10+DL_SIGNAL_DATA_ELEMENTS, /* Queue Entries */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	555 215, /* Priority */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	556 0, /* number of timer */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	557 /* flags */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	558 #ifdef _TARGET_
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	559 #ifdef GPRS
207 dcc3b8646a34 PEIs for TCS2/TCS3 hybrid config: INT_DATA_TASK restored to match TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: 104 diff changeset	560 PASSIVE_BODY\|COPY_BY_REF\|TRC_NO_SUSPEND\|PRIM_NO_SUSPEND\|INT_DATA_TASK
104 27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	561 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	562 PASSIVE_BODY\|COPY_BY_REF\|TRC_NO_SUSPEND\|PRIM_NO_SUSPEND
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	563 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	564 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	565 PASSIVE_BODY\|COPY_BY_REF
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	566 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	567
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	568 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	569
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	570 TRACE_FUNCTION ("pei_create");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	571 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	572 * Close Resources if open
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	573 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	574
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	575 #ifdef _SIMULATION_
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	576 if (first_access)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	577 first_access = FALSE;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	578 else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	579 pei_exit ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	580 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	581
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	582 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	583 * export startup configuration data
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	584 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	585 info = (T_PEI_INFO )&pei_info;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	586 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	587 * Initialize entity data
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	588 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	589
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	590 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	591 * Initialize Condat Coder Decoder and
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	592 * processes
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	593 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	594
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	595
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	596 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	597 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	598
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	599 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	600 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	601 \| PROJECT : GSM-PS (6147) MODULE : DL_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	602 \| STATE : code ROUTINE : pei_signal \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	603 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	604
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	605 PURPOSE : Functional interface to signal a primitive.
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	606
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	607 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	608 LOCAL SHORT pei_signal (T_SIGNAL_OPC opc, void *signal_data)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	609 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	610 #ifdef TRACE_FKT
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	611 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	612 char buf[24];
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	613 sprintf(buf, "pei_signal (0x%lx)", (ULONG)opc);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	614 TRACE_FUNCTION (buf);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	615 PTRACE_IN(opc);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	616 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	617 #elif defined(_SIMULATION_)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	618 TRACE_EVENT_WIN_P1 ("pei_signal (0x%lx)", (ULONG)opc);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	619 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	620
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	621 dl_process_signal ((ULONG)opc, signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	622
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	623 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	624 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	625
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	626 LOCAL int dl_process_signal (ULONG opc, void *signal_data)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	627 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	628 /TRACE_FUNCTION ("pei_process_signal()");/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	629 GET_INSTANCE_DATA;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	630 switch (opc)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	631 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	632 #if defined(DL_TRACE_ENABLED) && !defined (DL_IMMEDIATE_TRACE) && !defined(DL_2TO1)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	633 case DL_TRACE_REQ: /* RR -> DL */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	634 SYST_TRACE("call dl_trace_read_all()");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	635 dl_trace_read_all ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	636 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	637 case PH_TRACE_IND: /* ALR/TIL -> DL */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	638 dl_trace_read ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	639 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	640 #endif /* DL_TRACE_ENABLED && !DL_IMMEDIATE_TRACE &6 !DL_2TO1 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	641 #if defined(INVOKE_SIGNAL)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	642 case DL_SIGNAL_ESTABLISH_IND:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	643 sig_handle_drr_dl_establish_ind ((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	644 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	645 case DL_SIGNAL_ESTABLISH_CNF:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	646 sig_handle_drr_dl_establish_cnf ((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	647 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	648 case DL_SIGNAL_DATA_IND:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	649 sig_handle_com_data_ind ((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	650 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	651 case DL_SIGNAL_DATA_CNF:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	652 sig_handle_drr_dl_data_cnf ((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	653 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	654 #if 0 /* happens in primitive context only */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	655 case DL_SIGNAL_UNITDATA_IND:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	656 sig_handle_drr_dl_unitdata_ind (dl_data, (T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	657 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	658 #endif /* 0 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	659 case DL_SIGNAL_SHORT_UNITDATA_IND:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	660 sig_handle_drr_dl_short_unitdata_ind ((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	661 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	662 case DL_SIGNAL_RELEASE_IND:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	663 sig_handle_drr_dl_release_ind ((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	664 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	665 case DL_SIGNAL_RELEASE_CNF:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	666 sig_handle_drr_dl_release_cnf ((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	667 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	668 case DL_SIGNAL_ERROR_IND:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	669 sig_handle_drr_error_ind ((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	670 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	671 case DL_SIGNAL_FREE_POINTER:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	672 sig_handle_com_free_pointer ((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	673 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	674 case DL_SIGNAL_CONCATENATE:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	675 sig_handle_com_concatenate((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	676 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	677 #if defined(DL_TRACE_ENABLED)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	678 case DL_SIGNAL_L2TRACE:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	679 sig_handle_com_l2trace ((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	680 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	681 #endif /DL_TRACE_ENABLED/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	682 case DL_SIGNAL_L3TRACE:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	683 sig_handle_com_l3trace((T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	684 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	685 #if defined(FF_EM_MODE)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	686 case DL_SIGNAL_EM_IND:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	687 sig_handle_dl_em_first_event_check ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	688 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	689 case DL_SIGNAL_EM_WRITE:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	690 sig_handle_dl_em_write (dl_data, (T_DL_SIGNAL_DATA *) signal_data);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	691 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	692 #if defined(_SIMULATION_)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	693 case DL_SIGNAL_EM_READ:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	694 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	695 T_MONITOR *dummy;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	696
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	697 em_dl_sem_read ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	698 em_dl_sem_reset ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	699 pei_monitor (&dummy);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	700 TRACE_EVENT_WIN (dummy->version);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	701 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	702 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	703 #endif /* _SIMULATION_ */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	704 #endif /* FF_EM_MODE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	705 #endif /* INVOKE_SIGNAL */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	706 default:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	707 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	708 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	709
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	710 #if defined(INVOKE_SIGNAL)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	711 if (signal_data)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	712 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	713 TRACE_EVENT_WIN_P1 ("pei_process_signal(): set data with idx=%u to FREE",
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	714 ((T_DL_SIGNAL_DATA *)signal_data)->idx);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	715
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	716 ((T_DL_SIGNAL_DATA *)signal_data)->busy = FALSE;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	717 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	718 #endif /* INVOKE_SIGNAL */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	719
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	720 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	721 }/* dl_process_signal */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	722
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	723 GLOBAL UBYTE * dl_get_sacch_buffer (void)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	724 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	725 GET_INSTANCE_DATA;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	726 return dl_data->sacch_act_buffer.buf;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	727 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	728
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	729 #endif /* DL_PEI_C */

FreeCalypso > hg > fc-magnetite

annotate src/g23m-gsm/dl/dl_pei.c @ 700:800bf29abf31