fc-magnetite: src/aci2/aci/psa

annotate src/aci2/aci/psa_satf.c @ 531:6917ea63bffa

doc/Compiling: Slackware, Wine and mokosrec2bin updates

author	Mychaela Falconia <falcon@freecalypso.org>
date	Fri, 26 Oct 2018 00:29:16 +0000
parents	93999a60b835
children

rev	line source
3 93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2 +-----------------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	3 \| Project : GSM-PS (6147)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4 \| Modul : PSA_SATF
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	5 +-----------------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6 \| Copyright 2002 Texas Instruments Berlin, AG
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 \| All rights reserved.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	8 \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	9 \| This file is confidential and a trade secret of Texas
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10 \| Instruments Berlin, AG
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11 \| The receipt of or possession of this file does not convey
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	12 \| any rights to reproduce or disclose its contents or to
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	13 \| manufacture, use, or sell anything it may describe, in
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	14 \| whole, or in part, without the specific written consent of
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	15 \| Texas Instruments Berlin, AG.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	16 +-----------------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	17 \| Purpose : This module defines the functions for the protocol
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	18 \| stack adapter for the SIM application toolkit.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	19 +-----------------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	20 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	22 #ifdef SIM_TOOLKIT
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24 #ifndef PSA_SATF_C
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25 #define PSA_SATF_C
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26 #endif
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	27
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28 #include "aci_all.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30 /==== INCLUDES ===================================================/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	31 #include "aci_cmh.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32 #include "aci_mem.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	34 #ifdef GPRS
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35 #include "gaci_cmh.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36 #endif
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38 #ifdef FAX_AND_DATA
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	39 #include "aci_fd.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	40 #endif /* of #ifdef FAX_AND_DATA */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 #include "aci.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44 #include "psa.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 #include "psa_cc.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46 #include "psa_sat.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47 #include "psa_util.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48 #include "cmh.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 #include "cmh_sat.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51 #include "psa_mm.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52 #include "psa_ss.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53 #include "psa_sim.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55 #include "ksd.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 /==== CONSTANTS ==================================================/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59 #define ITM_WDT (14) /* item width in chars */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60 #define HDR_WDT (10) /* header width in chars */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 /==== TYPES ======================================================/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65 /==== EXPORT =====================================================/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68 /==== VARIABLES ==================================================/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 LOCAL UBYTE ssResPrms[MAXIMUM( sizeof(BUF_res_params_sat),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70 MAXIMUM(sizeof(BUF_rej_params_sat),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71 sizeof(BUF_err_params_sat)))];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73 /==== FUNCTIONS ==================================================/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 LOCAL void psaSAT_getTonNpi(CHAR *inSeq, BOOL call_active,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76 UBYTE ton, UBYTE npi);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82 \| PROJECT : GSM-PS (6147) MODULE : SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 \| ROUTINE : psaSAT_BuildEnvCC \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 PURPOSE : Build envelope call control command.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 GLOBAL void psaSAT_BuildEnvCC ( SHORT cId,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91 T_CLPTY_PRM *ss_cldPty,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 T_sat_ussd *ussd,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 T_bcconf *ccp )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 T_CC_CALL_TBL *pCtbNtry = ccShrdPrm.ctb[cId];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 UBYTE ton;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97 UBYTE npi;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 * build envelope call control command
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105 MCAST( env, ENV_CMD );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107 memset( env, 0, sizeof( T_ENV_CMD ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109 env->v_cc_cmd = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 /* device identities */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112 env->cc_cmd.v_dev_ids = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 env->cc_cmd.dev_ids.src_dev = DEV_SRC_ME;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114 env->cc_cmd.dev_ids.dest_dev = DEV_DST_SIM;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116 if( cId NEQ NO_ENTRY )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 /* address */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119 env->cc_cmd.v_addr = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121 env->cc_cmd.addr.v_noa = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122 env->cc_cmd.addr.noa = pCtbNtry->cldPty.ton;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124 env->cc_cmd.addr.v_npi = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125 env->cc_cmd.addr.npi = pCtbNtry->cldPty.npi;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127 env->cc_cmd.addr.c_bcdDigit = pCtbNtry->cldPty.c_called_num;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 memcpy( env->cc_cmd.addr.bcdDigit,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129 pCtbNtry->cldPty.called_num,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 pCtbNtry->cldPty.c_called_num );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 /* capability configuration parameters */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 if( ccp )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 env->cc_cmd.v_cap_cnf_parms = FALSE; /* CCP not supported yet */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136 /* env->cc_cmd.v_cap_cnf_parms = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 env->cc_cmd.cap_cnf_parms.l_cap_cnf_parms = ccp.bc_len<<3;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 memcpy( env->cc_cmd.cap_cnf_parms.b_cap_cnf_parms, ccp.bc,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140 ccp.bc_len );*/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143 /* subaddress */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 if( pCtbNtry->cldPtySub.c_subaddr )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146 env->cc_cmd.v_subaddr = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148 env->cc_cmd.subaddr.v_tos = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149 env->cc_cmd.subaddr.tos = pCtbNtry->cldPtySub.tos;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151 env->cc_cmd.subaddr.v_oei = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 env->cc_cmd.subaddr.oei = pCtbNtry->cldPtySub.odd_even;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154 env->cc_cmd.subaddr.c_bcdDigit = pCtbNtry->cldPtySub.c_subaddr;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155 memcpy( env->cc_cmd.subaddr.bcdDigit, pCtbNtry->cldPtySub.subaddr,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156 pCtbNtry->cldPtySub.c_subaddr );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160 else if( ss_cldPty NEQ NULL )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162 /* SS string */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163 env->cc_cmd.v_ss_string = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165 psaSAT_getTonNpi(ss_cldPty->num, FALSE, &ton, &npi);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 env->cc_cmd.ss_string.v_noa = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168 env->cc_cmd.ss_string.noa = ton;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169 env->cc_cmd.ss_string.v_npi = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170 env->cc_cmd.ss_string.npi = npi;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172 env->cc_cmd.ss_string.c_ss_ctrl_string =
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	173 (UBYTE)utl_dialStr2BCD (ss_cldPty->num, /ssStr,/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	174 env->cc_cmd.ss_string.ss_ctrl_string,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175 MAX_SS_STRING_LEN);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	176 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	177
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178 else if( ussd NEQ NULL )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180 /* USSD string */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	181 env->cc_cmd.v_ussd_string = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183 env->cc_cmd.ussd_string.dcs = ussd->dcs;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184 env->cc_cmd.ussd_string.c_ussd_str = MINIMUM (ussd->c_ussd_str, MAX_SAT_USSD_LEN);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186 memcpy( env->cc_cmd.ussd_string.ussd_str,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187 ussd->ussd_str,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188 env->cc_cmd.ussd_string.c_ussd_str);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	191 /* location information */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	192
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	193 /* code MCC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	194 env->cc_cmd.cc_smc_loc_info.mnc_mcc \|= ((mmShrdPrm.usedPLMN.mcc[1]<<4) + mmShrdPrm.usedPLMN.mcc[0]) <<16;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195 env->cc_cmd.cc_smc_loc_info.mnc_mcc \|= ((mmShrdPrm.usedPLMN.mnc[2]<<4) + mmShrdPrm.usedPLMN.mcc[2]) << 8;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	196
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197 /* code MNC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 env->cc_cmd.cc_smc_loc_info.mnc_mcc \|= (mmShrdPrm.usedPLMN.mnc[1]<<4)+mmShrdPrm.usedPLMN.mnc[0];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200 /* code LAC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201 env->cc_cmd.cc_smc_loc_info.lac = mmShrdPrm.lac;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	202
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203 /* code CID */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204 env->cc_cmd.cc_smc_loc_info.cid = mmShrdPrm.cid;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	205
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206 env->cc_cmd.v_cc_smc_loc_info = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212 +--------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213 \| PROJECT : GSM-PS (6147) MODULE : psa_sat \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214 \| STATE : code ROUTINE : psaSAT_getTonNpi \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215 +--------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	217 PURPOSE : Get TON and NPI. The SS string in inSeq will be
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218 decoded to check if it contains a phone number. If
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	219 SS String contains a number, its TON and NPI will be
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220 returned. Otherwise TON and NPI will be set to FF as
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	221 required in GSM 11.14/GSM 11.11.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223 LOCAL void psaSAT_getTonNpi(CHAR *inSeq, BOOL call_active,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	224 UBYTE ton, UBYTE npi)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	225 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 T_KSD_SEQGRP grp;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	227 CHAR *rest;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	228 T_KSD_SEQPARAM para;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229 CHAR seq[MAX_DIAL_LEN];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231 *ton = TON_NOT_PRES;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	232 *npi = NPI_NOT_PRES;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	233
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234 strcpy(seq, inSeq);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	236 /* decode sequence */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	237 ksd_decode(seq, call_active, &grp, &rest, &para);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	238
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	239 /* analyse TON and NPI */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240 switch( grp )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242 case SEQGRP_CF:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244 if ( (para.cf.num NEQ NULL) AND (para.cf.num[0] NEQ 0) )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	245 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246 *ton = para.cf.ton;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247 *npi = para.cf.npi;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	248 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251 case SEQGRP_DIAL:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253 if ( ( para.dial.number NEQ NULL ) AND
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 ( para.dial.number[0] EQ 0 ) )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256 if ( para.dial.number[0] EQ '+' )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	257 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	258 *ton = TON_International;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	261 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262 *ton = TON_Unknown;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	264 *npi = NPI_IsdnTelephony;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	266
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	267 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	269 #ifdef SMI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	270 case SEQGRP_SET_ABBR_DIAL:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	272 if ( (para.abbrDial.number NEQ NULL) AND
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273 ( para.abbrDial.number[0] EQ 0 ) )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	274 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	275 if ( para.abbrDial.number[0] EQ '+' )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	276 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	277 *ton = TON_International;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	281 *ton = TON_Unknown;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	282 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 *npi = NPI_IsdnTelephony;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	284 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	285 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286 #endif /* SMI */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	288 default:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289 /* Sequence group does not contain number. TON and NPI still set to FF */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	290 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	291 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	293
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	294 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	295 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	296 \| PROJECT : GSM-PS (6147) MODULE : SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	297 \| ROUTINE : psaSAT_BuildEnvCB \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	298 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	300 PURPOSE : Build envelope cell broadcast data download command.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	301
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	303
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	304 GLOBAL void psaSAT_BuildEnvCB ( UBYTE *cbMsg, SHORT cbLen )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	305 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	307 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	308 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	309 * build envelope cell broadcast data download command
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	310 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	311 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	312 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	313 MCAST( env, ENV_CMD );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	314
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	315 memset( env, 0, sizeof( T_ENV_CMD ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	316
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	317 env->v_cbd_cmd = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	318
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	319 /* device identities */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320 env->cbd_cmd.v_dev_ids = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	321 env->cbd_cmd.dev_ids.src_dev = DEV_SRC_NTW;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	322 env->cbd_cmd.dev_ids.dest_dev = DEV_DST_SIM;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	323
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	324 /* CB message */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	325 env->cbd_cmd.v_cb_page = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	326 env->cbd_cmd.cb_page.l_cb_page = cbLen<<3;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	327 env->cbd_cmd.cb_page.o_cb_page = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	328
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 memcpy( env->cbd_cmd.cb_page.b_cb_page, cbMsg, cbLen );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	330 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	331 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	332
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	333 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	334 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	335 \| PROJECT : GSM-PS (6147) MODULE : SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	336 \| ROUTINE : psaSAT_BuildEnvMoSmCntr \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	337 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	338
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339 PURPOSE : Build envelope cell broadcast data download command.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	340
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	342
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	343 GLOBAL void psaSAT_BuildEnvMoSmCntr ( T_rp_addr sc_addr,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	344 T_tp_da dest_addr )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	345 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	346
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	347 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	348 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349 * build envelope
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	351 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	353 MCAST( env, ENV_CMD );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	354
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355 memset( env, 0, sizeof( T_ENV_CMD ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	357 env->v_smc_cmd = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	359 /* device identities */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	360 env->smc_cmd.v_dev_ids = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361 env->smc_cmd.dev_ids.src_dev = DEV_DST_ME;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	362 env->smc_cmd.dev_ids.dest_dev = DEV_DST_SIM;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	363
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364 /* short message address */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	365 env->smc_cmd.v_sm_addr = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	366
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367 env->smc_cmd.sm_addr.v_noa = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368 env->smc_cmd.sm_addr.noa = sc_addr.ton;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	370 env->smc_cmd.sm_addr.v_npi = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	371 env->smc_cmd.sm_addr.npi = sc_addr.npi;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373 env->smc_cmd.sm_addr.c_bcdDigit = sc_addr.c_num;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374 memcpy(&(env->smc_cmd.sm_addr.bcdDigit[0]),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375 &(sc_addr.num[0]),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376 sc_addr.c_num /MAX_SMS_DIGIT_LEN/);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378 /* address 2 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	379 env->smc_cmd.v_sm_addr_2 = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	380
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381 env->smc_cmd.sm_addr_2.v_noa = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382 env->smc_cmd.sm_addr_2.noa = dest_addr.ton;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	383
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 env->smc_cmd.sm_addr_2.v_npi = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 env->smc_cmd.sm_addr_2.npi = dest_addr.npi;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387 env->smc_cmd.sm_addr_2.c_bcdDigit = dest_addr.c_num;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388 memcpy(&(env->smc_cmd.sm_addr_2.bcdDigit[0]),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389 &(dest_addr.num[0]),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	390 dest_addr.c_num /MAX_SMS_DIGIT_LEN/);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	391
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	392 /* location information */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	393
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	394 /* code MCC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395 env->smc_cmd.cc_smc_loc_info.mnc_mcc \|= ((mmShrdPrm.usedPLMN.mcc[1]<<4) + mmShrdPrm.usedPLMN.mcc[0]) <<16;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396 env->smc_cmd.cc_smc_loc_info.mnc_mcc \|= ((mmShrdPrm.usedPLMN.mnc[2]<<4) + mmShrdPrm.usedPLMN.mcc[2]) << 8;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	398 /* code MNC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	399 env->smc_cmd.cc_smc_loc_info.mnc_mcc \|= (mmShrdPrm.usedPLMN.mnc[1]<<4)+mmShrdPrm.usedPLMN.mnc[0];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401 /* code LAC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402 env->smc_cmd.cc_smc_loc_info.lac = mmShrdPrm.lac;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	403
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	404 /* code CID */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	405 env->smc_cmd.cc_smc_loc_info.cid = mmShrdPrm.cid;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	407 env->smc_cmd.v_cc_smc_loc_info = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	408
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	413 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	414 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	415 \| PROJECT : GSM-PS (6147) MODULE : SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	416 \| ROUTINE : psaSAT_BuildEnvEventDwn \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	417 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	419 PURPOSE : Build envelope event download command.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	420
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	423 GLOBAL BOOL psaSAT_BuildEnvEventDwn ( UBYTE event, SHORT callId, T_CC_INITIATER actionSrc )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	424 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	425 T_CC_CALL_TBL * pCtbNtry; /* holds pointer to call table entry */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	426 BOOL MT_flag;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	427 UBYTE trans_id = 0xFF;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	428 UBYTE ti_flag = 0xFF; /* lint: initialization warning */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	429
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430 TRACE_FUNCTION("psaSAT_BuildEnvEventDwn()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	431
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	432 pCtbNtry = ccShrdPrm.ctb[callId];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	433
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	436 * build envelope
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	437 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	440 MCAST( env, ENV_CMD );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	441
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	442 memset( env, 0, sizeof( T_ENV_CMD ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	444 env->v_evd_cmd = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	445
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	446 /* event */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	447 env->evd_cmd.v_ev_list = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	448 env->evd_cmd.ev_list.c_event = 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	449 env->evd_cmd.ev_list.event[0] = event;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	450
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	451 /* device identities */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	452 env->evd_cmd.v_dev_ids = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	453 env->evd_cmd.dev_ids.dest_dev = DEV_DST_SIM;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	454 switch( actionSrc )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	455 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	456 case( NEAR_END ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	457 env->evd_cmd.dev_ids.src_dev = DEV_SRC_ME;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	458 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460 case( FAR_END ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461 env->evd_cmd.dev_ids.src_dev = DEV_SRC_NTW;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	464 default:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	465 env->evd_cmd.v_dev_ids = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468 if ( event EQ EVENT_MT_CALL OR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469 event EQ EVENT_CALL_CONN OR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	470 event EQ EVENT_CALL_DISC )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472 /* process ti identifier */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473 env->evd_cmd.v_ti_list = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	474 env->evd_cmd.ti_list.c_ti_oct = 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	476 MT_flag = pCtbNtry -> ti & 0x08; /* TRUE if MS terminated transaction */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 trans_id = ( pCtbNtry -> ti) & 0x07; /* see GSM 04.07 �11.2.3.1.3 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480 switch( event )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	482 case( EVENT_MT_CALL ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	483
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	484 /* ti identifier */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	485 /* MNCC_SETUP_IND means message sent from the side that originated the TI */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	486 env->evd_cmd.ti_list.ti_oct[0].ti = /lint -e(644) / trans_id;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	487
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	488 /* address */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	489 if (pCtbNtry->clgPty.c_num NEQ 0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491 env->evd_cmd.v_addr = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	492
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493 env->evd_cmd.addr.v_noa = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494 env->evd_cmd.addr.noa = pCtbNtry->clgPty.ton;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	495
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	496 env->evd_cmd.addr.v_npi = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497 env->evd_cmd.addr.npi = pCtbNtry->clgPty.npi;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	498
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499 env->evd_cmd.addr.c_bcdDigit = pCtbNtry->clgPty.c_num;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500 memcpy(&(env->evd_cmd.addr.bcdDigit[0]),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	501 &(pCtbNtry->clgPty.num[0]),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	502 pCtbNtry->clgPty.c_num);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	503 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	504
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	505 /* called party subaddress */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	506 if (pCtbNtry->clgPtySub.c_subaddr NEQ 0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	507 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	508 env->evd_cmd.v_subaddr = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	509
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	510 env->evd_cmd.subaddr.v_tos = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	511 env->evd_cmd.subaddr.tos = pCtbNtry -> clgPtySub.tos;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	512
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	513 env->evd_cmd.subaddr.v_oei = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	514 env->evd_cmd.subaddr.oei = pCtbNtry -> clgPtySub.odd_even;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	515
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	516 env->evd_cmd.subaddr.c_bcdDigit = pCtbNtry->clgPtySub.c_subaddr;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	517 memcpy(&(env->evd_cmd.subaddr.bcdDigit[0]),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	518 &(pCtbNtry->clgPtySub.subaddr[0]),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	519 pCtbNtry->clgPtySub.c_subaddr);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	520 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	521 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	522
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	523
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	524 case( EVENT_CALL_CONN ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	525 /* ti identifier */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	526 /* MNCC_SETUP_CNF context with MO Call
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	527 or: MNCC_SETUP_RES context with MT Call
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	528 means: message sent to the side that originates the TI */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	529 ti_flag = 0x08;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	530 env->evd_cmd.ti_list.ti_oct[0].ti = trans_id \| ti_flag;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	531 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	532
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	533
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	534 case( EVENT_CALL_DISC ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	535 /* ti identifier */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	536 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	537 means: message sent to the side that originates the TI */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	538 switch (actionSrc)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	539 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	540 case( NEAR_END ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	541 /* MNCC_REJ_IND / MNCC_DISC_REQ / MNCC_REL_REQ */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	542 if ( /lint -e(644) / MT_flag )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	543 ti_flag = 0x08;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	544 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	545 ti_flag = 0x00;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	546 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	547
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	548 case( FAR_END ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	549 /* MNCC_DISC_IND / MNCC_REL_IND / MNCC_REL_REQ */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	550 if ( MT_flag )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	551 ti_flag = 0x00;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	552 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	553 ti_flag = 0x08;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	554 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	555 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	556 env->evd_cmd.ti_list.ti_oct[0].ti = trans_id \| ti_flag;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	557
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	558 /* Cause */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	559 env->evd_cmd.v_cause = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	560 if (pCtbNtry -> numRawCauseBytes EQ 0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	561 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	562 if (GET_CAUSE_VALUE(pCtbNtry -> rejCs) NEQ NOT_PRESENT_8BIT) /* radio-link failure */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	563 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	564 env->evd_cmd.cause.c_cs = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	565 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	566 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	567 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	568 if (GET_CAUSE_VALUE(pCtbNtry -> nrmCs) NEQ NOT_PRESENT_8BIT)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	569 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	570 env->evd_cmd.cause.c_cs = 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	571 env->evd_cmd.cause.cs[0] = GET_CAUSE_VALUE(pCtbNtry -> nrmCs);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	572 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	573 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	574 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	575 env->evd_cmd.v_cause = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	576 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	577 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	578 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	579 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	580 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	581 env->evd_cmd.cause.c_cs = pCtbNtry -> numRawCauseBytes;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	582 memcpy( env->evd_cmd.cause.cs,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	583 pCtbNtry -> rawCauseBytes,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	584 pCtbNtry -> numRawCauseBytes );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	585 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	586 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	587
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	588
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	589 case( EVENT_LOC_STATUS ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	590 env->evd_cmd.v_loc_state = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	591
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	592 switch( satShrdPrm.locInfo.regStatus )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	593 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	594 case( NO_VLD_RS ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	595 env->evd_cmd.v_loc_state = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	596 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	597
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	598 case( RS_NO_SRV ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	599 env->evd_cmd.loc_state = 0x02;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	600 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	601
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	602 case( RS_LMTD_SRV ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	603 env->evd_cmd.loc_state = 0x01;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	604 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	605
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	606 case( RS_FULL_SRV ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	607 env->evd_cmd.loc_state = 0x00;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	608
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	609 /*---------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	610 /* only in this case would location info be included
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	611 ----------------------------------------------------*/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	612
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	613 /* location information */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	614
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	615 /* code MCC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	616 env->evd_cmd.cc_smc_loc_info.mnc_mcc \|=
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	617 ((satShrdPrm.locInfo.currPLMN.mcc[1]<<4) + satShrdPrm.locInfo.currPLMN.mcc[0]) <<16;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	618 env->evd_cmd.cc_smc_loc_info.mnc_mcc \|=
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	619 ((satShrdPrm.locInfo.currPLMN.mnc[2]<<4) + satShrdPrm.locInfo.currPLMN.mcc[2]) << 8;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	620
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	621 /* code MNC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	622 env->evd_cmd.cc_smc_loc_info.mnc_mcc \|=
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	623 (satShrdPrm.locInfo.currPLMN.mnc[1]<<4)+satShrdPrm.locInfo.currPLMN.mnc[0];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	624
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	625 /* code LAC */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	626 env->evd_cmd.cc_smc_loc_info.lac = satShrdPrm.locInfo.lac;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	627
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	628 /* code CID */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	629 env->evd_cmd.cc_smc_loc_info.cid = satShrdPrm.locInfo.cid;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	630
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	631 env->evd_cmd.v_cc_smc_loc_info = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	632
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	633 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	634 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	635
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	636 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	637
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	638 #ifdef FF_SAT_E
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	639 case( EVENT_CHAN_STAT ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	640 env->evd_cmd.v_chan_stat = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	641 env->evd_cmd.chan_stat.chan_id = CHANNEL_ID_1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	642 env->evd_cmd.chan_stat.chan_stat_link = LINK_NO_ESTABL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	643 env->evd_cmd.chan_stat.chan_stat_inf2 = LINK_DROPPED;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	644 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	645 #endif /* FF_SAT_E */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	646
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	647 default:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	648 env->v_evd_cmd = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	649 TRACE_EVENT("wrong event id for SAT event download");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	650 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	651 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	652 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	653 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	654 * check if a call control request is already in progress
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	655 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	656 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	657 if( satShrdPrm.SIMCCParm.busy EQ TRUE )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	658 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	659 /* event has to be queued */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	660 T_SAT_QUEUE *p_queue;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	661
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	662 if (satShrdPrm.event.c_queued >= MAX_EVENT_QUEUED - 1 )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	663 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	664 TRACE_EVENT("Too many events have been queued: failed to queue this new event");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	665 return FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	666 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	667
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	668 p_queue = &satShrdPrm.event.queued[satShrdPrm.event.c_queued - 1];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	669 p_queue->owner = satShrdPrm.owner;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	670
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	671 if (p_queue->stk_cmd NEQ NULL)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	672 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	673 MFREE (p_queue->stk_cmd); /* Should not happen */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	674 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	675 ACI_MALLOC (p_queue->stk_cmd, sizeof (T_stk_cmd));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	676 if (psaSAT_STKBuildCmd (p_queue->stk_cmd) < 0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	677 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	678 ACI_MFREE (p_queue->stk_cmd);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	679 p_queue->stk_cmd = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	680 TRACE_ERROR ("problem encoding SAT cmd");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	681 return FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	682 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	683 satShrdPrm.event.c_queued++;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	684 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	685 return TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	686 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	687 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	688
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	689
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	690
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	691
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	692 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	693 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	694 \| PROJECT : GSM-PS (6147) MODULE : SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	695 \| ROUTINE : psaSAT_SendTrmResp \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	696 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	697
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	698 PURPOSE : Send a terminal response for a previous SAT command.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	699
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	700 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	701
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	702 GLOBAL void psaSAT_InitTrmResp ( T_ACI_SAT_TERM_RESP *init_resp )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	703 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	704 init_resp->addLen = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	705 init_resp->add = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	706 init_resp->add_content = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	707 init_resp->resCC = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	708 init_resp->text = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	709 init_resp->at_resp = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	710 init_resp->at_resp_count = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	711 #ifdef FF_SAT_E
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	712 init_resp->chnStat = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	713 init_resp->bearDesc = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	714 init_resp->bufSize = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	715 #endif /* FF_SAT_E */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	716 memset (init_resp->dtt_buf, 0xFF, TIME_STAMP_LENGTH);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	717 memset (init_resp->lang, 0xFF, CLAN_CODE_LEN);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	718 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	719
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	720 LOCAL void sat_build_cc_action_resp(UBYTE rspId,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	721 UBYTE addLen,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	722 UBYTE *add,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	723 UBYTE *resCC,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	724 T_TERM_RESP *res)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	725 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	726 UBYTE byteLen; /* holds byte length */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	727 UBYTE p; / byte pointer */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	728
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	729 if( satShrdPrm.stkCnfPrim OR resCC )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	730 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	731 p = (resCC)? resCC : satShrdPrm.stkCnfPrim->stk_cmd.cmd;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	732
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	733 if( p[1] EQ 0x81 )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	734 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	735 byteLen = p[2];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	736 p = &p[3];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	737 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	738 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	739 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	740 byteLen = p[1];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	741 p = &p[2];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	742 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	743
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	744 res->v_cc_req_act = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	745 res->cc_req_act.l_cc_req_act = byteLen<<3;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	746 memcpy( res->cc_req_act.b_cc_req_act, p, byteLen );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	747
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	748 /* result 2 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	749 res->v_res_2 = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	750 res->res_2.gen = res->res.gen;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	751
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	752 /* adjust first result according to second result (GSM 11.14 / 9.1) */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	753 if( rspId <= 0x1F )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	754
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	755 res->res.gen = RSLT_PERF_MDFY_SIM;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	756
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	757 else if( rspId >= 0x20 AND rspId <= 0x2F )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	758
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	759 res->res.gen = RSLT_CC_SIM_TMP;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	760
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	761 else if( rspId >= 0x30 AND rspId <= 0x3F )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	762 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	763 res->res.gen = RSLT_CC_SIM_PRM;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	764 res->res.v_add = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	765 res->res.add.l_add = 8;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	766 res->res.add.b_add[0] = ADD_CC_REQ_CHNG;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	767 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	768 if( addLen )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	769 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	770 if( res->res.gen NEQ RSLT_CC_SIM_PRM ) res->res.v_add = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	771 res->res_2.v_add = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	772 res->res_2.add.l_add = addLen<<3;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	773 memcpy( res->res_2.add.b_add,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	774 add,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	775 addLen );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	776 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	777
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	778 /* free the primitive */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	779 if( satShrdPrm.stkCnfPrim )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	780 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	781 PFREE( satShrdPrm.stkCnfPrim );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	782 satShrdPrm.stkCnfPrim = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	783 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	784 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	785 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	786
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	787 GLOBAL BOOL psaSAT_SendTrmResp ( UBYTE rspId,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	788 T_ACI_SAT_TERM_RESP *data_for_term_resp)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	789 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	790 TRACE_FUNCTION("psaSAT_SendTrmResp()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	791
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	792 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	793 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	794 * build terminal response
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	795 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	796 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	797 CCD_START;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	798 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	799 MCAST( res, TERM_RESP );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	800
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	801 memset( res, 0, sizeof( T_TERM_RESP ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	802
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	803 /* init of data_for_term_resp */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	804 /* return network error cause GSM 11.14 / 12.12.3 (it's mandatory) */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	805 if( ( data_for_term_resp->add_content NEQ 0 ) OR
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	806 ( rspId EQ RSLT_NTW_UNAB_PROC ) )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	807 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	808 data_for_term_resp->add = &(data_for_term_resp->add_content);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	809 data_for_term_resp->addLen = 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	810 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	811
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	812 /* device identities */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	813 res->v_cmd_details = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	814 res->cmd_details.cmd_nr = satShrdPrm.cmdDet.cmdNr;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	815 res->cmd_details.cmd_typ = satShrdPrm.cmdDet.cmdType;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	816 res->cmd_details.cmd_qlf = satShrdPrm.cmdDet.cmdQlf;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	817
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	818 /* device identities */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	819 res->v_dev_ids = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	820 res->dev_ids.src_dev = DEV_SRC_ME;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	821 res->dev_ids.dest_dev = DEV_DST_SIM;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	822
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	823 /* result */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	824 res->v_res = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	825 res->res.gen = (rspId EQ RSLT_PERF_SUCCESS AND cmpFlg)?
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	826 RSLT_PERF_PART_CMPR:rspId;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	827 if( data_for_term_resp->addLen )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	828 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	829 res->res.v_add = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	830 res->res.add.l_add = data_for_term_resp->addLen<<3;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	831 memcpy( res->res.add.b_add, data_for_term_resp->add, data_for_term_resp->addLen );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	832 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	833
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	834 /* call control requested action */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	835 sat_build_cc_action_resp( rspId,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	836 data_for_term_resp->addLen,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	837 data_for_term_resp->add,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	838 data_for_term_resp->resCC,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	839 res );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	840
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	841 /* USSD related terminal response */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	842 if( data_for_term_resp->text NEQ NULL )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	843 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	844 res->v_text = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	845 res->text.dcs = data_for_term_resp->text->dcs;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	846 res->text.c_text_str = data_for_term_resp->text->c_text_str;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	847 memcpy( &(res->text.text_str),
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	848 data_for_term_resp->text->text_str,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	849 data_for_term_resp->text->c_text_str);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	850 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	851
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	852 /* Run AT related terminal response */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	853 if( data_for_term_resp->at_resp NEQ NULL )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	854 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	855 res->v_at_resp = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	856
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	857 memcpy( res->at_resp.text_str,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	858 data_for_term_resp->at_resp,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	859 data_for_term_resp->at_resp_count );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	860
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	861 res->at_resp.c_text_str = (UBYTE)data_for_term_resp->at_resp_count;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	862 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	863
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	864 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	865 Provide Local Information (date, time and time zone)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	866 related terminal response
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	867 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	868 if( data_for_term_resp->dtt_buf[0] NEQ 0xFF)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	869 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	870 res->v_dtt = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	871
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	872 memcpy( res->dtt.text_str,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	873 data_for_term_resp->dtt_buf,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	874 TIME_STAMP_LENGTH );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	875
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	876 res->dtt.c_text_str = (UBYTE)TIME_STAMP_LENGTH;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	877 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	878
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	879 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	880 Provide Local Information (Language Setting)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	881 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	882
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	883 if( data_for_term_resp->lang[0] NEQ 0xFF)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	884 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	885 res->v_lang = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	886
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	887 memcpy( res->lang.lang_buf,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	888 data_for_term_resp->lang,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	889 CLAN_CODE_LEN );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	890
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	891 res->lang.c_lang_buf = (UBYTE)CLAN_CODE_LEN;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	892 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	893
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	894 #ifdef FF_SAT_E
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	895 /* add channel status to terminal response */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	896 if( data_for_term_resp->chnStat NEQ FALSE )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	897 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	898 /* restricted to only one channel for class e */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	899 res->v_chan_stat = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	900 res->c_chan_stat = 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	901 res->chan_stat[0].chan_id = CHANNEL_ID_1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	902
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	903 res->chan_stat[0].chan_stat_inf2 = NO_FURTH_INFO;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	904 res->chan_stat[0].chan_stat_link = LINK_NO_ESTABL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	905
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	906 if( satShrdPrm.chnTb.chnUsdFlg )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	907 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	908 switch( satShrdPrm.chnTb.lnkStat )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	909 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	910 case( SIM_LINK_CNCT ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	911
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	912 res->chan_stat[0].chan_stat_link = LINK_ESTABL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	913 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	914
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	915 case( SIM_LINK_DROP ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	916
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	917 res->chan_stat[0].chan_stat_inf2 = LINK_DROPPED;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	918 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	919
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	920 default: /* already handled by pre-setting */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	921
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	922 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	923 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	924 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	925 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	926 /* add bearer description to terminal response */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	927 if( data_for_term_resp->bearDesc NEQ FALSE AND satShrdPrm.opchPrm )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	928 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	929 if( satShrdPrm.opchType EQ B_CSD )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	930 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	931 res->v_bear_desc = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	932 res->bear_desc.bear_type = BT_CSD;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	933 res->bear_desc.v_csd_bear_prm = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	934 res->bear_desc.csd_bear_prm = ((T_SAT_CSD_PRM*)satShrdPrm.opchPrm)->csd_bear_prm;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	935 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	936 if( satShrdPrm.opchType EQ B_GPRS )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	937 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	938 res->v_bear_desc = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	939 res->bear_desc.bear_type = BT_GPRS;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	940 res->bear_desc.v_gprs_bear_prm = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	941 res->bear_desc.gprs_bear_prm = ((T_SAT_GPRS_PRM*)satShrdPrm.opchPrm)->gprs_bear_prm;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	942 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	943 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	944 /* add buffer size to terminal response */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	945 if( data_for_term_resp->bufSize NEQ FALSE )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	946 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	947 res->v_buffer_size = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	948 res->buffer_size = SIM_CLASS_E_BUFFER_SIZE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	949 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	950 #endif /* FF_SAT_E */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	951
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	952 cmpFlg = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	953 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	954
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	955 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	956 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	957 * send terminal response
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	958 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	959 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	960 satShrdPrm.owner = NO_VLD_OWN;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	961
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	962 if (satShrdPrm.cust1StkCmd != (void *)0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	963 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	964 ACI_MFREE(satShrdPrm.cust1StkCmd); /* Free the dynamically allocated Cust1 Stk Cmd memory */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	965
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	966 satShrdPrm.cust1StkCmd = (void *)0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	967 satShrdPrm.cust1StkCmdLen = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	968 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	969
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	970 if( psaSAT_STKResponse() < 0 ) /* STK command response */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	971 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	972 TRACE_EVENT( "FATAL RETURN SAT in send term resp" );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	973 CCD_END;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	974 return( FALSE );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	975 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	976
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	977 CCD_END;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	978 return (TRUE);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	979 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	980
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	981 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	982 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	983 \| PROJECT : GSM-PS (6147) MODULE : PSA_SATF \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	984 \| ROUTINE : psaSAT_dasmMECmd \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	985 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	986
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	987 PURPOSE : disassemble ME proactive SIM command.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	988 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	989
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	990 GLOBAL BOOL psaSAT_dasmMECmd ( BUF_cmd_prms *cmdPrm )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	991 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	992 UBYTE ccdRet, err;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	993 T_ACI_SAT_TERM_RESP resp_data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	994
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	995 BOOL aciOnlyEvents; /* holds information whether only ACI events are in SET UP
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	996 EVENT LIST */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	997 BOOL sendRes; /* holds temporaly return result whether to send response
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	998 or not */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	999
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1000 /* response message in the case of SET UP EVENT LIST, only ACI events */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1001 static UBYTE TRSetEventOk [12] =
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1002 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1003 0x81, /* command details tag */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1004 0x03, /* command details length */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1005 0x00, /* will be updated to current cmd num */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1006 0x05, /* command SETUP EVENT LIST */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1007 0x00, /* not used */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1008 0x82, /* device details tag */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1009 0x02, /* device details length */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1010 0x82, /* source ME */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1011 0x81, /* destination SIM */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1012 0x83, /* result tag */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1013 0x01, /* result length */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1014 0x00 /* result OK */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1015 };
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1016
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1017 TRACE_FUNCTION("psaSAT_dasmMECmd");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1018
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1019 psaSAT_InitTrmResp( &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1020
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1021 if ((satShrdPrm.cmdDet.cmdType NEQ SAT_CMD_EVENT_LIST) && /* ACI has to process the event before */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1022 (simShrdPrm.overall_cust_mode EQ (UBYTE)CUST_NORMAL_BEHAVIOUR)) /* and NOT Cust1 behaviour */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1023 cmhSAT_STKUsrNtfy();
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1024
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1025 if( cmdPrm EQ NULL ) /* no parameter */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1026 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1027 memset(&satShrdPrm.stkCmdPrm, 0,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1028 sizeof(satShrdPrm.stkCmdPrm));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1029 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1030 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1031 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1032 memcpy( &satShrdPrm.stkCmdPrm, cmdPrm,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1033 sizeof(satShrdPrm.stkCmdPrm));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1034
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1035 ccdRet = ccd_decodeMsg (CCDENT_SAT,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1036 DOWNLINK,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1037 (T_MSGBUF *) &satShrdPrm.stkCmdPrm,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1038 (UBYTE *) _decodedMsg,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1039 satShrdPrm.cmdDet.cmdType );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1040
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1041 /* check for CCD error */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1042 if( ccdRet NEQ ccdOK )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1043 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1044 TRACE_EVENT_P1( "CCD Decoding Error: %d", ccdRet );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1045
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1046 err = psaSAT_ccdErrChk();
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1047 if( err NEQ 0 )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1048 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1049 psaSAT_SendTrmResp( err, &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1050 return( FALSE );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1051 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1052 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1053 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1054
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1055 /* continue processing */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1056 switch( satShrdPrm.cmdDet.cmdType )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1057 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1058 case( SAT_CMD_SETUP_CALL ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1059 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1060 MCAST( calCmd, SETUP_CALL );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1061
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1062 return( cmhSAT_setupCall( calCmd ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1063 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1064
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1065 case( SAT_CMD_SEND_SS ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1066 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1067 MCAST( ssCmd, SEND_SS );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1068
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1069 return( cmhSAT_sendSS( ssCmd ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1070 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1071
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1072 case( SAT_CMD_SEND_USSD ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1073 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1074 MCAST( ussdCmd, SEND_USSD );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1075
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1076 return( cmhSAT_sendUSSD( ussdCmd ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1077 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1078
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1079 case( SAT_CMD_SEND_SMS ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1080 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1081 MCAST( smCmd, SEND_SM );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1082
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1083 return( cmhSAT_sendSM( smCmd ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1084 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1085
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1086 case( SAT_CMD_SEND_DTMF ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1087 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1088 MCAST( dtmfCmd, SEND_DTMF );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1089
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1090 return( cmhSAT_sendDTMF( dtmfCmd ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1091 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1092
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1093 case( SAT_CMD_EVENT_LIST ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1094 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1095 MCAST( setEvent, SETUP_EVENT );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1096
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1097 if (cmhSAT_setupEvent_Test( setEvent, &aciOnlyEvents ))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1098 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1099 /* ACI-SPR-18200: If there are no Events to be processed by MMI
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1100 ACI bypasses the MMI functionality and returns TR by itself */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1101
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1102 /* something went wrong, temp event list is empty --> TR(30) */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1103 if ( satShrdPrm.event.temp_list EQ 0L )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1104 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1105 psaSAT_SendTrmResp( RSLT_PERF_SUCCESS, &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1106 return FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1107 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1108
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1109 if ( aciOnlyEvents )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1110 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1111 /* prepare response to signal OK to SATK */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1112 TRSetEventOk[2] = satShrdPrm.cmdDet.cmdNr;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1113 satShrdPrm.setPrm[satShrdPrm.owner].stkCmd = TRSetEventOk;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1114 satShrdPrm.setPrm[satShrdPrm.owner].stkCmdLen = 12;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1115
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1116 /* inform SIM about acknowledged event list */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1117 sendRes = cmhSAT_CheckSetEventResp( );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1118
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1119 if (sendRes)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1120 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1121 if( psaSAT_STKResponse() < 0 ) /* respond to STK command */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1122 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1123 TRACE_EVENT( "FATAL RETURN - TR could not be send" );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1124 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1125 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1126 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1127 else /* signal MMI to process further events */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1128 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1129 cmhSAT_STKCmdInd();
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1130 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1131 return TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1132 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1133 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1134 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1135 if ( satShrdPrm.event.temp_list NEQ 0L )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1136 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1137 satShrdPrm.event.temp_list = 0L; /* reinitialize temp_event_list */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1138 psaSAT_SendTrmResp( RSLT_ME_CAP, &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1139 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1140 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1141 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1142 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1143
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1144 case( SAT_CMD_RUN_AT ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1145 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1146 MCAST( calCmd, RUN_AT );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1147
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1148 return( cmhSAT_runAt( calCmd ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1149 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1150
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1151 case( SAT_CMD_LAUNCH_BROWSER ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1152 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1153 MCAST( launchBrowserCmd, LAUNCH_BROWSER );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1154
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1155 return( cmhSAT_launchBrowser( launchBrowserCmd ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1156 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1157
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1158 case( SAT_CMD_PROV_LOC_INFO):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1159 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1160 return( cmhSAT_provLocalInfo());
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1161 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1162 #ifdef FF_SAT_E
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1163 case( SAT_CMD_OPEN_CHANNEL ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1164 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1165 MCAST( opchCmd, OPEN_CHANNEL );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1166
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1167 return( cmhSAT_OpenChannelReq( opchCmd ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1168 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1169 #endif /* FF_SAT_E */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1170 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1171 return( FALSE );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1172 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1173
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1174 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1175 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1176 \| PROJECT : GSM-PS (6147) MODULE : PSA_SATF \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1177 \| ROUTINE : psaSAT_SSResComp \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1178 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1179
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1180 PURPOSE : SS result component handling.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1181 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1182
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1183 GLOBAL void psaSAT_SSResComp ( T_res_comp* resCmp )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1184 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1185 UBYTE addLen = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1186 T_ACI_SAT_TERM_RESP resp_data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1187
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1188 psaSAT_InitTrmResp( &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1189
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1190 /* Add the operation code and parameters to terminal response
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1191 (reference: section 12.12.1 "Additional information for SEND SS" of 11.14)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1192 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1193 if( resCmp -> v_sequence AND
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1194 resCmp -> sequence.v_op_code )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1195 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1196 ssResPrms[0] = resCmp -> sequence.op_code;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1197
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1198 if( resCmp -> sequence.params.l_params )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1199 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1200 addLen = resCmp -> sequence.params.l_params >> 3;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1201
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1202 memcpy( &ssResPrms[1], resCmp -> sequence.params.b_params, addLen);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1203 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1204 ++addLen;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1205 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1206 resp_data.add = ssResPrms;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1207 resp_data.addLen = addLen;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1208
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1209 psaSAT_SendTrmResp( RSLT_PERF_SUCCESS, &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1210 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1211
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1212 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1213 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1214 \| PROJECT : GSM-PS (6147) MODULE : PSA_SATF \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1215 \| ROUTINE : psaSAT_SSErrComp \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1216 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1217
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1218 PURPOSE : SS error result component handling.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1219 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1220
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1221 GLOBAL void psaSAT_SSErrComp ( T_fac_inf* errCmp, BOOL is_fac_ussd )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1222 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1223 UBYTE ccdRet;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1224 UBYTE addLen = 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1225 T_ACI_SAT_TERM_RESP resp_data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1226
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1227 MCAST( com, COMP_SAT );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1228
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1229 TRACE_FUNCTION("psaSAT_SSErrComp()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1230
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1231 psaSAT_InitTrmResp( &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1232 *ssResPrms = ADD_NO_CAUSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1233
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1234 memset( com, 0, sizeof( T_COMP_SAT ));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1235
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1236 ccdRet = ccd_decodeMsg (CCDENT_FAC,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1237 DOWNLINK,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1238 (T_MSGBUF *) errCmp,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1239 (UBYTE *) _decodedMsg,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1240 COMP_SAT);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1241
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1242 if( ccdRet NEQ ccdOK )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1243 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1244 TRACE_EVENT_P1("CCD Decoding Error: %d",ccdRet );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1245 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1246 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1247 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1248 if( com->err_comp_sat.err_desc_sat.err_params_sat.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1249 l_err_params_sat )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1250 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1251 addLen = com->err_comp_sat.err_desc_sat.err_params_sat.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1252 l_err_params_sat >> 3;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1253
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1254 memcpy( ssResPrms,com->err_comp_sat.err_desc_sat.err_params_sat.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1255 b_err_params_sat, addLen );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1256 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1257 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1258 resp_data.add = ssResPrms;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1259 resp_data.addLen = addLen;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1260
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1261 if( is_fac_ussd )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1262 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1263 psaSAT_SendTrmResp( RSLT_USSD_ERR, &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1264 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1265 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1266 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1267 psaSAT_SendTrmResp( RSLT_SS_ERR, &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1268 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1269 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1270
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1271 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1272 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1273 \| PROJECT : GSM-PS (6147) MODULE : PSA_SATF \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1274 \| ROUTINE : psaSAT_SSRejComp \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1275 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1276
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1277 PURPOSE : SS reject component handling.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1278 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1279
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1280 GLOBAL void psaSAT_SSRejComp ( UBYTE cRejectInfo )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1281 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1282 UBYTE addLen = 1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1283 T_ACI_SAT_TERM_RESP resp_data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1284
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1285 TRACE_FUNCTION("psaSAT_SSRejComp()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1286
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1287 psaSAT_InitTrmResp( &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1288 *ssResPrms = ADD_NO_CAUSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1289
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1290 resp_data.add = ssResPrms;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1291 resp_data.addLen = addLen;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1292
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1293 psaSAT_SendTrmResp( cRejectInfo, &resp_data );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1294 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1295
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1296 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1297 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1298 \| PROJECT : GSM-PS (6147) MODULE : PSA_SATF \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1299 \| ROUTINE : psaSAT_ss_end_ind \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1300 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1301
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1302 PURPOSE : handles SAT responses to SAT after a SAT originated SS.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1303 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1304
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1305 GLOBAL T_ACI_RETURN psaSAT_ss_end_ind ( SHORT sId,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1306 T_COMPONENT *com,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1307 T_MNSS_END_IND *mnss_end_ind,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1308 BOOL is_fac_ussd )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1309 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1310 TRACE_FUNCTION("psaSAT_ss_end_ind()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1311
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1312 if( com->v_res_comp )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1313 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1314 if( is_fac_ussd EQ FALSE ) /* not for USSD !! */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1315 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1316 psaSAT_SSResComp( &com->res_comp );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1317 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1318 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1319 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1320 psaSS_dasmResultCmp( sId, &com->res_comp );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1321 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1322 return( AT_EXCT );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1323 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1324
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1325 if( com->v_err_comp )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1326 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1327 psaSAT_SSErrComp( &mnss_end_ind -> fac_inf, is_fac_ussd );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1328 return( AT_FAIL );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1329 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1330
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1331 if( com->v_rej_comp )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1332 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1333 UBYTE cRejectInfo = RSLT_NTW_UNAB_PROC;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1334
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1335 /* check for protocol incompatibility for USSD */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1336 if ( (is_fac_ussd) AND
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1337 (com->rej_comp.v_inv_problem) )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1338 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1339 switch( com->rej_comp.inv_problem )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1340 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1341 case 0x01 : /* invoke problem code #1 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1342 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1343 if (psaSS_asmUSSDProt1(sId))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1344 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1345 /* facility with Protocole 1 format has been sent: wait for answer */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1346 return( AT_CMPL );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1347 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1348 cRejectInfo = RSLT_NTW_UNAB_PROC;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1349 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1350 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1351 case 0x02 : /* invoke problem code #2 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1352 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1353 cRejectInfo = RSLT_USSD_ERR;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1354 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1355 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1356 default :
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1357 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1358 TRACE_EVENT_P1("psaSAT_ss_end_ind(): unknown invoke problem: %x", com->rej_comp.inv_problem );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1359 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1360 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1361 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1362 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1363 psaSAT_SSRejComp( cRejectInfo );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1364 return( AT_FAIL );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1365 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1366 return(AT_FAIL);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1367 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1368
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1369 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1370 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1371 \| PROJECT : GSM-PS (6147) MODULE : PSA_SATF \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1372 \| ROUTINE : psaSAT_ccdErrChk \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1373 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1374
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1375 PURPOSE : CCD error checking. The function returns a SAT result
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1376 value unequal to 0 if the operation is must be terminated.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1377 Otherwise the condition is only a warning and the operation
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1378 should be proceeded.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1379 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1380
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1381 GLOBAL UBYTE psaSAT_ccdErrChk ( void )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1382 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1383 USHORT parLst[MAX_ERR_PAR];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1384 UBYTE ccdErr;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1385 UBYTE fstFlg = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1386
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1387 TRACE_FUNCTION("psaSAT_ccdErrChk()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1388
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1389 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1390 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1391 * handling of first error
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1392 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1393 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1394 do
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1395 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1396 memset (parLst,0, sizeof (parLst));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1397
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1398 if( fstFlg )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1399 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1400 ccdErr = ccd_getFirstError (CCDENT_SAT, parLst);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1401 fstFlg = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1402 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1403 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1404
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1405 ccdErr = ccd_getNextError (CCDENT_SAT, parLst);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1406
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1407 switch (ccdErr)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1408 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1409 case( ERR_IE_NOT_EXPECTED ): /* unexpected element */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1410 if( !((UBYTE)parLst[0] & 0x80) )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1411 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1412 cmpFlg = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1413 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1414 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1415 /* otherwise continue, no break */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1416 /lint -fallthrough/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1417 case( ERR_COMPREH_REQUIRED ): /* comprehension required */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1418
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1419 return( RSLT_UNKN_DATA );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1420
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1421 case( ERR_MAND_ELEM_MISS ): /* mandatory elements missing */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1422
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1423 return( RSLT_ERR_REQ_VAL );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1424 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1425 } while( ccdErr NEQ ERR_NO_MORE_ERROR );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1426
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1427 return( 0 );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1428 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1429
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1430 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1431 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1432 \| PROJECT : GSM-PS (6147) MODULE : PSA_SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1433 \| ROUTINE : psaSAT_DumpCmd \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1434 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1435
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1436 PURPOSE : Dump SAT command to debug output.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1437
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1438 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1439
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1440 GLOBAL void psaSAT_DumpCmd ( T_stk_cmd * cmd )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1441 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1442 #define SAT_TRC_LEN 32
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1443
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1444 CHAR strBuf[2SAT_TRC_LEN+1]; / holds string buffer */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1445 ULONG idx, cnt, mcnt; /* buffer index */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1446 CHAR pDest; / points to destination */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1447
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1448 TRACE_FUNCTION("psaSAT_DumpCmd()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1449
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1450 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1451 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1452 * format command
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1453 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1454 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1455 TRACE_EVENT( "SAT CMD SENT/RECEIVED:" );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1456
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1457 mcnt = (ULONG)cmd->l_cmd >> 3;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1458
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1459 if( !mcnt )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1460 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1461 TRACE_EVENT_P1("an empty envelope. (%d)", (ULONG)cmd->l_cmd);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1462 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1463 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1464
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1465 for( cnt = 0; cnt < mcnt; cnt += SAT_TRC_LEN )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1466 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1467 pDest = strBuf;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1468
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1469 for( idx = 0; idx < SAT_TRC_LEN AND (idx + cnt) < mcnt; idx++ )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1470 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1471 pDest += sprintf( pDest, "%02X", (UBYTE)cmd->cmd[idx + cnt] );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1472 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1473
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1474 *pDest = 0x0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1475
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1476 TRACE_EVENT_P1("%s", strBuf );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1477 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1478 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1479
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1480 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1481 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1482 \| PROJECT : GSM-PS (6147) MODULE : PSA_SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1483 \| ROUTINE : psaSAT_FURegister \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1484 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1485
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1486 PURPOSE : Register a handler for FILE UPDATE.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1487
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1488 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1489
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1490 GLOBAL BOOL psaSAT_FURegister ( T_SAT_FU_FUNC fu_func )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1491 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1492 int i;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1493
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1494 TRACE_FUNCTION("psaSAT_FURegister()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1495
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1496 for (i = 0; i < MAX_FU_OPS; i++)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1497 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1498 if (satShrdPrm.fu_func[i] EQ fu_func)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1499 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1500 TRACE_EVENT ("FU func already registered");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1501 return TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1502 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1503 if (satShrdPrm.fu_func[i] EQ NULL)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1504 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1505 satShrdPrm.fu_func[i] = fu_func;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1506 return TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1507 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1508 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1509 return FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1510 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1511
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1512 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1513 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1514 \| PROJECT : GSM-PS (6147) MODULE : PSA_SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1515 \| ROUTINE : psaSAT_FUConfirm \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1516 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1517
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1518 PURPOSE : Confirm a handled FILE UPDATE. The parameter is the same
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1519 with which the handler was called and refers to the entry
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1520 of the callback table.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1521
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1522 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1523
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1524 GLOBAL void psaSAT_FUConfirm (int currFU, USHORT resFU)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1525 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1526 BOOL fu_active;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1527 BOOL aci_sent_no_primitive;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1528
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1529 TRACE_EVENT_P2("psaSAT_FUConfirm(): currFU: %d, resFU: %d", currFU, resFU);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1530
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1531 if (resFU EQ SIM_FU_ERROR) /If there is one error, the rest of the procedure is to be cancelled /
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1532 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1533 PALLOC (fu_res, SIM_FILE_UPDATE_RES);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1534
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1535 fu_res->source = SRC_MMI;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1536 fu_res->fu_rsc = SIM_FU_ERROR;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1537
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1538 if (satShrdPrm.fu_func_notif)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1539 (void)satShrdPrm.fu_func_notif((int)fu_res->fu_rsc,satShrdPrm.fu_ind); /Sends the final result to MMI /
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1540
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1541 PSENDX (SIM, fu_res);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1542
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1543 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1544 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1545
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1546 TRACE_EVENT_P1("satShrdPrm.fu_ind: %d", satShrdPrm.fu_ind);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1547
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1548 if (satShrdPrm.fu_ind NEQ NULL AND currFU < MAX_FU_OPS)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1549 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1550 if (currFU < 0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1551 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1552 if (satShrdPrm.fu_func_notif)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1553 { /Sends the file update request notification to MMI /
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1554 if (!satShrdPrm.fu_func_notif(-1,satShrdPrm.fu_ind))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1555 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1556 PALLOC (fu_res, SIM_FILE_UPDATE_RES); /* If rejected, send negative response to SIM */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1557
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1558 fu_res->source = SRC_MMI;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1559 fu_res->fu_rsc = SIM_FU_ERROR;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1560 PSENDX (SIM, fu_res);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1561 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1562
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1563 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1564 currFU = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1565 /satShrdPrm.fu_rsc = SIM_FU_ERROR;/ /* default*/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1566 fu_active = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1567 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1568 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1569 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1570 ++currFU;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1571
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1572 if ( (resFU EQ SIM_FU_SUCC_ADD) AND (satShrdPrm.fu_rsc NEQ SIM_FU_ERROR) )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1573 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1574 satShrdPrm.fu_rsc = resFU;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1575 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1576
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1577 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1578 switch (resFU)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1579 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1580 case SIM_FU_SUCCESS:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1581 if (satShrdPrm.fu_rsc EQ SIM_FU_SUCC_ADD)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1582 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1583 case SIM_FU_SUCC_ADD:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1584 satShrdPrm.fu_rsc = resFU;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1585 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1586 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1587 fu_active = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1588 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1589
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1590 for ( ; currFU < MAX_FU_OPS; currFU++)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1591 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1592 if (satShrdPrm.fu_func[currFU] EQ NULL)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1593 continue;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1594 /* else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1595 fu_active = TRUE;*/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1596
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1597 aci_sent_no_primitive = satShrdPrm.fu_func[currFU](currFU, satShrdPrm.fu_ind);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1598
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1599 if (!aci_sent_no_primitive)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1600 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1601 return; /* otherwise, result would be sent directly, and not at the end */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1602 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1603 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1604
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1605 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1606 PALLOC (fu_res, SIM_FILE_UPDATE_RES);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1607
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1608 fu_res->source = SRC_MMI;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1609 fu_res->fu_rsc = (fu_active)? satShrdPrm.fu_rsc: SIM_FU_SUCCESS;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1610
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1611 if (satShrdPrm.fu_func_notif)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1612 (void)satShrdPrm.fu_func_notif((int)fu_res->fu_rsc,satShrdPrm.fu_ind); /Sends the final result to MMI /
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1613
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1614 TRACE_EVENT("FREE satShrdPrm.fu_ind");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1615 PFREE (satShrdPrm.fu_ind);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1616 satShrdPrm.fu_ind = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1617
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1618 PSENDX (SIM, fu_res);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1619 simShrdPrm.fuRef = -1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1620 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1621 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1622 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1623
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1624
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1625 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1626 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1627 \| PROJECT : GSM-PS (6147) MODULE : PSA_SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1628 \| ROUTINE : psaSAT_FUNotifyRegister \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1629 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1630
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1631 PURPOSE : Register a handler for FILE UPDATE.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1632
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1633 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1634
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1635 GLOBAL BOOL psaSAT_FUNotifyRegister ( T_SAT_FU_FUNC fu_func )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1636 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1637
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1638 TRACE_FUNCTION("psaSAT_FUNotifyRegister()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1639
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1640 if (fu_func)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1641 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1642 satShrdPrm.fu_func_notif = fu_func;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1643 return TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1644 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1645 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1646 return FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1647 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1648
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1649
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1650
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1651 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1652 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1653 \| PROJECT : GSM-PS (6147) MODULE : PSA_SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1654 \| ROUTINE : psaSAT_Init \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1655 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1656
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1657 PURPOSE : initialize the protocol stack adapter for SAT.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1658
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1659 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1660
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1661 /* MACRO: initializer for set parameter */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1662 #define INIT_SAT_SET_PARM( dest, def )\
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1663 for( LpCnt = 0; LpCnt < OWN_MAX; LpCnt++ )\
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1664 satShrdPrm.setPrm[LpCnt].dest = def
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1665
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1666 GLOBAL void psaSAT_Init ( void )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1667 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1668
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1669 TRACE_FUNCTION("psaSAT_Init()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1670 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1671 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1672 * set default parms
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1673 *-------------------------------------------------------------------
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1674 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1675 memset( &satShrdPrm, 0, sizeof(T_SAT_SHRD_PRM));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1676 satShrdPrm.dur = -1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1677 satShrdPrm.SentUSSDid = NO_ENTRY;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1678 satShrdPrm.fu_rsc = SIM_FU_SUCCESS;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1679 satShrdPrm.fu_ind = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1680 satShrdPrm.sId_pwd_requested = NO_ENTRY;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1681 satShrdPrm.cust1SimRefreshRespRqd = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1682 satShrdPrm.locInfo.currPLMN.v_plmn = INVLD_PLMN;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1683 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1684
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1685 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1686 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1687 \| PROJECT : GSM-PS (6147) MODULE : SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1688 \| ROUTINE : psaSAT_ChkEventList \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1689 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1690
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1691 PURPOSE : Check if the event is monitored and shall alert SAT.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1692
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1693 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1694
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1695 GLOBAL BOOL psaSAT_ChkEventList( UBYTE eventNr )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1696 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1697 BOOL event_listed = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1698
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1699 TRACE_FUNCTION("psaSAT_ChkEventList()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1700
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1701 event_listed = (satShrdPrm.event.list >> eventNr ) & 0x01;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1702
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1703 if( event_listed )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1704 return( TRUE );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1705
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1706 return( FALSE );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1707 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1708
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1709 #ifdef FF_SAT_E
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1710
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1711 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1712 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1713 \| PROJECT : GSM-PS (6147) MODULE : SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1714 \| ROUTINE : psaSAT_ctbFindActCall \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1715 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1716
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1717 PURPOSE : Return the call id of a call which is in an active state.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1718 If no call could be found the function returns NO_ENTRY.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1719
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1720 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1721
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1722 GLOBAL SHORT psaSAT_ctbFindActCall( void )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1723 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1724 UBYTE ctbIdx;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1725 SHORT actId = NO_ENTRY;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1726
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1727 TRACE_FUNCTION("psaSAT_ctbFindActCall()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1728
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1729 for( ctbIdx = 0; ctbIdx < MAX_CALL_NR; ctbIdx++ )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1730 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1731 if (ccShrdPrm.ctb[ctbIdx] NEQ NULL)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1732 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1733 switch( psaCC_ctb(ctbIdx)->calStat )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1734 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1735 case( CS_ACT ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1736 case( CS_ACT_REQ ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1737 case( CS_MDF_REQ ):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1738
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1739 actId = ctbIdx;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1740 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1741 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1742 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1743 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1744
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1745 return( actId );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1746 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1747
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1748 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1749 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1750 \| PROJECT : GSM-PS (6147) MODULE : SAT \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1751 \| ROUTINE : psaSAT_gprsFindFreeCntxt\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1752 +-------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1753
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1754 PURPOSE : Return a free context id, if busy return NO_ENTRY.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1755
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1756 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1757 #ifdef GPRS
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1758 GLOBAL SHORT psaSAT_gprsFindFreeCntxt( void )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1759 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1760 BOOL cntxtStat[MAX_CID+1];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1761 SHORT cntxtId[MAX_CID+1];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1762 SHORT cid = NO_ENTRY;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1763 UBYTE idx;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1764
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1765 TRACE_FUNCTION("psaSAT_gprsFindFreeCntxt()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1766
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1767 if( qAT_PlusCGACT( CMD_SRC_LCL, cntxtStat, cntxtId ) NEQ AT_CMPL )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1768
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1769 return( NO_ENTRY );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1770
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1771 for( idx = 0; idx < MAX_CID; idx++ )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1772 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1773 if( cntxtId[idx] NEQ INVALID_CID AND cntxtStat[idx] EQ TRUE ) continue;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1774
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1775 cid = (cntxtId[idx] EQ INVALID_CID)? idx+1:cntxtId[idx];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1776 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1777 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1778
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1779 return( cid );
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1780
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1781 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1782 #endif /* GPRS */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1783
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1784 #endif /* FF_SAT_E */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1785
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1786 #endif /* #ifdef SIM_TOOLKIT */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1787
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1788 /==== EOF ========================================================/

FreeCalypso > hg > fc-magnetite

annotate src/aci2/aci/psa_satf.c @ 531:6917ea63bffa