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

annotate src/g23m-gsm/sms/sms_pei.c @ 622:9f19cc5e46e8

FCDEV3B-751774 experiment documented

author	Mychaela Falconia <falcon@freecalypso.org>
date	Mon, 18 Nov 2019 05:03:15 +0000
parents	27a4235405c6
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 SMS 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 SMS_PEI_C
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23 #define SMS_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_SMS
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 /==== INCLUDES ===================================================/
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 #include <string.h>
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30 #include <stdlib.h>
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	31 #include <stddef.h>
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32 #include "typedefs.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33 #include "pcm.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 "custom.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36 #include "gsm.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37 #include "message.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38 #include "ccdapi.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 "cus_sms.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41 #include "cnf_sms.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42 #include "mon_sms.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 #include "pei.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44 #include "tok.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 #include "sms.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46 #include "sms_em.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48 #ifdef GPRS
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 #include "gprs.h"
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50 #endif /* #ifdef GPRS */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52 /==== EXPORT =====================================================/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53 #ifdef TI_PS_HCOMM_CHANGE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55 GLOBAL T_HANDLE hCommSIM = VSI_ERROR; /* SIM Communication */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56 GLOBAL T_HANDLE hCommMMI = VSI_ERROR; /* MMI Communication */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 GLOBAL T_HANDLE hCommMM = VSI_ERROR; /* MM Communication */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58 #endif /* TI_PS_HCOMM_CHANGE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59 #ifdef GPRS
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60 GLOBAL T_HANDLE hCommLLC = VSI_ERROR; /* LL Communication */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61 GLOBAL T_HANDLE hCommGMM = VSI_ERROR; /* GMM Communication */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 #endif /* #ifdef GPRS */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63 GLOBAL T_HANDLE sms_handle;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65 GLOBAL T_SMS_DATA sms_data_base;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 /==== PRIVATE ====================================================/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 static void pei_not_supported (void *data);
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 /==== VARIABLES ==================================================/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72 #ifdef _SIMULATION_
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73 static BOOL first_access = TRUE;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74 #endif /* _SIMULATION_ */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 static T_MONITOR sms_mon;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 /==== FUNCTIONS ==================================================/
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79 LOCAL const T_FUNC mnsms_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80 MAK_FUNC_0( tl_mnsms_delete_req, MNSMS_DELETE_REQ ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81 MAK_FUNC_0( tl_mnsms_read_req, MNSMS_READ_REQ ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82 MAK_FUNC_0( tl_mnsms_store_req, MNSMS_STORE_REQ ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 MAK_FUNC_0( tl_mnsms_submit_req, MNSMS_SUBMIT_REQ ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84 MAK_FUNC_0( tl_mnsms_command_req, MNSMS_COMMAND_REQ ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 MAK_FUNC_0( tl_mnsms_configure_req, MNSMS_CONFIGURE_REQ ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 MAK_FUNC_0( tl_mnsms_pause_req, MNSMS_PAUSE_REQ ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 MAK_FUNC_0( tl_mnsms_resume_req, MNSMS_RESUME_REQ ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88 MAK_FUNC_0( tl_mnsms_ack_res, MNSMS_ACK_RES ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89 #ifdef REL99
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 MAK_FUNC_0( tl_mnsms_retrans_req, MNSMS_RETRANS_REQ ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 MAK_FUNC_0( tl_mnsms_query_req, MNSMS_QUERY_REQ )
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97 #ifdef GPRS
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98 ,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99 MAK_FUNC_0( tl_mnsms_mo_serv_req, MNSMS_MO_SERV_REQ )
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100 #endif /* #ifdef GPRS */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 #ifdef SIM_PERS_OTA
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 ,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 MAK_FUNC_0( tl_mnsms_OTA_message_res, MNSMS_OTA_MESSAGE_RES )
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107 LOCAL const T_FUNC mmsms_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108 MAK_FUNC_S( for_mmsms_data_ind, MMSMS_DATA_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109 MAK_FUNC_0( cp_mmsms_error_ind, MMSMS_ERROR_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110 MAK_FUNC_0( cp_mmsms_establish_cnf, MMSMS_ESTABLISH_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 MAK_FUNC_S( for_mmsms_establish_ind, MMSMS_ESTABLISH_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112 MAK_FUNC_0( cp_mmsms_release_ind, MMSMS_RELEASE_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 MAK_FUNC_N( pei_not_supported, MMSMS_UNITDATA_IND )
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116 LOCAL const T_FUNC sim_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117 #if defined(SIM_TOOLKIT) OR defined(FF_CPHS)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 MAK_FUNC_0( tl_sim_read_cnf, SIM_READ_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120 MAK_FUNC_N( pei_not_supported, SIM_READ_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121 #endif /* else, #if defined(SIM_TOOLKIT) OR defined(FF_CPHS) */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122 MAK_FUNC_0( tl_sim_update_cnf, SIM_UPDATE_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123 MAK_FUNC_0( tl_sim_read_record_cnf, SIM_READ_RECORD_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125 MAK_FUNC_0( tl_sim_update_record_cnf, SIM_UPDATE_RECORD_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129 MAK_FUNC_N( pei_not_supported, SIM_INCREMENT_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 MAK_FUNC_N( pei_not_supported, SIM_VERIFY_PIN_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131 MAK_FUNC_N( pei_not_supported, SIM_CHANGE_PIN_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 MAK_FUNC_N( pei_not_supported, SIM_DISABLE_PIN_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 MAK_FUNC_N( pei_not_supported, SIM_ENABLE_PIN_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134 MAK_FUNC_N( pei_not_supported, SIM_UNBLOCK_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 MAK_FUNC_N( pei_not_supported, SIM_AUTHENTICATION_CNF),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136 MAK_FUNC_N( pei_not_supported, SIM_MMI_INSERT_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 MAK_FUNC_N( pei_not_supported, SIM_MM_INSERT_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138 MAK_FUNC_0( tl_sim_remove_ind, SIM_REMOVE_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 MAK_FUNC_N( pei_not_supported, SIM_SYNC_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140 MAK_FUNC_N( pei_not_supported, SIM_ACTIVATE_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 MAK_FUNC_0( tl_sim_sms_insert_ind, SIM_SMS_INSERT_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142 #if defined(SIM_TOOLKIT) AND defined(SAT_SMS_DNL_SUPPORT)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143 MAK_FUNC_N( pei_not_supported, SIM_TOOLKIT_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 MAK_FUNC_0( tl_sim_toolkit_cnf, SIM_TOOLKIT_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146 MAK_FUNC_N( pei_not_supported, SIM_TOOLKIT_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147 MAK_FUNC_N( pei_not_supported, SIM_TOOLKIT_CNF ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148 #endif /* else, #if defined(SIM_TOOLKIT) AND defined(SAT_SMS_DNL_SUPPORT) */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 #ifdef SIM_TOOLKIT
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153 MAK_FUNC_0( tl_sim_file_update_ind, SIM_FILE_UPDATE_IND )
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155 MAK_FUNC_N( pei_not_supported, SIM_FILE_UPDATE_IND )
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156 #endif /* else, #ifdef SIM_TOOLKIT */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157 };
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 #ifdef GPRS
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160 LOCAL const T_FUNC ll_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169 MAK_FUNC_0( for_ll_unitready_ind, LL_UNITREADY_IND ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171 MAK_FUNC_N( pei_not_supported, 0 ),
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172 MAK_FUNC_0( for_ll_unitdata_ind, LL_UNITDATA_IND )
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 LOCAL const T_FUNC gmmsms_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	176 MAK_FUNC_0( cp_gmmsms_reg_state_cnf, GMMSMS_REG_STATE_CNF )
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 #endif /* #ifdef GPRS */
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 #ifdef FF_EM_MODE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	181 LOCAL const T_FUNC em_table[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x00 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x01 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x02 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x03 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x04 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x05 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x06 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x07 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x08 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	191 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x09 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	192 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0A */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	193 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0B */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	194 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0C */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0D */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	196 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0E */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197 MAK_FUNC_0 (sms_em_sms_event_req, EM_SMS_EVENT_REQ) /* 0x0F */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199 #endif /* #ifdef FF_EM_MODE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	202 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204 \| STATE : code ROUTINE : pei_primitive \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	205 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 PURPOSE : Process protocol specific primitive.
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211 LOCAL SHORT pei_primitive (void * ptr)
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 T_PRIM *prim = ptr;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216 * \| \| \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	217 * MNSMS SIM EM UPLINK
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218 * \| \| \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	219 * +-----v----------v-----v----+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220 * \| \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	221 * \| SMS \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222 * \| \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223 * +-------------^-------------+
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 * MMSMS/LLC DOWNLINK
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 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230 TRACE_FUNCTION ("pei_primitive()");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	232 if (prim NEQ NULL)
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 ULONG opc = prim->custom.opc;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235 USHORT n;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	236 const T_FUNC *table;
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 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	239
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240 PTRACE_IN (opc);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242 switch (SAP_NR(opc))
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244 case SAP_NR(MNSMS_UL): table = mnsms_table; n = TAB_SIZE ( mnsms_table); break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	245 case SAP_NR(MMSMS_DL): table = mmsms_table; n = TAB_SIZE ( mmsms_table); break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246 case SAP_NR(SIM_UL): table = sim_table; n = TAB_SIZE ( sim_table); break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247 #ifdef GPRS
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	248 case LL_DL: table = ll_table; n = TAB_SIZE ( ll_table); break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249 case GMMSMS_DL: table = gmmsms_table; n = TAB_SIZE (gmmsms_table); break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250 #endif /* #ifdef GPRS */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251 #ifdef FF_EM_MODE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252 case EM_Ul: table = em_table; n = TAB_SIZE (em_table) ; break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253 #endif /* #ifdef FF_EM_MODE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 default : table = NULL; n = 0; break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	257 if (table != NULL )
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	258 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259 if (PRIM_NR(opc) < n)
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 table += PRIM_NR(opc);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262 #ifdef PALLOC_TRANSITION
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263 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	264 #ifndef NO_COPY_ROUTING
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 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	266 #endif /* NO_COPY_ROUTING */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	267 #endif /* PALLOC_TRANSITION */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268 JUMP (table->func) (P2D(prim));
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 else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	272 pei_not_supported (P2D(prim));
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	274 return PEI_OK;
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
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 * Primitive is no GSM Primitive
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 * then forward to the environment
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280 */
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 #ifdef GSM_ONLY
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 PFREE (P2D(prim))
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	284
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	285 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287 if (opc & SYS_MASK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	288 vsi_c_primitive (VSI_CALLER prim);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289 else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	290 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	291 PFREE (P2D(prim));
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	293 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	294 #endif /* else, #ifdef GSM_ONLY */
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 return PEI_OK;
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
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 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302 \| STATE : code ROUTINE : pei_not_supported \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	303 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	304
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	305 PURPOSE : An unsupported primitive is received.
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 */
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 static void pei_not_supported (void *data)
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 TRACE_FUNCTION ("pei_not_supported()");
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 PFREE (data);
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
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 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320 \| STATE : code ROUTINE : pei_init \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	321 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	322
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	323 PURPOSE : Initialize Protocol Stack Entity
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 */
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 LOCAL SHORT pei_init (T_HANDLE handle)
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 sms_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 TRACE_FUNCTION ("pei_init()");
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 #ifdef TI_PS_HCOMM_CHANGE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	334 if (!cl_hcom_all_handles_open())
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	335 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	336 return PEI_ERROR;
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 #else /* for hCommHandles backward compatibility */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339 if (hCommMMI < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	340 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	342 * Open MMI (Layer 4)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	343 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	344
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	345 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	346 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	347 }
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 (hCommMM < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	351 if ((hCommMM = vsi_c_open (VSI_CALLER MM_NAME)) < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352 return PEI_ERROR;
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
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355 if (hCommSIM < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	357 if ((hCommSIM = vsi_c_open (VSI_CALLER SIM_NAME)) < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358 return PEI_ERROR;
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 #endif /* TI_PS_HCOMM_CHANGE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361 #if defined (GPRS)
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 * Open LLC for GPRS GSMS handling
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	365 if (hCommLLC < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	366 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367 if ((hCommLLC = vsi_c_open (VSI_CALLER LLC_NAME)) < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369 }
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 * Open GMM for GPRS registration inquiry
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373 if (hCommGMM < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375 if ((hCommGMM = vsi_c_open (VSI_CALLER GMM_NAME)) < VSI_OK)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376 return PEI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378 #endif /* GPRS */
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 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381 * Initialize data base
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	383 cp_init ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 rl_init ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 tl_init ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386 for_init_sms ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387 pcm_Init ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389 ccd_init ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	390
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	391 #ifdef FF_EM_MODE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	392 em_init_sms_event_trace();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	393 #endif /* #ifdef FF_EM_MODE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	394
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397
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 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401 \| STATE : code ROUTINE : pei_timeout \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402 +--------------------------------------------------------------------+
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 PURPOSE : Process timeout
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	405
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406 */
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 LOCAL SHORT pei_timeout (USHORT index)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410 tim_exec_timeout (index);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412 }
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 #ifdef _SIMULATION_
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 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	417 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418 \| STATE : code ROUTINE : pei_exit \|
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
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421 PURPOSE : Close Resources and terminate
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422
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 LOCAL SHORT pei_exit (void)
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 TRACE_FUNCTION ("pei_exit()");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	428
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	429 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430 * clean up communication
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 #ifdef TI_PS_HCOMM_CHANGE
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	433 #else /* for hCommHandles backward compatibility */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434 vsi_c_close (VSI_CALLER hCommMMI);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435 hCommMMI = VSI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	436
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	437 vsi_c_close (VSI_CALLER hCommMM);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438 hCommMM = VSI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	440 vsi_c_close (VSI_CALLER hCommSIM);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	441 hCommSIM = VSI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	442 #endif /* TI_PS_HCOMM_CHANGE */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443 #ifdef GPRS
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	444 vsi_c_close (VSI_CALLER hCommLLC);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	445 hCommLLC = VSI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	446
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	447 vsi_c_close (VSI_CALLER hCommGMM);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	448 hCommGMM = VSI_ERROR;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	449 #endif /* #ifdef GPRS */
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 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	452 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	453 #endif /* _SIMULATION_ */
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 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	457 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	458 \| STATE : code ROUTINE : pei_config \|
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
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461 PURPOSE : Dynamic Configuration
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463 */
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 #ifndef NCONFIG
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466 LOCAL const KW_DATA kwtab[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467 SMS_CONF_STRING_PAUSE, SMS_CONF_EVENT_PAUSE,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468 SMS_CONF_STRING_RESUME, SMS_CONF_EVENT_RESUME,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469 "", 0
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 #endif /* #ifndef NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473 #if !defined(NTRACE) && !defined(NCONFIG)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	474 GLOBAL const KW_DATA partab[] = {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475 TC1M_NAME, TC1M,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	476 TR1M_NAME, TR1M,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 TR2M_NAME, TR2M,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478 TRAM_NAME, TRAM,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 TLCT_NAME, TLCT,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480 TMMS_NAME, TMMS,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 "", 0
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 #endif /* #if !defined(NTRACE) && !defined(NCONFIG) */
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 /* Implements Measure#36 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	486 #ifndef NCONFIG
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	487 LOCAL SHORT pei_config (T_PEI_CONFIG inString)
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 #ifndef NCONFIG
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490 char * s = inString;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491 char * keyw;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	492 char * val [10];
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494 GET_INSTANCE_DATA;
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 TRACE_FUNCTION ("pei_config()");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	498 TRACE_FUNCTION (s);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500 tok_init(s);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	501
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 * Parse next keyword and number of variables
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 while ((tok_next(&keyw,val)) NEQ TOK_EOCS)
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 switch ((tok_key((KW_DATA *)kwtab,keyw)))
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 case TOK_NOT_FOUND:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	510 TRACE_ERROR ("[PEI_CONFIG]: Illegal Keyword");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	511 break;
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 case SMS_CONF_EVENT_PAUSE:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	514 TRACE_EVENT("SMS_CONF_EVENT_PAUSE");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	515 tl_pause();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	516 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	517 case SMS_CONF_EVENT_RESUME:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	518 TRACE_EVENT("SMS_CONF_EVENT_RESUME");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	519 /* tl_resume(sms_data); */
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 GET_MO_INSTANCE(sms_data);
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 * TL state transition TL_ESTABLISH
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	524 * EST state transition EST_SMMA
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	525 * MMI state transition MMI_RESUME
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 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	528 SET_STATE (STATE_MMI, MMI_RESUME);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	529 SET_STATE (STATE_EST, EST_SMMA);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	530 SMS_INST_SET_STATE (STATE_TL, TL_ESTABLISH);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	531 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	532 * 1st shot
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	533 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	534 SMS_INST.retrans = FALSE;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	535 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	536 * establish connection
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	537 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	538 tl_establish_connection(FALSE);
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	539 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	540 default:
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	541 break;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	542 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	543 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	544 #endif /* #ifndef NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	545
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	546 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	547 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	548 #endif /* NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	549
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	550
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	551 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	552 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	553 \| PROJECT : GSM-PS (6147) MODULE : SMS_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	554 \| STATE : code ROUTINE : sms_pei_config \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	555 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	556
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	557 PURPOSE : Dynamic Configuration
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	558
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	559 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	560 /* Implements Measure#36 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	561 #ifndef NCONFIG
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	562 GLOBAL SHORT sms_pei_config ( char * inString, char * dummy )
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	563 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	564 pei_config ( inString );
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	565
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	566 return PEI_OK;
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 #endif /* NCONFIG */
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
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 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	573 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	574 \| STATE : code ROUTINE : pei_monitor \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	575 +--------------------------------------------------------------------+
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	576
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	577 PURPOSE : Monitoring of physical Parameters
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	578
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	579 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	580
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	581 LOCAL SHORT pei_monitor (void ** monitor)
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 TRACE_FUNCTION ("pei_monitor()");
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 /* Implements Measure#32: Row 20 */
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 * monitor = &sms_mon;
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 return PEI_OK;
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
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	592 /*
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 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	595 \| STATE : code ROUTINE : pei_create \|
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	596 +--------------------------------------------------------------------+
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 PURPOSE : Create the Protocol Stack Entity
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
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	602 GLOBAL SHORT sms_pei_create (T_PEI_INFO **info)
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 static const T_PEI_INFO pei_info =
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	605 {
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	606 "SMS",
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 pei_init,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	609 #ifdef _SIMULATION_
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	610 pei_exit,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	611 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	612 NULL,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	613 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	614 pei_primitive,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	615 pei_timeout,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	616 NULL, /* no signal function */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	617 NULL, /* no run function */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	618 /* Implements Measure#36 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	619 #ifdef NCONFIG
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	620 NULL, /* no pei_config function */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	621 #else /* not NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	622 pei_config,
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	623 #endif /* NCONFIG */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	624 pei_monitor,
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 #if defined (GPRS)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	627 1792, /* Stack Size */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	628 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	629 #if defined (FAX_AND_DATA)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	630 1792, /* Stack Size */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	631 #else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	632 1500, /* Stacksize */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	633 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	634 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	635 10, /* Queue Entries */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	636 135, /* Priority */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	637 MAX_SMS_TIMERMAX_SMS_CALLS, / number of timer */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	638 0x03\|PRIM_NO_SUSPEND /* flags */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	639 };
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	640
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	641 TRACE_FUNCTION ("pei_create()");
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	642
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	643 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	644 * Close Resources if open
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	645 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	646
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	647 #ifdef _SIMULATION_
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	648 if (first_access)
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	649 first_access = FALSE;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	650 else
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	651 pei_exit ();
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	652 #endif
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	653
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	654 /*
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	655 * Export startup configuration data
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	656 */
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	657
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	658 info = (T_PEI_INFO )&pei_info;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	659
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	660 return PEI_OK;
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	661 }
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	662
27a4235405c6 src/g23m-gsm: import from LoCosto source Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	663 #endif /* #ifndef SMS_PEI_C */

FreeCalypso > hg > fc-magnetite

annotate src/g23m-gsm/sms/sms_pei.c @ 622:9f19cc5e46e8