freecalypso-citrine: g23m-gsm/sms/sms

author	Mychaela Falconia <falcon@freecalypso.org>
date	Thu, 09 Jun 2016 00:02:41 +0000
parents
children

rev	line source
0 75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2 +-----------------------------------------------------------------------------
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	3 \| Project :
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4 \| Modul :
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	5 +-----------------------------------------------------------------------------
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6 \| Copyright 2002 Texas Instruments Berlin, AG
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 \| All rights reserved.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	8 \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	9 \| This file is confidential and a trade secret of Texas
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10 \| Instruments Berlin, AG
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11 \| The receipt of or possession of this file does not convey
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	12 \| any rights to reproduce or disclose its contents or to
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	13 \| manufacture, use, or sell anything it may describe, in
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	14 \| whole, or in part, without the specific written consent of
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	15 \| Texas Instruments Berlin, AG.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	16 +-----------------------------------------------------------------------------
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	17 \| Purpose : This module implements the process body interface
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	18 \| for the entity SMS of the mobile station.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	19 +-----------------------------------------------------------------------------
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	20 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	22 #ifndef SMS_PEI_C
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23 #define SMS_PEI_C
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25 #include "config.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26 #include "fixedconf.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	27 #include "condat-features.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29 #define ENTITY_SMS
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	31 /==== INCLUDES ===================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33 #include <string.h>
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	34 #include <stdlib.h>
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35 #include <stddef.h>
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36 #include "typedefs.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37 #include "pcm.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38 #include "vsi.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	39 #include "custom.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	40 #include "gsm.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41 #include "message.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42 #include "ccdapi.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 #include "prim.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44 #include "cus_sms.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 #include "cnf_sms.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46 #include "mon_sms.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47 #include "pei.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48 #include "tok.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 #include "sms.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50 #include "sms_em.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52 #ifdef GPRS
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53 #include "gprs.h"
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54 #endif /* #ifdef GPRS */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56 /==== EXPORT =====================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 #ifdef TI_PS_HCOMM_CHANGE
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58 #else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59 GLOBAL T_HANDLE hCommSIM = VSI_ERROR; /* SIM Communication */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60 GLOBAL T_HANDLE hCommMMI = VSI_ERROR; /* MMI Communication */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61 GLOBAL T_HANDLE hCommMM = VSI_ERROR; /* MM Communication */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 #endif /* TI_PS_HCOMM_CHANGE */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63 #ifdef GPRS
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64 GLOBAL T_HANDLE hCommLLC = VSI_ERROR; /* LL Communication */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65 GLOBAL T_HANDLE hCommGMM = VSI_ERROR; /* GMM Communication */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66 #endif /* #ifdef GPRS */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 GLOBAL T_HANDLE sms_handle;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 GLOBAL T_SMS_DATA sms_data_base;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71 /==== PRIVATE ====================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73 static void pei_not_supported (void *data);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 /==== VARIABLES ==================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76 #ifdef _SIMULATION_
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 static BOOL first_access = TRUE;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78 #endif /* _SIMULATION_ */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79 static T_MONITOR sms_mon;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81 /==== FUNCTIONS ==================================================/
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 LOCAL const T_FUNC mnsms_table[] = {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84 MAK_FUNC_0( tl_mnsms_delete_req, MNSMS_DELETE_REQ ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 MAK_FUNC_0( tl_mnsms_read_req, MNSMS_READ_REQ ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 MAK_FUNC_0( tl_mnsms_store_req, MNSMS_STORE_REQ ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 MAK_FUNC_0( tl_mnsms_submit_req, MNSMS_SUBMIT_REQ ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88 MAK_FUNC_0( tl_mnsms_command_req, MNSMS_COMMAND_REQ ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89 MAK_FUNC_0( tl_mnsms_configure_req, MNSMS_CONFIGURE_REQ ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 MAK_FUNC_0( tl_mnsms_pause_req, MNSMS_PAUSE_REQ ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91 MAK_FUNC_0( tl_mnsms_resume_req, MNSMS_RESUME_REQ ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 MAK_FUNC_0( tl_mnsms_ack_res, MNSMS_ACK_RES ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 #ifdef REL99
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 MAK_FUNC_0( tl_mnsms_retrans_req, MNSMS_RETRANS_REQ ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 #else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99 MAK_FUNC_0( tl_mnsms_query_req, MNSMS_QUERY_REQ )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 #ifdef GPRS
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 ,
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 MAK_FUNC_0( tl_mnsms_mo_serv_req, MNSMS_MO_SERV_REQ )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104 #endif /* #ifdef GPRS */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105 #ifdef SIM_PERS_OTA
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106 ,
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107 MAK_FUNC_0( tl_mnsms_OTA_message_res, MNSMS_OTA_MESSAGE_RES )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108 #endif
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109 };
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 LOCAL const T_FUNC mmsms_table[] = {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112 MAK_FUNC_S( for_mmsms_data_ind, MMSMS_DATA_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 MAK_FUNC_0( cp_mmsms_error_ind, MMSMS_ERROR_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114 MAK_FUNC_0( cp_mmsms_establish_cnf, MMSMS_ESTABLISH_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115 MAK_FUNC_S( for_mmsms_establish_ind, MMSMS_ESTABLISH_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116 MAK_FUNC_0( cp_mmsms_release_ind, MMSMS_RELEASE_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117 MAK_FUNC_N( pei_not_supported, MMSMS_UNITDATA_IND )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 };
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120 LOCAL const T_FUNC sim_table[] = {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121 #if defined(SIM_TOOLKIT) OR defined(FF_CPHS)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122 MAK_FUNC_0( tl_sim_read_cnf, SIM_READ_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123 #else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124 MAK_FUNC_N( pei_not_supported, SIM_READ_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125 #endif /* else, #if defined(SIM_TOOLKIT) OR defined(FF_CPHS) */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126 MAK_FUNC_0( tl_sim_update_cnf, SIM_UPDATE_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127 MAK_FUNC_0( tl_sim_read_record_cnf, SIM_READ_RECORD_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129 MAK_FUNC_0( tl_sim_update_record_cnf, SIM_UPDATE_RECORD_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 MAK_FUNC_N( pei_not_supported, SIM_INCREMENT_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134 MAK_FUNC_N( pei_not_supported, SIM_VERIFY_PIN_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 MAK_FUNC_N( pei_not_supported, SIM_CHANGE_PIN_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136 MAK_FUNC_N( pei_not_supported, SIM_DISABLE_PIN_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 MAK_FUNC_N( pei_not_supported, SIM_ENABLE_PIN_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138 MAK_FUNC_N( pei_not_supported, SIM_UNBLOCK_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 MAK_FUNC_N( pei_not_supported, SIM_AUTHENTICATION_CNF),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140 MAK_FUNC_N( pei_not_supported, SIM_MMI_INSERT_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 MAK_FUNC_N( pei_not_supported, SIM_MM_INSERT_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142 MAK_FUNC_0( tl_sim_remove_ind, SIM_REMOVE_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143 MAK_FUNC_N( pei_not_supported, SIM_SYNC_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 MAK_FUNC_N( pei_not_supported, SIM_ACTIVATE_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145 MAK_FUNC_0( tl_sim_sms_insert_ind, SIM_SMS_INSERT_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146 #if defined(SIM_TOOLKIT) AND defined(SAT_SMS_DNL_SUPPORT)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147 MAK_FUNC_N( pei_not_supported, SIM_TOOLKIT_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148 MAK_FUNC_0( tl_sim_toolkit_cnf, SIM_TOOLKIT_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149 #else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150 MAK_FUNC_N( pei_not_supported, SIM_TOOLKIT_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151 MAK_FUNC_N( pei_not_supported, SIM_TOOLKIT_CNF ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 #endif /* else, #if defined(SIM_TOOLKIT) AND defined(SAT_SMS_DNL_SUPPORT) */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156 #ifdef SIM_TOOLKIT
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157 MAK_FUNC_0( tl_sim_file_update_ind, SIM_FILE_UPDATE_IND )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158 #else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159 MAK_FUNC_N( pei_not_supported, SIM_FILE_UPDATE_IND )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160 #endif /* else, #ifdef SIM_TOOLKIT */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161 };
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163 #ifdef GPRS
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164 LOCAL const T_FUNC ll_table[] = {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	173 MAK_FUNC_0( for_ll_unitready_ind, LL_UNITREADY_IND ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	174 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175 MAK_FUNC_N( pei_not_supported, 0 ),
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	176 MAK_FUNC_0( for_ll_unitdata_ind, LL_UNITDATA_IND )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	177 };
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179 LOCAL const T_FUNC gmmsms_table[] = {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180 MAK_FUNC_0( cp_gmmsms_reg_state_cnf, GMMSMS_REG_STATE_CNF )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	181 };
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182 #endif /* #ifdef GPRS */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184 #ifdef FF_EM_MODE
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185 LOCAL const T_FUNC em_table[] = {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x00 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x01 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x02 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x03 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x04 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	191 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x05 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	192 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x06 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	193 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x07 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	194 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x08 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x09 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	196 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0A */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0B */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0C */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0D */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0E */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201 MAK_FUNC_0 (sms_em_sms_event_req, EM_SMS_EVENT_REQ) /* 0x0F */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	202 };
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203 #endif /* #ifdef FF_EM_MODE */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	205 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208 \| STATE : code ROUTINE : pei_primitive \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211 PURPOSE : Process protocol specific primitive.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215 LOCAL SHORT pei_primitive (void * ptr)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	217 T_PRIM *prim = ptr;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	219 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220 * \| \| \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	221 * MNSMS SIM EM UPLINK
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222 * \| \| \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223 * +-----v----------v-----v----+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	224 * \| \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	225 * \| SMS \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 * \| \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	227 * +-------------^-------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	228 * \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229 * MMSMS/LLC DOWNLINK
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230 * \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231 *
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	232 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	233
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234 TRACE_FUNCTION ("pei_primitive()");
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	236 if (prim NEQ NULL)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	237 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	238 ULONG opc = prim->custom.opc;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	239 USHORT n;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240 const T_FUNC *table;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242 VSI_PPM_REC ((T_PRIM_HEADER*)prim, __FILE__, __LINE__);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244 PTRACE_IN (opc);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	245
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246 switch (SAP_NR(opc))
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	248 case SAP_NR(MNSMS_UL): table = mnsms_table; n = TAB_SIZE ( mnsms_table); break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249 case SAP_NR(MMSMS_DL): table = mmsms_table; n = TAB_SIZE ( mmsms_table); break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250 case SAP_NR(SIM_UL): table = sim_table; n = TAB_SIZE ( sim_table); break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251 #ifdef GPRS
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252 case LL_DL: table = ll_table; n = TAB_SIZE ( ll_table); break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253 case GMMSMS_DL: table = gmmsms_table; n = TAB_SIZE (gmmsms_table); break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 #endif /* #ifdef GPRS */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255 #ifdef FF_EM_MODE
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256 case EM_Ul: table = em_table; n = TAB_SIZE (em_table) ; break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	257 #endif /* #ifdef FF_EM_MODE */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	258 default : table = NULL; n = 0; break;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	261 if (table != NULL )
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263 if (PRIM_NR(opc) < n)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	264 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 table += PRIM_NR(opc);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	266 #ifdef PALLOC_TRANSITION
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	267 P_SDU(prim) = table->soff ? (T_sdu) (((char)&prim->data) + table->soff) : 0;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268 #ifndef NO_COPY_ROUTING
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	269 P_LEN(prim) = table->size + sizeof (T_PRIM_HEADER);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	270 #endif /* NO_COPY_ROUTING */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271 #endif /* PALLOC_TRANSITION */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	272 JUMP (table->func) (P2D(prim));
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	274 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	275 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	276 pei_not_supported (P2D(prim));
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	277 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278 return PEI_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	281 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	282 * Primitive is no GSM Primitive
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 * then forward to the environment
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	284 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	285
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286 #ifdef GSM_ONLY
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287 PFREE (P2D(prim))
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	288
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289 return PEI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	290 #else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	291 if (opc & SYS_MASK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292 vsi_c_primitive (VSI_CALLER prim);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	293 else
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	294 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	295 PFREE (P2D(prim));
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	296 return PEI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	297 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	298 #endif /* else, #ifdef GSM_ONLY */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	300 return PEI_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	301 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	303 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	304 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	305 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306 \| STATE : code ROUTINE : pei_not_supported \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	307 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	308
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	309 PURPOSE : An unsupported primitive is received.
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	310
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	311 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	312
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	313 static void pei_not_supported (void *data)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	314 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	315 TRACE_FUNCTION ("pei_not_supported()");
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	316
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	317 PFREE (data);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	318 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	319
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	321 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	322 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	323 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	324 \| STATE : code ROUTINE : pei_init \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	325 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	326
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	327 PURPOSE : Initialize Protocol Stack Entity
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	328
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	330
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	331 LOCAL SHORT pei_init (T_HANDLE handle)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	332 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	333 sms_handle = handle;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	334
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	335 TRACE_FUNCTION ("pei_init()");
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	336
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	337 #ifdef TI_PS_HCOMM_CHANGE
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	338 if (!cl_hcom_all_handles_open())
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	340 return PEI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	342 #else /* for hCommHandles backward compatibility */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	343 if (hCommMMI < VSI_OK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	344 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	345 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	346 * Open MMI (Layer 4)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	347 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	348
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349 if ((hCommMMI = vsi_c_open (VSI_CALLER ACI_NAME)) < VSI_OK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 return PEI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	351 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	353 if (hCommMM < VSI_OK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	354 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355 if ((hCommMM = vsi_c_open (VSI_CALLER MM_NAME)) < VSI_OK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356 return PEI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	357 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	359 if (hCommSIM < VSI_OK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	360 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361 if ((hCommSIM = vsi_c_open (VSI_CALLER SIM_NAME)) < VSI_OK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	362 return PEI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	363 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364 #endif /* TI_PS_HCOMM_CHANGE */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	365 #if defined (GPRS)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	366 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367 * Open LLC for GPRS GSMS handling
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369 if (hCommLLC < VSI_OK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	370 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	371 if ((hCommLLC = vsi_c_open (VSI_CALLER LLC_NAME)) < VSI_OK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 return PEI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375 * Open GMM for GPRS registration inquiry
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377 if (hCommGMM < VSI_OK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	379 if ((hCommGMM = vsi_c_open (VSI_CALLER GMM_NAME)) < VSI_OK)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	380 return PEI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382 #endif /* GPRS */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	383
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 * Initialize data base
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387 cp_init ();
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388 rl_init ();
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389 tl_init ();
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	390 for_init_sms ();
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	391 pcm_Init ();
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	392
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	393 ccd_init ();
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	394
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395 #ifdef FF_EM_MODE
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396 em_init_sms_event_trace();
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397 #endif /* #ifdef FF_EM_MODE */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	398
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	399 return PEI_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	403 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	404 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	405 \| STATE : code ROUTINE : pei_timeout \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	407
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	408 PURPOSE : Process timeout
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412 LOCAL SHORT pei_timeout (USHORT index)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	413 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	414 tim_exec_timeout (index);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	415 return PEI_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	416 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	417
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418 #ifdef _SIMULATION_
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	419 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	420 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422 \| STATE : code ROUTINE : pei_exit \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	423 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	424
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	425 PURPOSE : Close Resources and terminate
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	426
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	427 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	428
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	429 LOCAL SHORT pei_exit (void)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	431 TRACE_FUNCTION ("pei_exit()");
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	432
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	433 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434 * clean up communication
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	436 #ifdef TI_PS_HCOMM_CHANGE
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	437 #else /* for hCommHandles backward compatibility */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438 vsi_c_close (VSI_CALLER hCommMMI);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439 hCommMMI = VSI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	440
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	441 vsi_c_close (VSI_CALLER hCommMM);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	442 hCommMM = VSI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	444 vsi_c_close (VSI_CALLER hCommSIM);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	445 hCommSIM = VSI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	446 #endif /* TI_PS_HCOMM_CHANGE */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	447 #ifdef GPRS
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	448 vsi_c_close (VSI_CALLER hCommLLC);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	449 hCommLLC = VSI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	450
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	451 vsi_c_close (VSI_CALLER hCommGMM);
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	452 hCommGMM = VSI_ERROR;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	453 #endif /* #ifdef GPRS */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	454
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	455 return PEI_OK;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	456 }
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	457 #endif /* _SIMULATION_ */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	458
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459 /*
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461 \| PROJECT : GSM-PS (8410) MODULE : SMS_PEI \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462 \| STATE : code ROUTINE : pei_config \|
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463 +--------------------------------------------------------------------+
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	464
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	465 PURPOSE : Dynamic Configuration
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469 #ifndef NCONFIG
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	470 LOCAL const KW_DATA kwtab[] = {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471 SMS_CONF_STRING_PAUSE, SMS_CONF_EVENT_PAUSE,
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472 SMS_CONF_STRING_RESUME, SMS_CONF_EVENT_RESUME,
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473 "", 0
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	474 };
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475 #endif /* #ifndef NCONFIG */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	476
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 #if !defined(NTRACE) && !defined(NCONFIG)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478 GLOBAL const KW_DATA partab[] = {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 TC1M_NAME, TC1M,
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480 TR1M_NAME, TR1M,
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 TR2M_NAME, TR2M,
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	482 TRAM_NAME, TRAM,
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	483 TLCT_NAME, TLCT,
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	484 TMMS_NAME, TMMS,
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	485 "", 0
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	486 };
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	487 #endif /* #if !defined(NTRACE) && !defined(NCONFIG) */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	488
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	489 /* Implements Measure#36 */
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490 #ifndef NCONFIG
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491 LOCAL SHORT pei_config (T_PEI_CONFIG inString)
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	492 {
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493 #ifndef NCONFIG
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494 char * s = inString;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	495 char * keyw;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	496 char * val [10];
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	498 GET_INSTANCE_DATA;
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499
75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500 TRACE_FUNCTION ("pei_config()");

0

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2 +-----------------------------------------------------------------------------

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3 | Project :

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4 | Modul :

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

5 +-----------------------------------------------------------------------------

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

8 |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

9 | This file is confidential and a trade secret of Texas

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

10 | Instruments Berlin, AG

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

11 | The receipt of or possession of this file does not convey

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

12 | any rights to reproduce or disclose its contents or to

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

13 | manufacture, use, or sell anything it may describe, in

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

14 | whole, or in part, without the specific written consent of

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

15 | Texas Instruments Berlin, AG.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

16 +-----------------------------------------------------------------------------

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

17 | Purpose : This module implements the process body interface

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

18 | for the entity SMS of the mobile station.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

19 +-----------------------------------------------------------------------------

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

20 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

21

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

22 #ifndef SMS_PEI_C

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

23 #define SMS_PEI_C

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

24

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

25 #include "config.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

26 #include "fixedconf.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

27 #include "condat-features.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

28

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

29 #define ENTITY_SMS

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

30

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

31 /*==== INCLUDES ===================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

32

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

33 #include <string.h>

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

34 #include <stdlib.h>

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

35 #include <stddef.h>

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

36 #include "typedefs.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

37 #include "pcm.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

38 #include "vsi.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

39 #include "custom.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

40 #include "gsm.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

41 #include "message.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

42 #include "ccdapi.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

43 #include "prim.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

44 #include "cus_sms.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

45 #include "cnf_sms.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

46 #include "mon_sms.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

47 #include "pei.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

48 #include "tok.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

49 #include "sms.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

50 #include "sms_em.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

51

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

52 #ifdef GPRS

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

53 #include "gprs.h"

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

54 #endif /* #ifdef GPRS */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

55

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

56 /*==== EXPORT =====================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

57 #ifdef TI_PS_HCOMM_CHANGE

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

58 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

59 GLOBAL T_HANDLE hCommSIM = VSI_ERROR; /* SIM Communication */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

60 GLOBAL T_HANDLE hCommMMI = VSI_ERROR; /* MMI Communication */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

61 GLOBAL T_HANDLE hCommMM = VSI_ERROR; /* MM Communication */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

62 #endif /* TI_PS_HCOMM_CHANGE */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

63 #ifdef GPRS

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

64 GLOBAL T_HANDLE hCommLLC = VSI_ERROR; /* LL Communication */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

65 GLOBAL T_HANDLE hCommGMM = VSI_ERROR; /* GMM Communication */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

66 #endif /* #ifdef GPRS */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

67 GLOBAL T_HANDLE sms_handle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

68

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

69 GLOBAL T_SMS_DATA sms_data_base;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

70

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

71 /*==== PRIVATE ====================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

72

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

73 static void pei_not_supported (void *data);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

74

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

75 /*==== VARIABLES ==================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

76 #ifdef _SIMULATION_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

77 static BOOL first_access = TRUE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

78 #endif /* _SIMULATION_ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

79 static T_MONITOR sms_mon;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

80

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

81 /*==== FUNCTIONS ==================================================*/

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

82

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

83 LOCAL const T_FUNC mnsms_table[] = {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

84 MAK_FUNC_0( tl_mnsms_delete_req, MNSMS_DELETE_REQ ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

85 MAK_FUNC_0( tl_mnsms_read_req, MNSMS_READ_REQ ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

86 MAK_FUNC_0( tl_mnsms_store_req, MNSMS_STORE_REQ ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

87 MAK_FUNC_0( tl_mnsms_submit_req, MNSMS_SUBMIT_REQ ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

88 MAK_FUNC_0( tl_mnsms_command_req, MNSMS_COMMAND_REQ ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

89 MAK_FUNC_0( tl_mnsms_configure_req, MNSMS_CONFIGURE_REQ ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

90 MAK_FUNC_0( tl_mnsms_pause_req, MNSMS_PAUSE_REQ ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

91 MAK_FUNC_0( tl_mnsms_resume_req, MNSMS_RESUME_REQ ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

92 MAK_FUNC_0( tl_mnsms_ack_res, MNSMS_ACK_RES ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

93 #ifdef REL99

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

94 MAK_FUNC_0( tl_mnsms_retrans_req, MNSMS_RETRANS_REQ ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

95 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

96 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

97 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

98 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

99 MAK_FUNC_0( tl_mnsms_query_req, MNSMS_QUERY_REQ )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

100

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

101 #ifdef GPRS

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

102 ,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

103 MAK_FUNC_0( tl_mnsms_mo_serv_req, MNSMS_MO_SERV_REQ )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

104 #endif /* #ifdef GPRS */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

105 #ifdef SIM_PERS_OTA

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

106 ,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

107 MAK_FUNC_0( tl_mnsms_OTA_message_res, MNSMS_OTA_MESSAGE_RES )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

108 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

109 };

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

110

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

111 LOCAL const T_FUNC mmsms_table[] = {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

112 MAK_FUNC_S( for_mmsms_data_ind, MMSMS_DATA_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

113 MAK_FUNC_0( cp_mmsms_error_ind, MMSMS_ERROR_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

114 MAK_FUNC_0( cp_mmsms_establish_cnf, MMSMS_ESTABLISH_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

115 MAK_FUNC_S( for_mmsms_establish_ind, MMSMS_ESTABLISH_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

116 MAK_FUNC_0( cp_mmsms_release_ind, MMSMS_RELEASE_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

117 MAK_FUNC_N( pei_not_supported, MMSMS_UNITDATA_IND )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

118 };

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

119

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

120 LOCAL const T_FUNC sim_table[] = {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

121 #if defined(SIM_TOOLKIT) OR defined(FF_CPHS)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

122 MAK_FUNC_0( tl_sim_read_cnf, SIM_READ_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

123 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

124 MAK_FUNC_N( pei_not_supported, SIM_READ_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

125 #endif /* else, #if defined(SIM_TOOLKIT) OR defined(FF_CPHS) */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

126 MAK_FUNC_0( tl_sim_update_cnf, SIM_UPDATE_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

127 MAK_FUNC_0( tl_sim_read_record_cnf, SIM_READ_RECORD_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

128 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

129 MAK_FUNC_0( tl_sim_update_record_cnf, SIM_UPDATE_RECORD_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

130 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

131 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

132 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

133 MAK_FUNC_N( pei_not_supported, SIM_INCREMENT_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

134 MAK_FUNC_N( pei_not_supported, SIM_VERIFY_PIN_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

135 MAK_FUNC_N( pei_not_supported, SIM_CHANGE_PIN_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

136 MAK_FUNC_N( pei_not_supported, SIM_DISABLE_PIN_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

137 MAK_FUNC_N( pei_not_supported, SIM_ENABLE_PIN_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

138 MAK_FUNC_N( pei_not_supported, SIM_UNBLOCK_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

139 MAK_FUNC_N( pei_not_supported, SIM_AUTHENTICATION_CNF),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

140 MAK_FUNC_N( pei_not_supported, SIM_MMI_INSERT_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

141 MAK_FUNC_N( pei_not_supported, SIM_MM_INSERT_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

142 MAK_FUNC_0( tl_sim_remove_ind, SIM_REMOVE_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

143 MAK_FUNC_N( pei_not_supported, SIM_SYNC_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

144 MAK_FUNC_N( pei_not_supported, SIM_ACTIVATE_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

145 MAK_FUNC_0( tl_sim_sms_insert_ind, SIM_SMS_INSERT_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

146 #if defined(SIM_TOOLKIT) AND defined(SAT_SMS_DNL_SUPPORT)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

147 MAK_FUNC_N( pei_not_supported, SIM_TOOLKIT_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

148 MAK_FUNC_0( tl_sim_toolkit_cnf, SIM_TOOLKIT_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

149 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

150 MAK_FUNC_N( pei_not_supported, SIM_TOOLKIT_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

151 MAK_FUNC_N( pei_not_supported, SIM_TOOLKIT_CNF ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

152 #endif /* else, #if defined(SIM_TOOLKIT) AND defined(SAT_SMS_DNL_SUPPORT) */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

153 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

154 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

155 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

156 #ifdef SIM_TOOLKIT

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

157 MAK_FUNC_0( tl_sim_file_update_ind, SIM_FILE_UPDATE_IND )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

158 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

159 MAK_FUNC_N( pei_not_supported, SIM_FILE_UPDATE_IND )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

160 #endif /* else, #ifdef SIM_TOOLKIT */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

161 };

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

162

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

163 #ifdef GPRS

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

164 LOCAL const T_FUNC ll_table[] = {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

165 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

166 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

167 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

168 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

169 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

170 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

171 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

172 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

173 MAK_FUNC_0( for_ll_unitready_ind, LL_UNITREADY_IND ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

174 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

175 MAK_FUNC_N( pei_not_supported, 0 ),

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

176 MAK_FUNC_0( for_ll_unitdata_ind, LL_UNITDATA_IND )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

177 };

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

178

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

179 LOCAL const T_FUNC gmmsms_table[] = {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

180 MAK_FUNC_0( cp_gmmsms_reg_state_cnf, GMMSMS_REG_STATE_CNF )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

181 };

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

182 #endif /* #ifdef GPRS */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

183

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

184 #ifdef FF_EM_MODE

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

185 LOCAL const T_FUNC em_table[] = {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

186 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x00 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

187 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x01 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

188 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x02 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

189 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x03 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

190 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x04 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

191 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x05 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

192 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x06 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

193 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x07 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

194 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x08 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

195 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x09 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

196 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0A */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

197 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0B */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

198 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0C */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

199 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0D */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

200 MAK_FUNC_N (pei_not_supported , 0 ), /* 0x0E */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

201 MAK_FUNC_0 (sms_em_sms_event_req, EM_SMS_EVENT_REQ) /* 0x0F */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

202 };

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

203 #endif /* #ifdef FF_EM_MODE */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

204

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

205 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

206 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

207 | PROJECT : GSM-PS (8410) MODULE : SMS_PEI |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

208 | STATE : code ROUTINE : pei_primitive |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

209 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

210

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

211 PURPOSE : Process protocol specific primitive.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

212

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

213 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

214

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

215 LOCAL SHORT pei_primitive (void * ptr)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

216 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

217 T_PRIM *prim = ptr;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

218

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

219 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

220 * | | |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

221 * MNSMS SIM EM UPLINK

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

222 * | | |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

223 * +-----v----------v-----v----+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

224 * | |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

225 * | SMS |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

226 * | |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

227 * +-------------^-------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

228 * |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

229 * MMSMS/LLC DOWNLINK

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

230 * |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

231 *

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

232 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

233

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

234 TRACE_FUNCTION ("pei_primitive()");

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

235

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

236 if (prim NEQ NULL)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

237 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

238 ULONG opc = prim->custom.opc;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

239 USHORT n;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

240 const T_FUNC *table;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

241

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

242 VSI_PPM_REC ((T_PRIM_HEADER*)prim, __FILE__, __LINE__);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

243

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

244 PTRACE_IN (opc);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

245

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

246 switch (SAP_NR(opc))

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

247 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

248 case SAP_NR(MNSMS_UL): table = mnsms_table; n = TAB_SIZE ( mnsms_table); break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

249 case SAP_NR(MMSMS_DL): table = mmsms_table; n = TAB_SIZE ( mmsms_table); break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

250 case SAP_NR(SIM_UL): table = sim_table; n = TAB_SIZE ( sim_table); break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

251 #ifdef GPRS

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

252 case LL_DL: table = ll_table; n = TAB_SIZE ( ll_table); break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

253 case GMMSMS_DL: table = gmmsms_table; n = TAB_SIZE (gmmsms_table); break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

254 #endif /* #ifdef GPRS */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

255 #ifdef FF_EM_MODE

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

256 case EM_Ul: table = em_table; n = TAB_SIZE (em_table) ; break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

257 #endif /* #ifdef FF_EM_MODE */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

258 default : table = NULL; n = 0; break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

259 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

260

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

261 if (table != NULL )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

262 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

263 if (PRIM_NR(opc) < n)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

264 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

265 table += PRIM_NR(opc);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

266 #ifdef PALLOC_TRANSITION

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

267 P_SDU(prim) = table->soff ? (T_sdu*) (((char*)&prim->data) + table->soff) : 0;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

268 #ifndef NO_COPY_ROUTING

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

269 P_LEN(prim) = table->size + sizeof (T_PRIM_HEADER);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

270 #endif /* NO_COPY_ROUTING */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

271 #endif /* PALLOC_TRANSITION */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

272 JUMP (table->func) (P2D(prim));

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

273 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

274 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

275 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

276 pei_not_supported (P2D(prim));

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

277 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

278 return PEI_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

279 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

280

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

281 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

282 * Primitive is no GSM Primitive

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

283 * then forward to the environment

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

284 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

285

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

286 #ifdef GSM_ONLY

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

287 PFREE (P2D(prim))

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

288

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

289 return PEI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

290 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

291 if (opc & SYS_MASK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

292 vsi_c_primitive (VSI_CALLER prim);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

293 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

294 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

295 PFREE (P2D(prim));

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

296 return PEI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

297 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

298 #endif /* else, #ifdef GSM_ONLY */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

299 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

300 return PEI_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

301 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

302

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

303 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

304 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

305 | PROJECT : GSM-PS (8410) MODULE : SMS_PEI |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

306 | STATE : code ROUTINE : pei_not_supported |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

307 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

308

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

309 PURPOSE : An unsupported primitive is received.

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

310

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

311 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

312

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

313 static void pei_not_supported (void *data)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

314 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

315 TRACE_FUNCTION ("pei_not_supported()");

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

316

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

317 PFREE (data);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

318 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

319

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

320

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

321 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

322 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

323 | PROJECT : GSM-PS (8410) MODULE : SMS_PEI |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

324 | STATE : code ROUTINE : pei_init |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

325 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

326

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

327 PURPOSE : Initialize Protocol Stack Entity

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

328

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

329 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

330

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

331 LOCAL SHORT pei_init (T_HANDLE handle)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

332 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

333 sms_handle = handle;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

334

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

335 TRACE_FUNCTION ("pei_init()");

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

336

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

337 #ifdef TI_PS_HCOMM_CHANGE

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

338 if (!cl_hcom_all_handles_open())

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

339 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

340 return PEI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

341 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

342 #else /* for hCommHandles backward compatibility */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

343 if (hCommMMI < VSI_OK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

344 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

345 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

346 * Open MMI (Layer 4)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

347 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

348

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

349 if ((hCommMMI = vsi_c_open (VSI_CALLER ACI_NAME)) < VSI_OK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

350 return PEI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

351 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

352

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

353 if (hCommMM < VSI_OK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

354 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

355 if ((hCommMM = vsi_c_open (VSI_CALLER MM_NAME)) < VSI_OK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

356 return PEI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

357 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

358

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

359 if (hCommSIM < VSI_OK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

360 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

361 if ((hCommSIM = vsi_c_open (VSI_CALLER SIM_NAME)) < VSI_OK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

362 return PEI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

363 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

364 #endif /* TI_PS_HCOMM_CHANGE */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

365 #if defined (GPRS)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

366 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

367 * Open LLC for GPRS GSMS handling

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

368 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

369 if (hCommLLC < VSI_OK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

370 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

371 if ((hCommLLC = vsi_c_open (VSI_CALLER LLC_NAME)) < VSI_OK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

372 return PEI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

373 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

374 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

375 * Open GMM for GPRS registration inquiry

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

376 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

377 if (hCommGMM < VSI_OK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

378 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

379 if ((hCommGMM = vsi_c_open (VSI_CALLER GMM_NAME)) < VSI_OK)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

380 return PEI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

381 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

382 #endif /* GPRS */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

383

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

384 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

385 * Initialize data base

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

386 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

387 cp_init ();

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

388 rl_init ();

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

389 tl_init ();

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

390 for_init_sms ();

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

391 pcm_Init ();

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

392

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

393 ccd_init ();

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

394

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

395 #ifdef FF_EM_MODE

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

396 em_init_sms_event_trace();

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

397 #endif /* #ifdef FF_EM_MODE */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

398

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

399 return PEI_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

400 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

401

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

402 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

403 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

404 | PROJECT : GSM-PS (8410) MODULE : SMS_PEI |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

405 | STATE : code ROUTINE : pei_timeout |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

406 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

407

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

408 PURPOSE : Process timeout

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

409

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

410 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

411

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

412 LOCAL SHORT pei_timeout (USHORT index)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

413 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

414 tim_exec_timeout (index);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

415 return PEI_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

416 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

417

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

418 #ifdef _SIMULATION_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

419 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

420 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

421 | PROJECT : GSM-PS (8410) MODULE : SMS_PEI |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

422 | STATE : code ROUTINE : pei_exit |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

423 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

424

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

425 PURPOSE : Close Resources and terminate

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

426

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

427 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

428

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

429 LOCAL SHORT pei_exit (void)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

430 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

431 TRACE_FUNCTION ("pei_exit()");

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

432

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

433 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

434 * clean up communication

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

435 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

436 #ifdef TI_PS_HCOMM_CHANGE

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

437 #else /* for hCommHandles backward compatibility */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

438 vsi_c_close (VSI_CALLER hCommMMI);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

439 hCommMMI = VSI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

440

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

441 vsi_c_close (VSI_CALLER hCommMM);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

442 hCommMM = VSI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

443

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

444 vsi_c_close (VSI_CALLER hCommSIM);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

445 hCommSIM = VSI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

446 #endif /* TI_PS_HCOMM_CHANGE */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

447 #ifdef GPRS

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

448 vsi_c_close (VSI_CALLER hCommLLC);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

449 hCommLLC = VSI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

450

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

451 vsi_c_close (VSI_CALLER hCommGMM);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

452 hCommGMM = VSI_ERROR;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

453 #endif /* #ifdef GPRS */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

454

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

455 return PEI_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

456 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

457 #endif /* _SIMULATION_ */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

458

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

459 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

460 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

461 | PROJECT : GSM-PS (8410) MODULE : SMS_PEI |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

462 | STATE : code ROUTINE : pei_config |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

463 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

464

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

465 PURPOSE : Dynamic Configuration

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

466

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

467 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

468

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

469 #ifndef NCONFIG

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

470 LOCAL const KW_DATA kwtab[] = {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

471 SMS_CONF_STRING_PAUSE, SMS_CONF_EVENT_PAUSE,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

472 SMS_CONF_STRING_RESUME, SMS_CONF_EVENT_RESUME,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

473 "", 0

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

474 };

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

475 #endif /* #ifndef NCONFIG */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

476

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

477 #if !defined(NTRACE) && !defined(NCONFIG)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

478 GLOBAL const KW_DATA partab[] = {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

479 TC1M_NAME, TC1M,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

480 TR1M_NAME, TR1M,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

481 TR2M_NAME, TR2M,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

482 TRAM_NAME, TRAM,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

483 TLCT_NAME, TLCT,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

484 TMMS_NAME, TMMS,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

485 "", 0

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

486 };

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

487 #endif /* #if !defined(NTRACE) && !defined(NCONFIG) */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

488

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

489 /* Implements Measure#36 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

490 #ifndef NCONFIG

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

491 LOCAL SHORT pei_config (T_PEI_CONFIG inString)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

492 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

493 #ifndef NCONFIG

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

494 char * s = inString;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

495 char * keyw;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

496 char * val [10];

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

497

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

498 GET_INSTANCE_DATA;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

499

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

500 TRACE_FUNCTION ("pei_config()");

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

501

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

502 TRACE_FUNCTION (s);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

503

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

504 tok_init(s);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

505

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

506 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

507 * Parse next keyword and number of variables

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

508 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

509 while ((tok_next(&keyw,val)) NEQ TOK_EOCS)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

510 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

511 switch ((tok_key((KW_DATA *)kwtab,keyw)))

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

512 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

513 case TOK_NOT_FOUND:

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

514 TRACE_ERROR ("[PEI_CONFIG]: Illegal Keyword");

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

515 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

516

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

517 case SMS_CONF_EVENT_PAUSE:

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

518 TRACE_EVENT("SMS_CONF_EVENT_PAUSE");

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

519 tl_pause();

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

520 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

521 case SMS_CONF_EVENT_RESUME:

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

522 TRACE_EVENT("SMS_CONF_EVENT_RESUME");

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

523 /* tl_resume(sms_data); */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

524

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

525 GET_MO_INSTANCE(sms_data);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

526 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

527 * TL state transition TL_ESTABLISH

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

528 * EST state transition EST_SMMA

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

529 * MMI state transition MMI_RESUME

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

530 *

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

531 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

532 SET_STATE (STATE_MMI, MMI_RESUME);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

533 SET_STATE (STATE_EST, EST_SMMA);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

534 SMS_INST_SET_STATE (STATE_TL, TL_ESTABLISH);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

535 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

536 * 1st shot

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

537 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

538 SMS_INST.retrans = FALSE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

539 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

540 * establish connection

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

541 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

542 tl_establish_connection(FALSE);

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

543 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

544 default:

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

545 break;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

546 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

547 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

548 #endif /* #ifndef NCONFIG */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

549

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

550 return PEI_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

551 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

552 #endif /* NCONFIG */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

553

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

554

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

555 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

556 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

557 | PROJECT : GSM-PS (6147) MODULE : SMS_PEI |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

558 | STATE : code ROUTINE : sms_pei_config |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

559 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

560

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

561 PURPOSE : Dynamic Configuration

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

562

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

563 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

564 /* Implements Measure#36 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

565 #ifndef NCONFIG

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

566 GLOBAL SHORT sms_pei_config ( char * inString, char * dummy )

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

567 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

568 pei_config ( inString );

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

569

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

570 return PEI_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

571 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

572 #endif /* NCONFIG */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

573

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

574

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

575 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

576 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

577 | PROJECT : GSM-PS (8410) MODULE : SMS_PEI |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

578 | STATE : code ROUTINE : pei_monitor |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

579 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

580

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

581 PURPOSE : Monitoring of physical Parameters

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

582

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

583 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

584

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

585 LOCAL SHORT pei_monitor (void ** monitor)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

586 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

587 TRACE_FUNCTION ("pei_monitor()");

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

588

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

589 /* Implements Measure#32: Row 20 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

590

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

591 * monitor = &sms_mon;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

592

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

593 return PEI_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

594 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

595

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

596 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

597 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

598 | PROJECT : GSM-PS (8410) MODULE : SMS_PEI |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

599 | STATE : code ROUTINE : pei_create |

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

600 +--------------------------------------------------------------------+

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

601

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

602 PURPOSE : Create the Protocol Stack Entity

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

603

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

604 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

605

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

606 GLOBAL SHORT sms_pei_create (T_PEI_INFO **info)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

607 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

608 static const T_PEI_INFO pei_info =

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

609 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

610 "SMS",

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

611 {

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

612 pei_init,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

613 #ifdef _SIMULATION_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

614 pei_exit,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

615 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

616 NULL,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

617 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

618 pei_primitive,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

619 pei_timeout,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

620 NULL, /* no signal function */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

621 NULL, /* no run function */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

622 /* Implements Measure#36 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

623 #ifdef NCONFIG

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

624 NULL, /* no pei_config function */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

625 #else /* not NCONFIG */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

626 pei_config,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

627 #endif /* NCONFIG */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

628 pei_monitor,

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

629 },

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

630 #if defined (GPRS)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

631 1792, /* Stack Size */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

632 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

633 #if defined (FAX_AND_DATA)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

634 1792, /* Stack Size */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

635 #else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

636 1500, /* Stacksize */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

637 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

638 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

639 10, /* Queue Entries */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

640 135, /* Priority */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

641 MAX_SMS_TIMER*MAX_SMS_CALLS, /* number of timer */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

642 0x03|PRIM_NO_SUSPEND /* flags */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

643 };

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

644

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

645 TRACE_FUNCTION ("pei_create()");

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

646

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

647 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

648 * Close Resources if open

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

649 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

650

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

651 #ifdef _SIMULATION_

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

652 if (first_access)

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

653 first_access = FALSE;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

654 else

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

655 pei_exit ();

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

656 #endif

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

657

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

658 /*

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

659 * Export startup configuration data

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

660 */

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

661

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

662 *info = (T_PEI_INFO *)&pei_info;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

663

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

664 return PEI_OK;

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

665 }

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

666

75a11d740a02 initial import of gsm-fw from freecalypso-sw rev 1033:5ab737ac3ad7

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

667 #endif /* #ifndef SMS_PEI_C */

FreeCalypso > hg > freecalypso-citrine

annotate g23m-gsm/sms/sms_pei.c @ 0:75a11d740a02