fc-magnetite: src/g23m-aci/aci/cmh

author	Mychaela Falconia <falcon@freecalypso.org>
date	Tue, 06 Nov 2018 03:19:27 +0000 (2018-11-06)
parents	53929b40109c
children

rev	line source
162 53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2 +-----------------------------------------------------------------------------
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	3 \| Project : GSM-PS (6147)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4 \| Modul : CMH_SMSF
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	5 +-----------------------------------------------------------------------------
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6 \| Copyright 2002 Texas Instruments Berlin, AG
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 \| All rights reserved.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	8 \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	9 \| This file is confidential and a trade secret of Texas
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10 \| Instruments Berlin, AG
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11 \| The receipt of or possession of this file does not convey
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	12 \| any rights to reproduce or disclose its contents or to
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	13 \| manufacture, use, or sell anything it may describe, in
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	14 \| whole, or in part, without the specific written consent of
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	15 \| Texas Instruments Berlin, AG.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	16 +-----------------------------------------------------------------------------
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	17 \| Purpose : This module defines the functions used by the command
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	18 \| handler for the short message service.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	19 +-----------------------------------------------------------------------------
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	20 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	22 #ifndef CMH_SMSF_C
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23 #define CMH_SMSF_C
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24 #endif
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26 #include "aci_all.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	27 /==== INCLUDES ===================================================/
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28 #include "aci_cmh.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29 #include "ati_cmd.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30 #include "aci_cmd.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	31
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32 #ifdef FAX_AND_DATA
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33 #include "aci_fd.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	34 #endif /* of #ifdef FAX_AND_DATA */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36 #include "aci.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37 #include "aci_lst.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38 #include "aci_mem.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	39 #include "psa.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	40 #include "psa_cc.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41 #ifdef SIM_TOOLKIT
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42 #include "psa_sat.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 #endif
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44 #include "psa_sms.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 #include "psa_sim.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46 #include "psa_mmi.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47 #include "psa_util.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48 #include "phb.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 #include "cmh.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50 #include "cmh_sms.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51 #include "pcm.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53 #include "aci_lst.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55 #if (defined (MFW) AND !defined (FF_MMI_RIV)) OR defined (_CONC_TESTING_)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56 #include "conc_sms.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 #endif /* ##if (defined (MFW) AND !defined (FF_MMI_RIV)) OR defined (_CONC_TESTING_)*/
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60 #ifdef UART
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61 #include "dti_conn_mng.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 #endif
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64 #include "cmh_sim.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65 #ifndef _SIMULATION_
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 /* temporary solution to get ffs.h included without GPRS to be set ! */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68 #ifdef GPRS
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 #include "ffs/ffs.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70 #else
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71 #include "ffs/ffs.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72 #undef GPRS
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73 #endif /* GPRS */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 #include "ffs_coat.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 #endif /* !_SIMULATION_ */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79 #ifdef FF_CPHS
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80 #include "cphs.h"
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81 #endif /* FF_CPHS */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 /==== CONSTANTS ==================================================/
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84 #define CMMS_MODE_TIMER_VAL (5000)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 #define SMS_CMH_YEAR_MAX (99) /* maximum value for year in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 #define SMS_CMH_YEAR_MIN (0) /* minimum value for year in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89 #define SMS_CMH_MONTH_MAX (12) /* maximum value for month in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91 #define SMS_CMH_MONTH_MIN (1) /* minimum value for month in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 #define SMS_CMH_DAY_MAX (31) /* maximum value for day in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 #define SMS_CMH_DAY_MIN (1) /* minimum value for day in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97 #define SMS_CMH_HOUR_MAX (23) /* maximum value for hour in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99 #define SMS_CMH_HOUR_MIN (0) /* minimum value for hour in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 #define SMS_CMH_MINUTE_MAX (59) /* maximum value for minute in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 #define SMS_CMH_MINUTE_MIN (0) /* minimum value for minute in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105 #define SMS_CMH_SECOND_MAX (59) /* maximum value for second in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107 #define SMS_CMH_SECOND_MIN (0) /* minimum value for second in */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108 /* absolute validity period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110 #define SMS_CMH_TZ_MAX (47) /* maximum value for a time */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 /* zone in absolute validity */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112 /* period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 #define SMS_CMH_TZ_MIN (-47) /* minimum value for a time */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114 /* zone in absolute validity */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115 /* period */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 /* macro for converting a two digit BCD into an UBYTE */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119 #define BCD2UBYTE(bcd) (UBYTE)(10 * bcd[0] + bcd[1])
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121 /* macro for testing whether any digit of a two digit */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122 /* BCD lies outside of a predefined value range */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123 #define NOTBCD(bcd) (bcd[0] > 9 OR\
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124 bcd[1] > 9 )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127 #define L_MAX_UD 140
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 #define L_MAX_UD_CONC 134
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 #ifdef FF_CPHS_REL4
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131 typedef enum
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 MSG_WAITING_TYPE_INVALID = -1,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134 MSG_WAITING_TYPE_VOICE,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 MSG_WAITING_TYPE_FAX,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136 MSG_WAITING_TYPE_EMAIL,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 MSG_WAITING_TYPE_OTHER
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138 } T_MSG_WAITING_TYPE;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 #endif
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 /==== TYPES ======================================================/
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143 /==== EXPORT =====================================================/
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 EXTERN T_ACI_LIST *set_prm_list;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146 /==== PROTOTYPES==================================================/
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147 /* Implements Measure # 73 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148 LOCAL BOOL cmhSMS_findMessageIds (USHORT lower_mid, USHORT upper_mid);
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149 /* Implements Measure # 126 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150 LOCAL void cmhSMS_processOrigDestAddr (T_ACI_CMGL_SM *sm,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151 T_rp_addr *rp_addr,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 T_tp_da *tp_addr );
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153 /* Implements Measure # 9 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154 LOCAL void cmhSMS_clearCbmPrm (void);
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157 /==== VARIABLES ==================================================/
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159 const char * const ffs_smsprfl_fname[] = { FFS_SMSPRFL_FNAME01,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160 FFS_SMSPRFL_FNAME02,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161 FFS_SMSPRFL_FNAME03,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162 FFS_SMSPRFL_FNAME04 };
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164 /==== FUNCTIONS ==================================================/
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 +--------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168 \| PROJECT : GSM-F&D (8411) MODULE : ACI_CMD \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169 \| STATE : code ROUTINE : aci_encodeVpenh \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170 +--------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172 PURPOSE : This function encodes a given T_ACI_VP_ENH type to a
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	173 string.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	174 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175 GLOBAL void aci_encodeVpenh ( CHAR* vpenh_str,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	176 T_ACI_VP_ENH* vpenh )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	177 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178 UBYTE pos;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180 /* functionality indicator */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	181 utl_binToHex (&vpenh->func_ind, 1, vpenh_str);
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182 pos = 2;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184 /* extension octet */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185 if (vpenh->func_ind & TP_VPF_ENH_EXT_BIT_MASK)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187 utl_binToHex (&vpenh->ext_oct, 1, vpenh_str+pos);
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188 pos += 2;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	191 /* process validity period values */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	192 if ((vpenh->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_REL)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	193 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	194 utl_binToHex (&vpenh->val.vpenh_relative, 1, vpenh_str+pos );
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195 pos += 2;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	196 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197 else if ((vpenh->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_SEC)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199 utl_binToHex (&vpenh->val.vpenh_seconds, 1, vpenh_str+pos );
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200 pos += 2;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	202 else if ((vpenh->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_HRS)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204 vpenh_str[pos++] = vpenh->val.vpenh_hours.hour[1] + '0';
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	205 vpenh_str[pos++] = vpenh->val.vpenh_hours.hour[0] + '0';
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 vpenh_str[pos++] = vpenh->val.vpenh_hours.minute[1] + '0';
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208 vpenh_str[pos++] = vpenh->val.vpenh_hours.minute[0] + '0';
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210 vpenh_str[pos++] = vpenh->val.vpenh_hours.second[1] + '0';
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211 vpenh_str[pos++] = vpenh->val.vpenh_hours.second[0] + '0';
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214 /* fill the rest with zeros */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215 while (pos < 14)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	217 vpenh_str[pos++] = '0';
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	219
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220 /* string terminator */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	221 vpenh_str[pos] = '\0';
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	224 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	225 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 \| PROJECT : GSM-PS (6147) MODULE : CMH_SMSF \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	227 \| STATE : code ROUTINE : cmhSMS_getNType \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	228 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230 PURPOSE : This function calculates the 'numbering type' out of the
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231 current 'type of numbering'.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	232 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	233 GLOBAL UBYTE cmhSMS_getNType ( T_ACI_TOA_TON ton )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235 switch( ton )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	236 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	237 case( TON_International ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	238 case( TON_National ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	239 case( TON_NetSpecific ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240 case( TON_DedAccess ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241 case( TON_Alphanumeric ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242 case( TON_Abbreviated ): return (UBYTE)ton;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243 default: return SMS_TON_UNKNOWN;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	245 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	248 GLOBAL BOOL cmhSMS_findPrflId ( UBYTE critrerium, void* elem )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250 T_SMS_SET_PRM compared = (T_SMS_SET_PRM)elem;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251 if ( compared->prflId == critrerium )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252 return TRUE;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253 else
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 return FALSE;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	257 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	258 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259 \| PROJECT : GSM-PS (6147) MODULE : CMH_SMSF \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260 \| STATE : code ROUTINE : cmhSMS_getTon \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	261 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263 PURPOSE : This function calculates the 'type of numbering' out of
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	264 the current 'numbering type'.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	266 GLOBAL T_ACI_TOA_TON cmhSMS_getTon ( UBYTE ntype )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	267 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268 switch( ntype )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	269 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	270 case( SMS_TON_UNKNOWN ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271 case( SMS_TON_INTERNATIONAL ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	272 case( SMS_TON_NATIONAL ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273 case( SMS_TON_NETWORK_SPEC ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	274 case( SMS_TON_SUBSCRIBER ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	275 case( SMS_TON_ALPHANUMERIC ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	276 case( SMS_TON_ABBREVIATED ): return (T_ACI_TOA_TON)ntype;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	277 default: return TON_NotPresent;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	281 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	282 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 \| PROJECT : GSM-PS (6147) MODULE : CMH_SMSF \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	284 \| STATE : code ROUTINE : cmhSMS_getNPlan \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	285 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287 PURPOSE : This function calculates the 'numbering plan' out of the
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	288 current 'numbering plan identification'.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	290 GLOBAL UBYTE cmhSMS_getNPlan ( T_ACI_TOA_NPI npi )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	291 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292 switch( npi )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	293 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	294 case( NPI_IsdnTelephony ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	295 case( NPI_Data ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	296 case( NPI_Telex ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	297 case( NPI_National ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	298 case( NPI_Private ): return (UBYTE)npi;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299 default: return NPI_Unknown;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	300 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	301 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	303 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	304 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	305 \| PROJECT : GSM-PS (6147) MODULE : CMH_SMSF \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306 \| STATE : code ROUTINE : cmhSMS_getNpi \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	307 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	308
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	309 PURPOSE : This function calculates the 'numbering plan
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	310 identification' out of the current 'numbering plan'.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	311 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	312 GLOBAL T_ACI_TOA_NPI cmhSMS_getNpi ( UBYTE nplan )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	313 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	314 switch( nplan )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	315 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	316 case( SMS_TON_UNKNOWN ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	317 case( SMS_NPI_ISDN ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	318 case( SMS_NPI_X121 ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	319 case( SMS_NPI_F69 ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320 case( SMS_NPI_NATIONAL ):
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	321 case( SMS_NPI_PRIVATE ): return (T_ACI_TOA_NPI)nplan;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	322 default: return NPI_NotPresent;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	323 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	324 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	325
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	326 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	327 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	328 \| PROJECT : GSM-PS (6147) MODULE : CMH_SMSF \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 \| STATE : code ROUTINE : cmhSMS_getStatCmh \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	330 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	331
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	332 PURPOSE : This function converts the message status from
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	333 PSA type to CMH type.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	334 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	335 GLOBAL void cmhSMS_getStatCmh ( UBYTE inStat,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	336 T_ACI_SMS_STAT* outStat )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	337 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	338 switch( inStat & STAT_MASK )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	340 case( REC_UNREAD ): *outStat = SMS_STAT_RecUnread; break;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341 case( REC_READ ): *outStat = SMS_STAT_RecRead; break;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	342 case( STO_UNSENT ): *outStat = SMS_STAT_StoUnsent; break;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	343 case( STO_SENT ): *outStat = SMS_STAT_StoSent; break;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	344 default: *outStat = SMS_STAT_NotPresent;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	345 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	346 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	347
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	348 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 \| PROJECT : GSM-PS (6147) MODULE : CMH_SMSF \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	351 \| STATE : code ROUTINE : cmhSMS_getStatPsa \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	353
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	354 PURPOSE : This function converts the message status from
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355 CMH type to PSA type.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	357 GLOBAL BOOL cmhSMS_getStatPsa ( T_ACI_SMS_STAT inStat,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358 UBYTE* outStat )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	359 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	360 switch( inStat )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	362 case( SMS_STAT_RecUnread ): *outStat = REC_UNREAD; break;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	363 case( SMS_STAT_RecRead ): *outStat = REC_READ; break;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364 case( SMS_STAT_StoUnsent ): *outStat = STO_UNSENT; break;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	365 case( SMS_STAT_StoSent ): *outStat = STO_SENT; break;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	366 default : return (FALSE);
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369 return ( TRUE );
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	370 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	371
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374 \| PROJECT : GSM-PS (6147) MODULE : CMH_SMSF \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375 \| STATE : code ROUTINE : cmhSMS_isVpabsVld \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378 PURPOSE : This function is used to process whether the given
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	379 absolute validity period is valid.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	380
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381 Note: This function checks whether every individual
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382 time value is within a valid range. It does not
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	383 check whether the whole expression is valid.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 GLOBAL BOOL cmhSMS_isVpabsVld ( T_ACI_VP_ABS* vpabs )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387 if ( BCD2UBYTE ( vpabs -> year ) > SMS_CMH_YEAR_MAX OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388 BCD2UBYTE ( vpabs -> month ) < SMS_CMH_MONTH_MIN OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389 BCD2UBYTE ( vpabs -> month ) > SMS_CMH_MONTH_MAX OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	390 BCD2UBYTE ( vpabs -> day ) < SMS_CMH_DAY_MIN OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	391 BCD2UBYTE ( vpabs -> day ) > SMS_CMH_DAY_MAX OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	392 BCD2UBYTE ( vpabs -> hour ) > SMS_CMH_HOUR_MAX OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	393 BCD2UBYTE ( vpabs -> minute ) > SMS_CMH_MINUTE_MAX OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	394 BCD2UBYTE ( vpabs -> second ) > SMS_CMH_SECOND_MAX OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395 vpabs -> timezone < SMS_CMH_TZ_MIN OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396 vpabs -> timezone > SMS_CMH_TZ_MAX OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397 NOTBCD ( vpabs -> year ) OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	398 NOTBCD ( vpabs -> month ) OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	399 NOTBCD ( vpabs -> day ) OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400 NOTBCD ( vpabs -> hour ) OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401 NOTBCD ( vpabs -> minute ) OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402 NOTBCD ( vpabs -> second ) )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	403
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	404 return ( FALSE );
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	405
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406 return ( TRUE );
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	407 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	408
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411 \| PROJECT : GSM-PS (6147) MODULE : CMH_SMSF \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412 \| STATE : code ROUTINE : cmhSMS_isVpenhVld \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	413 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	414
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	415 PURPOSE : This function is used to process whether the given
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	416 enhanced validity period is valid.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	417
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418 Note: This function checks whether every individual
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	419 time value is within a valid range. It does not
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	420 check whether the whole expression is valid.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422 GLOBAL BOOL cmhSMS_isVpenhVld ( T_ACI_VP_ENH* vpenh )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	423 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	424 if ((vpenh->func_ind & TP_VPF_ENH_FORMAT_MASK) > TP_VPF_ENH_HRS)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	425 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	426 return FALSE;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	427 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	428
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	429 if ((vpenh->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_HRS)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	431 if ( BCD2UBYTE ( vpenh->val.vpenh_hours.minute ) > SMS_CMH_MINUTE_MAX OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	432 BCD2UBYTE ( vpenh->val.vpenh_hours.second ) > SMS_CMH_SECOND_MAX OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	433 NOTBCD ( vpenh->val.vpenh_hours.hour ) OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434 NOTBCD ( vpenh->val.vpenh_hours.minute ) OR
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435 NOTBCD ( vpenh->val.vpenh_hours.second ) )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	436 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	437 return ( FALSE );
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	440
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	441 return ( TRUE );
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	442 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	444 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	445 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	446 \| PROJECT : GSM-PS (6147) MODULE : CMH_SMSF \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	447 \| STATE : code ROUTINE : cmhSMS_setVpabsPsa \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	448 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	449
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	450 PURPOSE : This function is used to copy the elements of the
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	451 absolute validity period structure of the ACI to the
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	452 corresponding structure of the PSA.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	453
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	454 Note: Copying of the structure elements might be
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	455 dangerous when array size of time elements differ
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	456 from MAX_VP_ABS_DIGIT due to changes in PSA
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	457 declaration.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	458 */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459 GLOBAL void cmhSMS_setVpabsPsa ( T_tp_vp_abs* psaVp,
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460 T_ACI_VP_ABS* cmhVp )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462 USHORT i; /* used for counting */
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	464 BOOL isNegative = ( cmhVp->timezone & 0x8000 );
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	465 SHORT tz = ( UBYTE ) cmhVp->timezone;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467 for (i = 0; i < MAX_VP_ABS_DIGITS; i++)
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469 psaVp -> year [i] = cmhVp -> year [i];
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	470 psaVp -> month [i] = cmhVp -> month [i];
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471 psaVp -> day [i] = cmhVp -> day [i];
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472 psaVp -> hour [i] = cmhVp -> hour [i];
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473 psaVp -> minute[i] = cmhVp -> minute[i];
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	474 psaVp -> second[i] = cmhVp -> second[i];
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	476
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 if ( isNegative )
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 tz = -tz;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480 psaVp -> tz_sign = 1;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	482 else
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	483 {
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	484 psaVp -> tz_sign = 0;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	485 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	486
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	487 psaVp -> tz_lsb = tz & 0x000F;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	488 psaVp -> tz_msb = tz & 0x00F0;
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	489 }
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491 /*
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	492 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493 \| PROJECT : GSM-PS (6147) MODULE : CMH_SMSF \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494 \| STATE : code ROUTINE : cmhSMS_setVpenhPsa \|
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	495 +-------------------------------------------------------------------+
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	496
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497 PURPOSE : This function is used to copy the elements of the
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	498 enhanced validity period structure of the ACI to the
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499 corresponding structure of the PSA.
53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500 */

162

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3 | Project : GSM-PS (6147)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4 | Modul : CMH_SMSF

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

8 |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

10 | Instruments Berlin, AG

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

15 | Texas Instruments Berlin, AG.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

17 | Purpose : This module defines the functions used by the command

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

18 | handler for the short message service.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

20 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

21

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

22 #ifndef CMH_SMSF_C

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

23 #define CMH_SMSF_C

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

24 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

25

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

26 #include "aci_all.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

27 /*==== INCLUDES ===================================================*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

28 #include "aci_cmh.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

29 #include "ati_cmd.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

30 #include "aci_cmd.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

31

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

32 #ifdef FAX_AND_DATA

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

33 #include "aci_fd.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

34 #endif /* of #ifdef FAX_AND_DATA */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

35

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

36 #include "aci.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

37 #include "aci_lst.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

38 #include "aci_mem.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

39 #include "psa.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

40 #include "psa_cc.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

41 #ifdef SIM_TOOLKIT

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

42 #include "psa_sat.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

43 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

44 #include "psa_sms.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

45 #include "psa_sim.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

46 #include "psa_mmi.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

47 #include "psa_util.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

48 #include "phb.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

49 #include "cmh.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

50 #include "cmh_sms.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

51 #include "pcm.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

52

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

53 #include "aci_lst.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

54

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

55 #if (defined (MFW) AND !defined (FF_MMI_RIV)) OR defined (_CONC_TESTING_)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

56 #include "conc_sms.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

57 #endif /* ##if (defined (MFW) AND !defined (FF_MMI_RIV)) OR defined (_CONC_TESTING_)*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

58

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

59

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

60 #ifdef UART

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

61 #include "dti_conn_mng.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

62 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

63

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

64 #include "cmh_sim.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

65 #ifndef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

66

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

67 /* temporary solution to get ffs.h included without GPRS to be set ! */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

68 #ifdef GPRS

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

69 #include "ffs/ffs.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

70 #else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

71 #include "ffs/ffs.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

72 #undef GPRS

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

73 #endif /* GPRS */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

74

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

75 #include "ffs_coat.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

76

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

77 #endif /* !_SIMULATION_ */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

78

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

79 #ifdef FF_CPHS

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

80 #include "cphs.h"

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

81 #endif /* FF_CPHS */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

82

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

83 /*==== CONSTANTS ==================================================*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

84 #define CMMS_MODE_TIMER_VAL (5000)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

85 #define SMS_CMH_YEAR_MAX (99) /* maximum value for year in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

86 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

87 #define SMS_CMH_YEAR_MIN (0) /* minimum value for year in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

88 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

89 #define SMS_CMH_MONTH_MAX (12) /* maximum value for month in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

90 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

91 #define SMS_CMH_MONTH_MIN (1) /* minimum value for month in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

92 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

93 #define SMS_CMH_DAY_MAX (31) /* maximum value for day in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

94 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

95 #define SMS_CMH_DAY_MIN (1) /* minimum value for day in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

96 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

97 #define SMS_CMH_HOUR_MAX (23) /* maximum value for hour in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

98 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

99 #define SMS_CMH_HOUR_MIN (0) /* minimum value for hour in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

100 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

101 #define SMS_CMH_MINUTE_MAX (59) /* maximum value for minute in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

102 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

103 #define SMS_CMH_MINUTE_MIN (0) /* minimum value for minute in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

104 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

105 #define SMS_CMH_SECOND_MAX (59) /* maximum value for second in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

106 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

107 #define SMS_CMH_SECOND_MIN (0) /* minimum value for second in */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

108 /* absolute validity period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

109

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

110 #define SMS_CMH_TZ_MAX (47) /* maximum value for a time */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

111 /* zone in absolute validity */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

112 /* period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

113 #define SMS_CMH_TZ_MIN (-47) /* minimum value for a time */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

114 /* zone in absolute validity */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

115 /* period */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

116

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

117

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

118 /* macro for converting a two digit BCD into an UBYTE */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

119 #define BCD2UBYTE(bcd) (UBYTE)(10 * bcd[0] + bcd[1])

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

120

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

121 /* macro for testing whether any digit of a two digit */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

122 /* BCD lies outside of a predefined value range */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

123 #define NOTBCD(bcd) (bcd[0] > 9 OR\

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

124 bcd[1] > 9 )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

125

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

126

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

127 #define L_MAX_UD 140

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

128 #define L_MAX_UD_CONC 134

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

129

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

130 #ifdef FF_CPHS_REL4

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

131 typedef enum

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

132 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

133 MSG_WAITING_TYPE_INVALID = -1,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

134 MSG_WAITING_TYPE_VOICE,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

135 MSG_WAITING_TYPE_FAX,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

136 MSG_WAITING_TYPE_EMAIL,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

137 MSG_WAITING_TYPE_OTHER

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

138 } T_MSG_WAITING_TYPE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

139 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

140

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

141 /*==== TYPES ======================================================*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

142

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

143 /*==== EXPORT =====================================================*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

144 EXTERN T_ACI_LIST *set_prm_list;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

145

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

146 /*==== PROTOTYPES==================================================*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

147 /* Implements Measure # 73 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

148 LOCAL BOOL cmhSMS_findMessageIds (USHORT lower_mid, USHORT upper_mid);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

149 /* Implements Measure # 126 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

150 LOCAL void cmhSMS_processOrigDestAddr (T_ACI_CMGL_SM *sm,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

151 T_rp_addr *rp_addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

152 T_tp_da *tp_addr );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

153 /* Implements Measure # 9 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

154 LOCAL void cmhSMS_clearCbmPrm (void);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

155

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

156

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

157 /*==== VARIABLES ==================================================*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

158

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

159 const char * const ffs_smsprfl_fname[] = { FFS_SMSPRFL_FNAME01,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

160 FFS_SMSPRFL_FNAME02,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

161 FFS_SMSPRFL_FNAME03,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

162 FFS_SMSPRFL_FNAME04 };

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

163

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

164 /*==== FUNCTIONS ==================================================*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

165

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

166 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

167 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

168 | PROJECT : GSM-F&D (8411) MODULE : ACI_CMD |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

169 | STATE : code ROUTINE : aci_encodeVpenh |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

170 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

171

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

172 PURPOSE : This function encodes a given T_ACI_VP_ENH type to a

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

173 string.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

174 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

175 GLOBAL void aci_encodeVpenh ( CHAR* vpenh_str,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

176 T_ACI_VP_ENH* vpenh )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

177 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

178 UBYTE pos;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

179

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

180 /* functionality indicator */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

181 utl_binToHex (&vpenh->func_ind, 1, vpenh_str);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

182 pos = 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

183

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

184 /* extension octet */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

185 if (vpenh->func_ind & TP_VPF_ENH_EXT_BIT_MASK)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

186 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

187 utl_binToHex (&vpenh->ext_oct, 1, vpenh_str+pos);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

188 pos += 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

189 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

190

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

191 /* process validity period values */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

192 if ((vpenh->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_REL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

193 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

194 utl_binToHex (&vpenh->val.vpenh_relative, 1, vpenh_str+pos );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

195 pos += 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

196 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

197 else if ((vpenh->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_SEC)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

198 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

199 utl_binToHex (&vpenh->val.vpenh_seconds, 1, vpenh_str+pos );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

200 pos += 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

201 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

202 else if ((vpenh->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_HRS)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

203 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

204 vpenh_str[pos++] = vpenh->val.vpenh_hours.hour[1] + '0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

205 vpenh_str[pos++] = vpenh->val.vpenh_hours.hour[0] + '0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

206

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

207 vpenh_str[pos++] = vpenh->val.vpenh_hours.minute[1] + '0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

208 vpenh_str[pos++] = vpenh->val.vpenh_hours.minute[0] + '0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

209

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

210 vpenh_str[pos++] = vpenh->val.vpenh_hours.second[1] + '0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

211 vpenh_str[pos++] = vpenh->val.vpenh_hours.second[0] + '0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

212 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

213

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

214 /* fill the rest with zeros */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

215 while (pos < 14)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

216 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

217 vpenh_str[pos++] = '0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

218 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

219

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

220 /* string terminator */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

221 vpenh_str[pos] = '\0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

222 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

223

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

224 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

225 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

226 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

227 | STATE : code ROUTINE : cmhSMS_getNType |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

228 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

229

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

230 PURPOSE : This function calculates the 'numbering type' out of the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

231 current 'type of numbering'.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

232 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

233 GLOBAL UBYTE cmhSMS_getNType ( T_ACI_TOA_TON ton )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

234 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

235 switch( ton )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

236 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

237 case( TON_International ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

238 case( TON_National ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

239 case( TON_NetSpecific ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

240 case( TON_DedAccess ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

241 case( TON_Alphanumeric ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

242 case( TON_Abbreviated ): return (UBYTE)ton;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

243 default: return SMS_TON_UNKNOWN;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

244 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

245 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

246

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

247

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

248 GLOBAL BOOL cmhSMS_findPrflId ( UBYTE critrerium, void* elem )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

249 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

250 T_SMS_SET_PRM *compared = (T_SMS_SET_PRM*)elem;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

251 if ( compared->prflId == critrerium )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

252 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

253 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

254 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

255 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

256

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

257 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

258 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

259 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

260 | STATE : code ROUTINE : cmhSMS_getTon |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

261 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

262

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

263 PURPOSE : This function calculates the 'type of numbering' out of

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

264 the current 'numbering type'.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

265 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

266 GLOBAL T_ACI_TOA_TON cmhSMS_getTon ( UBYTE ntype )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

267 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

268 switch( ntype )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

269 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

270 case( SMS_TON_UNKNOWN ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

271 case( SMS_TON_INTERNATIONAL ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

272 case( SMS_TON_NATIONAL ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

273 case( SMS_TON_NETWORK_SPEC ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

274 case( SMS_TON_SUBSCRIBER ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

275 case( SMS_TON_ALPHANUMERIC ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

276 case( SMS_TON_ABBREVIATED ): return (T_ACI_TOA_TON)ntype;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

277 default: return TON_NotPresent;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

278 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

279 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

280

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

281 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

282 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

283 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

284 | STATE : code ROUTINE : cmhSMS_getNPlan |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

285 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

286

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

287 PURPOSE : This function calculates the 'numbering plan' out of the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

288 current 'numbering plan identification'.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

289 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

290 GLOBAL UBYTE cmhSMS_getNPlan ( T_ACI_TOA_NPI npi )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

291 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

292 switch( npi )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

293 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

294 case( NPI_IsdnTelephony ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

295 case( NPI_Data ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

296 case( NPI_Telex ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

297 case( NPI_National ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

298 case( NPI_Private ): return (UBYTE)npi;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

299 default: return NPI_Unknown;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

300 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

301 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

302

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

303 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

305 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

306 | STATE : code ROUTINE : cmhSMS_getNpi |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

308

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

309 PURPOSE : This function calculates the 'numbering plan

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

310 identification' out of the current 'numbering plan'.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

311 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

312 GLOBAL T_ACI_TOA_NPI cmhSMS_getNpi ( UBYTE nplan )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

313 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

314 switch( nplan )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

315 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

316 case( SMS_TON_UNKNOWN ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

317 case( SMS_NPI_ISDN ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

318 case( SMS_NPI_X121 ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

319 case( SMS_NPI_F69 ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

320 case( SMS_NPI_NATIONAL ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

321 case( SMS_NPI_PRIVATE ): return (T_ACI_TOA_NPI)nplan;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

322 default: return NPI_NotPresent;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

323 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

324 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

325

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

326 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

327 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

328 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

329 | STATE : code ROUTINE : cmhSMS_getStatCmh |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

330 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

331

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

332 PURPOSE : This function converts the message status from

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

333 PSA type to CMH type.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

334 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

335 GLOBAL void cmhSMS_getStatCmh ( UBYTE inStat,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

336 T_ACI_SMS_STAT* outStat )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

337 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

338 switch( inStat & STAT_MASK )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

339 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

340 case( REC_UNREAD ): *outStat = SMS_STAT_RecUnread; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

341 case( REC_READ ): *outStat = SMS_STAT_RecRead; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

342 case( STO_UNSENT ): *outStat = SMS_STAT_StoUnsent; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

343 case( STO_SENT ): *outStat = SMS_STAT_StoSent; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

344 default: *outStat = SMS_STAT_NotPresent;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

345 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

346 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

347

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

348 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

349 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

350 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

351 | STATE : code ROUTINE : cmhSMS_getStatPsa |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

352 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

353

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

354 PURPOSE : This function converts the message status from

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

355 CMH type to PSA type.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

356 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

357 GLOBAL BOOL cmhSMS_getStatPsa ( T_ACI_SMS_STAT inStat,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

358 UBYTE* outStat )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

359 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

360 switch( inStat )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

361 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

362 case( SMS_STAT_RecUnread ): *outStat = REC_UNREAD; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

363 case( SMS_STAT_RecRead ): *outStat = REC_READ; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

364 case( SMS_STAT_StoUnsent ): *outStat = STO_UNSENT; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

365 case( SMS_STAT_StoSent ): *outStat = STO_SENT; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

366 default : return (FALSE);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

367 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

368

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

369 return ( TRUE );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

370 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

371

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

372 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

373 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

374 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

375 | STATE : code ROUTINE : cmhSMS_isVpabsVld |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

376 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

377

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

378 PURPOSE : This function is used to process whether the given

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

379 absolute validity period is valid.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

380

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

381 Note: This function checks whether every individual

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

382 time value is within a valid range. It does not

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

383 check whether the whole expression is valid.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

384 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

385 GLOBAL BOOL cmhSMS_isVpabsVld ( T_ACI_VP_ABS* vpabs )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

386 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

387 if ( BCD2UBYTE ( vpabs -> year ) > SMS_CMH_YEAR_MAX OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

388 BCD2UBYTE ( vpabs -> month ) < SMS_CMH_MONTH_MIN OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

389 BCD2UBYTE ( vpabs -> month ) > SMS_CMH_MONTH_MAX OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

390 BCD2UBYTE ( vpabs -> day ) < SMS_CMH_DAY_MIN OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

391 BCD2UBYTE ( vpabs -> day ) > SMS_CMH_DAY_MAX OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

392 BCD2UBYTE ( vpabs -> hour ) > SMS_CMH_HOUR_MAX OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

393 BCD2UBYTE ( vpabs -> minute ) > SMS_CMH_MINUTE_MAX OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

394 BCD2UBYTE ( vpabs -> second ) > SMS_CMH_SECOND_MAX OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

395 vpabs -> timezone < SMS_CMH_TZ_MIN OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

396 vpabs -> timezone > SMS_CMH_TZ_MAX OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

397 NOTBCD ( vpabs -> year ) OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

398 NOTBCD ( vpabs -> month ) OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

399 NOTBCD ( vpabs -> day ) OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

400 NOTBCD ( vpabs -> hour ) OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

401 NOTBCD ( vpabs -> minute ) OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

402 NOTBCD ( vpabs -> second ) )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

403

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

404 return ( FALSE );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

405

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

406 return ( TRUE );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

407 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

408

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

409 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

410 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

411 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

412 | STATE : code ROUTINE : cmhSMS_isVpenhVld |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

413 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

414

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

415 PURPOSE : This function is used to process whether the given

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

416 enhanced validity period is valid.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

417

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

418 Note: This function checks whether every individual

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

419 time value is within a valid range. It does not

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

420 check whether the whole expression is valid.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

421 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

422 GLOBAL BOOL cmhSMS_isVpenhVld ( T_ACI_VP_ENH* vpenh )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

423 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

424 if ((vpenh->func_ind & TP_VPF_ENH_FORMAT_MASK) > TP_VPF_ENH_HRS)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

425 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

426 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

427 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

428

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

429 if ((vpenh->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_HRS)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

430 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

431 if ( BCD2UBYTE ( vpenh->val.vpenh_hours.minute ) > SMS_CMH_MINUTE_MAX OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

432 BCD2UBYTE ( vpenh->val.vpenh_hours.second ) > SMS_CMH_SECOND_MAX OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

433 NOTBCD ( vpenh->val.vpenh_hours.hour ) OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

434 NOTBCD ( vpenh->val.vpenh_hours.minute ) OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

435 NOTBCD ( vpenh->val.vpenh_hours.second ) )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

436 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

437 return ( FALSE );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

438 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

439 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

440

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

441 return ( TRUE );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

442 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

443

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

444 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

445 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

446 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

447 | STATE : code ROUTINE : cmhSMS_setVpabsPsa |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

448 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

449

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

450 PURPOSE : This function is used to copy the elements of the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

451 absolute validity period structure of the ACI to the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

452 corresponding structure of the PSA.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

453

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

454 Note: Copying of the structure elements might be

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

455 dangerous when array size of time elements differ

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

456 from MAX_VP_ABS_DIGIT due to changes in PSA

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

457 declaration.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

458 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

459 GLOBAL void cmhSMS_setVpabsPsa ( T_tp_vp_abs* psaVp,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

460 T_ACI_VP_ABS* cmhVp )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

461 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

462 USHORT i; /* used for counting */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

463

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

464 BOOL isNegative = ( cmhVp->timezone & 0x8000 );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

465 SHORT tz = ( UBYTE ) cmhVp->timezone;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

466

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

467 for (i = 0; i < MAX_VP_ABS_DIGITS; i++)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

468 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

469 psaVp -> year [i] = cmhVp -> year [i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

470 psaVp -> month [i] = cmhVp -> month [i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

471 psaVp -> day [i] = cmhVp -> day [i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

472 psaVp -> hour [i] = cmhVp -> hour [i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

473 psaVp -> minute[i] = cmhVp -> minute[i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

474 psaVp -> second[i] = cmhVp -> second[i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

475 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

476

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

477 if ( isNegative )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

478 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

479 tz = -tz;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

480 psaVp -> tz_sign = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

481 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

482 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

483 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

484 psaVp -> tz_sign = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

485 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

486

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

487 psaVp -> tz_lsb = tz & 0x000F;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

488 psaVp -> tz_msb = tz & 0x00F0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

489 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

490

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

491 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

492 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

493 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

494 | STATE : code ROUTINE : cmhSMS_setVpenhPsa |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

495 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

496

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

497 PURPOSE : This function is used to copy the elements of the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

498 enhanced validity period structure of the ACI to the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

499 corresponding structure of the PSA.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

500 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

501 GLOBAL void cmhSMS_setVpenhPsa ( T_tp_vp_enh* psaVp,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

502 T_ACI_VP_ENH* cmhVp )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

503 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

504 memset(psaVp, 0, sizeof(T_tp_vp_enh));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

505

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

506 if (cmhVp->func_ind & TP_VPF_ENH_EXT_BIT_MASK)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

507 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

508 psaVp->tp_ext = SMS_EXT_INCLUDED;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

509 psaVp->v_tp_rsrvd = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

510 psaVp->tp_rsrvd = cmhVp->ext_oct;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

511 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

512

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

513 if (cmhVp->func_ind & TP_VPF_ENH_SINGLE_SHOT_MASK)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

514 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

515 psaVp->tp_ss = SMS_SS_SET;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

516 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

517

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

518 if ((cmhVp->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_NOT_PRESENT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

519 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

520 psaVp->tvpf = SMS_TVPF_NOT_PRESENT;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

521 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

522 else if ((cmhVp->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_REL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

523 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

524 psaVp->tvpf = SMS_TVPF_RELATIVE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

525 psaVp->v_tp_vp_rel = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

526 psaVp->tp_vp_rel = cmhVp->val.vpenh_relative;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

527 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

528 else if ((cmhVp->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_SEC)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

529 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

530 psaVp->tvpf = SMS_TVPF_SECONDS;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

531 psaVp->v_tp_vp_sec = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

532 psaVp->tp_vp_sec = cmhVp->val.vpenh_seconds;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

533 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

534 else if ((cmhVp->func_ind & TP_VPF_ENH_FORMAT_MASK) EQ TP_VPF_ENH_HRS)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

535 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

536 psaVp->tvpf = SMS_TVPF_HOURS;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

537 psaVp->v_hour = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

538 psaVp->hour[0] = cmhVp->val.vpenh_hours.hour[0];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

539 psaVp->hour[1] = cmhVp->val.vpenh_hours.hour[1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

540 psaVp->v_minute = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

541 psaVp->minute[0] = cmhVp->val.vpenh_hours.minute[0];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

542 psaVp->minute[1] = cmhVp->val.vpenh_hours.minute[1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

543 psaVp->v_second = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

544 psaVp->second[0] = cmhVp->val.vpenh_hours.second[0];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

545 psaVp->second[1] = cmhVp->val.vpenh_hours.second[1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

546 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

547 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

548 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

549 TRACE_EVENT("[ERR] cmhSMS_setVpenhPsa: wrong type of validity period format");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

550 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

551 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

552

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

553 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

554 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

555 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

556 | STATE : code ROUTINE : cmhSMS_setVpabsCmh |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

557 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

558

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

559 PURPOSE : This function is used to copy the elements of the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

560 absolute validity period structure of the PSA to the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

561 corresponding structure of the ACI.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

562

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

563 Note: Copying of the structure elements might be

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

564 dangerous when array size of time elements differ

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

565 from MAX_VP_ABS_DIGIT due to changes in PSA

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

566 declaration.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

567 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

568 GLOBAL void cmhSMS_setVpabsCmh ( T_ACI_VP_ABS* cmhVp,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

569 T_tp_vp_abs* psaVp )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

570 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

571 USHORT i; /* used for counting */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

572 SHORT tz;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

573

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

574 for (i = 0; i < MAX_VP_ABS_DIGITS; i++)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

575 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

576 cmhVp -> year [i] = psaVp -> year [i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

577 cmhVp -> month [i] = psaVp -> month [i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

578 cmhVp -> day [i] = psaVp -> day [i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

579 cmhVp -> hour [i] = psaVp -> hour [i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

580 cmhVp -> minute[i] = psaVp -> minute[i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

581 cmhVp -> second[i] = psaVp -> second[i];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

582 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

583

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

584 tz = ((psaVp->tz_msb & 0x07) * 10) + psaVp->tz_lsb; /* BCD */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

585

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

586 if (psaVp->tz_sign)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

587 cmhVp -> timezone = -tz;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

588 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

589 cmhVp -> timezone = tz;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

590 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

591

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

592 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

593 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

594 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

595 | STATE : code ROUTINE : cmhSMS_setVpenhCmh |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

596 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

597

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

598 PURPOSE : This function is used to copy the elements of the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

599 enhanced validity period structure of the PSA to the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

600 corresponding structure of the ACI.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

601

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

602 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

603 GLOBAL void cmhSMS_setVpenhCmh ( T_ACI_VP_ENH* cmhVp,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

604 T_tp_vp_enh* psaVp )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

605 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

606 memset(cmhVp, 0, sizeof(T_ACI_VP_ENH));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

607

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

608 cmhVp->func_ind = psaVp->tvpf;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

609

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

610 if ((psaVp->tp_ext EQ SMS_EXT_INCLUDED) AND (psaVp->v_tp_rsrvd))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

611 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

612 cmhVp->func_ind |= TP_VPF_ENH_EXT_BIT_MASK;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

613 cmhVp->ext_oct = psaVp->tp_rsrvd;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

614 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

615

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

616 if (psaVp->tp_ss EQ SMS_SS_SET)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

617 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

618 cmhVp->func_ind |= TP_VPF_ENH_SINGLE_SHOT_MASK;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

619 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

620

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

621 if (psaVp->tvpf EQ SMS_TVPF_NOT_PRESENT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

622 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

623 /* do nothing */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

624 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

625 else if ((psaVp->tvpf EQ SMS_TVPF_RELATIVE) AND (psaVp->v_tp_vp_rel))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

626 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

627 cmhVp->val.vpenh_relative = psaVp->tp_vp_rel;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

628 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

629 else if ((psaVp->tvpf EQ SMS_TVPF_SECONDS) AND (psaVp->v_tp_vp_sec))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

630 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

631 cmhVp->val.vpenh_seconds = psaVp->tp_vp_sec;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

632 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

633 else if (psaVp->tvpf EQ SMS_TVPF_HOURS)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

634 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

635 if (psaVp->v_hour)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

636 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

637 cmhVp->val.vpenh_hours.hour[0] = psaVp->hour[0];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

638 cmhVp->val.vpenh_hours.hour[1] = psaVp->hour[1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

639 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

640 if (psaVp->v_minute)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

641 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

642 cmhVp->val.vpenh_hours.minute[0] = psaVp->minute[0];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

643 cmhVp->val.vpenh_hours.minute[1] = psaVp->minute[1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

644 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

645 if (psaVp->v_second)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

646 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

647 cmhVp->val.vpenh_hours.second[0] = psaVp->second[0];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

648 cmhVp->val.vpenh_hours.second[1] = psaVp->second[1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

649 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

650 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

651 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

652 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

653 TRACE_EVENT("[ERR] cmhSMS_setVpenhCmh: wrong type of validity period format");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

654 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

655 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

656

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

657 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

658 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

659 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

660 | STATE : code ROUTINE : cmhSMS_getAdrStr |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

661 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

662

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

663 PURPOSE : This function is used to convert the service center

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

664 address in BCD to the service center address as a string.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

665 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

666 GLOBAL UBYTE cmhSMS_getAdrStr ( CHAR* pStr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

667 UBYTE maxIdx,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

668 UBYTE* pBcd,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

669 UBYTE numDigits )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

670 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

671 UBYTE bcdIdx;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

672 UBYTE strIdx = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

673

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

674 memset(pStr, 0x00, maxIdx);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

675

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

676 for(bcdIdx = 0; bcdIdx < numDigits AND strIdx < maxIdx; bcdIdx++)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

677 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

678 switch (pBcd[bcdIdx])

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

679 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

680 case 0:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

681 case 1:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

682 case 2:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

683 case 3:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

684 case 4:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

685 case 5:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

686 case 6:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

687 case 7:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

688 case 8:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

689 case 9:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

690 pStr[strIdx++] = pBcd[bcdIdx] + '0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

691 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

692

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

693 case BCD_ASTSK:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

694 pStr[strIdx++] = '*';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

695 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

696

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

697 case BCD_PND:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

698 pStr[strIdx++] = '#';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

699 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

700

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

701 case BCD_A:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

702 pStr[strIdx++] = 'A';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

703 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

704

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

705 case BCD_B:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

706 pStr[strIdx++] = 'B';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

707 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

708

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

709 case BCD_C:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

710 pStr[strIdx++] = 'C';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

711 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

712 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

713 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

714

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

715 pStr[strIdx] = '\0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

716

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

717 return ( strIdx );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

718 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

719

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

720 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

721 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

722 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

723 | STATE : code ROUTINE : cmhSMS_getAdrBcd |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

724 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

725

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

726 PURPOSE : This function is used to convert the service center

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

727 address as a string to the service center address in BCD.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

728 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

729 GLOBAL void cmhSMS_getAdrBcd ( UBYTE* pBcd,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

730 UBYTE* pNumDigits,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

731 UBYTE maxDigits,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

732 CHAR* pStr )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

733 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

734 UBYTE bcdIdx = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

735 UBYTE strIdx;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

736

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

737 for(strIdx = 0; bcdIdx < maxDigits AND pStr[strIdx] NEQ '\0'; strIdx++)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

738 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

739 switch (pStr[strIdx])

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

740 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

741 case '0':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

742 case '1':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

743 case '2':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

744 case '3':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

745 case '4':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

746 case '5':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

747 case '6':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

748 case '7':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

749 case '8':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

750 case '9':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

751 pBcd[bcdIdx++] = pStr[strIdx] - '0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

752 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

753

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

754 case '*':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

755 pBcd[bcdIdx++] = BCD_ASTSK;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

756 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

757

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

758 case '#':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

759 pBcd[bcdIdx++] = BCD_PND;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

760 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

761

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

762 case 'A':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

763 pBcd[bcdIdx++] = BCD_A;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

764 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

765

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

766 case 'B':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

767 pBcd[bcdIdx++] = BCD_B;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

768 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

769

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

770 case 'C':

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

771 pBcd[bcdIdx++] = BCD_C;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

772 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

773 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

774 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

775

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

776 *pNumDigits = bcdIdx;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

777 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

778

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

779 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

780 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

781 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

782 | STATE : code ROUTINE : cmhSMS_getAdrAlphaNum |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

783 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

784

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

785 PURPOSE : This function is used to pack the Alphanumeric

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

786 Destination Adress according to 23.038

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

787 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

788 GLOBAL T_ACI_RETURN cmhSMS_packAlphaNumAddr( CHAR* da,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

789 T_tp_da* da_addr)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

790 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

791 UBYTE dest[((MAX_SMS_ADDR_DIG/2) * 8) / 7];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

792 UBYTE dest_len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

793 USHORT dalen;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

794

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

795 if( (da NEQ NULL) AND (da_addr NEQ NULL) )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

796 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

797 dalen = strlen(da);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

798

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

799 dest_len = utl_cvt8To7( (UBYTE*)da, (UBYTE)dalen, dest, 0);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

800

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

801 if( dest_len > (MAX_SMS_ADDR_DIG/2) )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

802 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

803 TRACE_EVENT("DA length is greater then the supported length");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

804 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_UnknownErr );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

805 return(AT_FAIL);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

806 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

807 if( ((dalen + 3) %7) <= 3 )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

808 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

809 da_addr->c_num = (dest_len*2) - 1; /* odd number of usefull nibbles */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

810 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

811 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

812 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

813 da_addr->c_num = dest_len*2; /* even number of usefull nibbles */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

814 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

815

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

816 cmh_unpackBCD(da_addr->num, dest, dest_len );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

817 da_addr->digits = da_addr->c_num;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

818 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

819

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

820 return(AT_CMPL);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

821 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

822

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

823 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

824 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

825 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

826 | STATE : code ROUTINE : cmhSMS_getMemCmh |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

827 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

828

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

829 PURPOSE : This function converts the preferred memory from

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

830 PSA type to CMH type.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

831 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

832 GLOBAL void cmhSMS_getMemCmh ( UBYTE inMem, T_ACI_SMS_STOR* outMem )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

833 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

834 switch( inMem )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

835 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

836 case( MEM_ME ): *outMem = SMS_STOR_Me; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

837 case( MEM_SM ): *outMem = SMS_STOR_Sm; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

838 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

839 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

840

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

841 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

842 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

843 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

844 | STATE : code ROUTINE : cmhSMS_getMemPsa |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

845 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

846

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

847 PURPOSE : This function converts the preferred memory from

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

848 CMH type to PSA type.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

849

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

850 returns: TRUE if conversion was successfull,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

851 otherwise FALSE

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

852 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

853 GLOBAL BOOL cmhSMS_getMemPsa ( T_ACI_SMS_STOR inMem, UBYTE* outMem )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

854 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

855 switch( inMem )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

856 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

857 case( SMS_STOR_Me ): *outMem = MEM_ME; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

858 case( SMS_STOR_Sm ): *outMem = MEM_SM; break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

859 default : return ( FALSE );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

860 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

861

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

862 return ( TRUE );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

863 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

864

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

865 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

866 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

867 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

868 | STATE : code ROUTINE : cmhSMS_getAlphabetPp |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

869 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

870

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

871 PURPOSE : This function is used to extract the used alphabet out

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

872 of the data coding scheme for point-to-point SMS.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

873 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

874 GLOBAL UBYTE cmhSMS_getAlphabetPp ( UBYTE dcs )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

875 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

876 UBYTE alphabet = 0; /* means 7 bit default alphabet */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

877

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

878 switch (dcs & 0xF0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

879 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

880 case( 0x30 ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

881 case( 0x20 ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

882 alphabet = 0x01; /* compressed, counts as 8 bit data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

883 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

884 case( 0x10 ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

885 case( 0x00 ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

886 alphabet = (dcs & 0x0C) >> 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

887 if (alphabet EQ 3)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

888 alphabet = 0; /* reserved coding */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

889 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

890 case( 0xE0 ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

891 alphabet = 0x02; /* UCS2 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

892 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

893 case( 0xF0 ):

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

894 alphabet = (dcs & 0x04) >> 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

895 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

896 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

897

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

898 return alphabet;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

899 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

900

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

901 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

902 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

903 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

904 | STATE : code ROUTINE : cmhSMS_expdSmsPp |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

905 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

906

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

907 PURPOSE : This function expands a point-to-point SMS from

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

908 7 to 8 bit.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

909 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

910 GLOBAL void cmhSMS_expdSmsPp ( UBYTE byte_offset,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

911 UBYTE dcs,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

912 UBYTE* source,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

913 UBYTE source_len,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

914 UBYTE* dest,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

915 UBYTE* dest_len )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

916 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

917 UBYTE alphabet;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

918 UBYTE bit_offset = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

919

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

920 TRACE_FUNCTION ("cmhSMS_expdSmsPp ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

921

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

922

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

923 alphabet = cmhSMS_getAlphabetPp ( dcs );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

924

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

925 switch (alphabet)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

926 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

927 case( 0 ): /* 7 bit alphabet */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

928

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

929 if ( byte_offset % 7 NEQ 0 )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

930 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

931 bit_offset = 7 - ((byte_offset*8) % 7);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

932 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

933

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

934 *dest_len = source_len - ((byte_offset*8+6)/7); /* adjust byte_offset to septets */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

935

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

936 /* In 7-Bit mode we get number of septets but we need octets */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

937 source_len = (source_len*7+7)/8; /* round up to next octet*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

938 source_len -= byte_offset;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

939

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

940 utl_cvt7To8 ( source, source_len, dest, bit_offset);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

941

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

942

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

943 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

944

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

945 default: /* 8 bit alphabet, UCS2, reserved */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

946

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

947 *dest_len = source_len-byte_offset;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

948 memcpy ( (CHAR*) dest, (CHAR*)source, *dest_len );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

949 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

950 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

951 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

952

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

953 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

954 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

955 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

956 | STATE : code ROUTINE : cmhSMS_rdcSmsPp |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

957 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

958

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

959 PURPOSE : This function reduces a point-to-point SMS from

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

960 8 to 7 bit.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

961 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

962 GLOBAL void cmhSMS_rdcSmsPp ( UBYTE byte_offset,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

963 UBYTE dcs,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

964 UBYTE* source,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

965 UBYTE source_len,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

966 UBYTE* dest,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

967 UBYTE* dest_len )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

968 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

969 UBYTE data_len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

970 UBYTE alphabet;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

971 UBYTE bit_offset = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

972

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

973 TRACE_FUNCTION ("cmhSMS_rdcSmsPp ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

974

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

975 if (source_len EQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

976 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

977 *dest_len = source_len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

978 return;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

979 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

980

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

981 alphabet = cmhSMS_getAlphabetPp ( dcs );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

982

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

983 switch (alphabet)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

984 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

985 case( 0 ): /* 7 bit alphabet */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

986

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

987 if ( byte_offset % 7 NEQ 0 )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

988 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

989 bit_offset = 7 - ((byte_offset*8) % 7);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

990 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

991

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

992 data_len = MINIMUM (source_len, (SMS_MSG_LEN * 8) / 7);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

993

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

994 data_len = utl_cvt8To7 ( source, data_len, dest, bit_offset );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

995 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

996

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

997 default: /* 8 bit alphabet, UCS2, reserved */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

998 data_len = MINIMUM ( source_len, SMS_MSG_LEN );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

999

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1000 memcpy ( ( CHAR * ) dest, ( CHAR * ) source, data_len );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1001 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1002 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1003

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1004 *dest_len = data_len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1005 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1006 /* Implements Measure 25. This function is replaced by cmh_getAlphabetCb*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1007 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1008 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1009 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1010 | STATE : code ROUTINE : cmhSMS_expdSmsCb |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1011 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1012

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1013 PURPOSE : This function expands a cell broadcast SMS from

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1014 7 to 8 bit.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1015 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1016 GLOBAL void cmhSMS_expdSmsCb ( UBYTE dcs,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1017 UBYTE *source,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1018 UBYTE source_len,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1019 UBYTE *dest,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1020 UBYTE *dest_len )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1021 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1022 UBYTE alphabet;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1023

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1024 TRACE_FUNCTION ("cmhSMS_expdSmsCb()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1025 alphabet = cmh_getAlphabetCb ( dcs );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1026

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1027 switch (alphabet)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1028 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1029 case( 0 ): /* 7 bit alphabet */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1030 /* PATCH Add bit_offset parameter to function cvt7To8 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1031 /* utl_cvt7To8 ( source, source_len, dest ); */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1032 utl_cvt7To8 ( source, source_len, dest, 0);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1033 /* PATCH END */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1034

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1035 *dest_len = ( source_len * 8 ) / 7;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1036 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1037

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1038 default: /* 8 bit alphabet, UCS2, reserved */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1039 memcpy ( ( CHAR * ) dest, ( CHAR * ) source, source_len );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1040

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1041 *dest_len = source_len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1042 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1043 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1044 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1045

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1046 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1047 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1048 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1049 | STATE : code ROUTINE : cmhSMS_setToaDef |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1050 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1051

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1052 PURPOSE : This function sets the type of address to default values

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1053 (when the first character of address is '+' or the first

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1054 two characters are '0' default is 145 otherwise default

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1055 is 129)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1056 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1057 GLOBAL CHAR* cmhSMS_setToaDef ( CHAR* number,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1058 UBYTE* ntype,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1059 UBYTE* nplan )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1060 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1061 *nplan = SMS_NPI_ISDN;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1062

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1063 if ( *number EQ '+' )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1064 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1065 *ntype = SMS_TON_INTERNATIONAL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1066 return number+1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1067 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1068 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1069 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1070 *ntype = SMS_TON_UNKNOWN;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1071 return number;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1072 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1073 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1074

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1075 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1076 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1077 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1078 | STATE : code ROUTINE : cmhSMS_setTimezone |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1079 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1080

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1081 PURPOSE : Codes the timezone format used in entity SMS.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1082

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1083 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1084 GLOBAL UBYTE cmhSMS_setTimezone (SHORT timezone)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1085 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1086 UBYTE local_tz = ( UBYTE ) timezone;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1087 BOOL isNegative = ( local_tz & 0x80 );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1088

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1089 if ( isNegative )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1090 local_tz = ~local_tz + 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1091

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1092 local_tz = ( local_tz / 10 ) + ( ( local_tz % 10 ) << 4 );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1093

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1094 return ( ( isNegative ) ? local_tz | 0x08 : local_tz );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1095 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1096

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1097 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1098 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1099 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1100 | STATE : code ROUTINE : cmhSMS_getTimezone |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1101 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1102

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1103 PURPOSE : Decodes the timezone format used in entity SMS.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1104

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1105 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1106 GLOBAL SHORT cmhSMS_getTimezone (UBYTE timezone)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1107 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1108 signed char local_tz;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1109

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1110 local_tz = ( timezone & 0x07 ) * 10 + ( ( timezone & 0xF0 ) >> 4 );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1111

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1112 return ( SHORT ) (( timezone & 0x08 ) ? -local_tz : local_tz );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1113 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1114

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1115 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1116 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1117 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1118 | STATE : code ROUTINE : cmhSMS_setStorOcc |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1119 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1120

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1121 PURPOSE : Fills the T_ACI_SMS_STOR_OCC structure with data from the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1122 shared parameter buffer.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1123

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1124 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1125 GLOBAL void cmhSMS_setStorOcc ( T_ACI_SMS_STOR_OCC* outMem,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1126 UBYTE inMem )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1127 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1128 cmhSMS_getMemCmh ( inMem, &outMem -> mem );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1129

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1130 if ( outMem -> mem EQ SMS_STOR_Sm )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1131 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1132 outMem -> used = smsShrdPrm.aci_sms_parameter.simUsed;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1133 outMem -> total = smsShrdPrm.aci_sms_parameter.simTotal;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1134 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1135 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1136 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1137 outMem -> used = smsShrdPrm.aci_sms_parameter.meUsed;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1138 outMem -> total = smsShrdPrm.aci_sms_parameter.meTotal;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1139 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1140 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1141

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1142 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1143 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1144 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1145 | ROUTINE : cmhSMS_GetCmsFromSim |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1146 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1147

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1148 PURPOSE : Mapping of SIM error code to ACI error code.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1149

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1150 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1151 GLOBAL T_ACI_CMS_ERR cmhSMS_GetCmsFromSim ( USHORT errCode )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1152 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1153 switch ( errCode )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1154 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1155 case SIM_NO_ERROR:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1156 return CMS_ERR_NotPresent;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1157

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1158 case SIM_CAUSE_PIN1_EXPECT:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1159 return CMS_ERR_SimPinReq;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1160

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1161 case SIM_CAUSE_PIN2_EXPECT:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1162 return CMS_ERR_SimPin2Req;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1163

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1164 case SIM_CAUSE_PUK1_EXPECT:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1165 case SIM_CAUSE_PIN1_BLOCKED:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1166 return CMS_ERR_SimPukReq;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1167

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1168 case SIM_CAUSE_PUK2_EXPECT:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1169 case SIM_CAUSE_PIN2_BLOCKED:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1170 return CMS_ERR_SimPuk2Req;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1171

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1172 case SIM_CAUSE_PUK1_BLOCKED:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1173 case SIM_CAUSE_PUK2_BLOCKED:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1174 return CMS_ERR_SimWrong;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1175

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1176 case SIM_CAUSE_UNKN_FILE_ID:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1177 case SIM_CAUSE_DNL_ERROR:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1178 return CMS_ERR_UnknownErr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1179

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1180 case SIM_CAUSE_EF_INVALID:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1181 return CMS_ERR_OpNotSup;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1182

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1183 case SIM_CAUSE_ADDR_WRONG:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1184 return CMS_ERR_InValMemIdx;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1185

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1186 case SIM_CAUSE_CMD_INCONSIST:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1187 case SIM_CAUSE_MAX_INCREASE:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1188 case SIM_CAUSE_CHV_NOTSET:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1189 case SIM_CAUSE_CHV_VALIDATED:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1190 case SIM_CAUSE_ACCESS_PROHIBIT:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1191 return CMS_ERR_OpNotAllowed;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1192

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1193 case SIM_CAUSE_CARD_REMOVED:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1194 case SIM_CAUSE_DRV_NOCARD:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1195 return CMS_ERR_SimNotIns;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1196

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1197 case SIM_CAUSE_NO_SELECT:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1198 case SIM_CAUSE_CLA_WRONG:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1199 case SIM_CAUSE_INS_WRONG:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1200 case SIM_CAUSE_P1P2_WRONG:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1201 case SIM_CAUSE_P3_WRONG:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1202 case SIM_CAUSE_PARAM_WRONG:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1203 return CMS_ERR_MeFail;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1204

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1205 case SIM_CAUSE_SAT_BUSY:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1206 return CMS_ERR_SimBsy;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1207

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1208 case SIM_CAUSE_DRV_TEMPFAIL:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1209 return CMS_ERR_SimFail;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1210

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1211 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1212 if (GET_CAUSE_DEFBY(errCode) EQ DEFBY_CONDAT AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1213 GET_CAUSE_ORIGSIDE(errCode) EQ ORIGSIDE_MS)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1214 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1215 return CMS_ERR_UnknownErr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1216 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1217 return CMS_ERR_UnknownErr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1218 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1219 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1220

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1221

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1222

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1223 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1224 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1225 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1226 | ROUTINE : cmhSMS_GetCmsFromSms |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1227 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1228

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1229 PURPOSE : Mapping of SMS causes (MNSMS.doc) to ACI error code.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1230

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1231 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1232 GLOBAL T_ACI_CMS_ERR cmhSMS_GetCmsFromSms ( USHORT errCode )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1233 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1234 switch ( errCode )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1235 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1236 case SMS_NO_ERROR: /* No error */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1237 return CMS_ERR_NotPresent;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1238

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1239 case SMS_CAUSE_PARAM_WRONG: /* Wrong parameter in primitive */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1240

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1241 case SMS_CAUSE_ENTITY_BUSY: /* Entity is busy */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1242 return CMS_ERR_SimBsy;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1243

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1244 case SMS_CAUSE_OPER_NOT_ALLW: /* Operation not allowed */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1245 return CMS_ERR_OpNotAllowed;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1246

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1247 case SMS_CAUSE_OPER_NOT_SUPP: /* Operation not supported */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1248 return CMS_ERR_OpNotSup;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1249

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1250 case SMS_CAUSE_SIM_BUSY: /* SIM busy */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1251 return CMS_ERR_SimBsy;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1252 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1253 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1254 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1255

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1256 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1257 * The switch must be splitted because of a compiler bug

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1258 * - asm files can not compiled

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1259 *

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1260 * TMS470 ANSI C Compiler Version 1.22e

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1261 *

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1262 * brz, 2004.02.14

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1263 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1264

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1265 switch(errCode) {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1266 case SMS_CAUSE_MEM_FAIL: /* Memory failure */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1267 return CMS_ERR_MemFail;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1268

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1269 case SMS_CAUSE_INV_INDEX: /* Invalid memory index */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1270 return CMS_ERR_InValMemIdx;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1271

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1272 case SMS_CAUSE_MEM_FULL: /* Memory full */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1273 return CMS_ERR_MemFull;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1274

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1275 case SMS_CAUSE_NO_SERVICE: /* No network service */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1276 return CMS_ERR_NoNetServ;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1277

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1278 case SMS_CAUSE_NET_TIMEOUT: /* Network timeout */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1279 return CMS_ERR_NetTimeOut;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1280

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1281 case SMS_CAUSE_UNEXP_CNMA: /* No +CNMA acknowledgement expected */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1282 return CMS_ERR_NoCnmaAckExpect;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1283

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1284 case SMS_CAUSE_OTHER_ERROR: /* Any other error */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1285 return CMS_ERR_UnknownErr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1286

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1287 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1288 return ((T_ACI_CMS_ERR) errCode); /* cmdCmsError(errCode) will figure out other error values from the first byte of the error code */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1289 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1290 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1291

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1292

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1293

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1294

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1295

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1296

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1297 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1298 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1299 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1300 | STATE : code ROUTINE : cmhSMS_ready |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1301 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1302

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1303 PURPOSE : This function notifies SMS_READY to all sources.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1304 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1305 GLOBAL void cmhSMS_ready ( void )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1306 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1307 int idx;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1308 T_opl_field * ptr_opl;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1309

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1310 TRACE_FUNCTION ("cmhSMS_ready()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1311

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1312 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1313 PALLOC (sim_sync_req, SIM_SYNC_REQ);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1314 sim_sync_req -> synccs = SYNC_MMI_FINISHED_READING;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1315 simShrdPrm.synCs = SYNC_MMI_FINISHED_READING;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1316 PSENDX (SIM, sim_sync_req);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1317 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1318

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1319 smsShrdPrm.accessEnabled = TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1320 ptr_opl = cmhSIM_GetOPL();

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1321 ptr_opl->opl_status = FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1322

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1323 cmhSIM_UpdateOperatorName(NOT_PRESENT_16BIT); /* start EF_PNN and EF_OPL reading */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1324

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1325 pb_start_build(FALSE); /* start phonebook reading, no guarantees */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1326

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1327 percentCSTAT_indication(STATE_MSG_SMS, ENTITY_STATUS_Ready);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1328

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1329 for( idx = 0; idx < CMD_SRC_MAX; idx++ )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1330 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1331 R_AT( RAT_SMS_READY, (T_ACI_CMD_SRC)idx )();

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1332 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1333

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1334 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1335

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1336

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1337 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1338 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1339 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1340 | STATE : code ROUTINE : cmhSMS_disableAccess |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1341 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1342

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1343 PURPOSE : This function disables access to all SMS functions.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1344 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1345 GLOBAL void cmhSMS_disableAccess (void)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1346 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1347 smsShrdPrm.accessEnabled = FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1348 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1349

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1350 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1351 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1352 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1353 | STATE : code ROUTINE : cmhSMS_checkSIM |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1354 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1355

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1356 PURPOSE : This function checks if SMS is initialized. If not, the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1357 SIM state is checked. AN error code dependent of the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1358 SIM state is stored.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1359 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1360 GLOBAL BOOL cmhSMS_checkSIM (void)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1361 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1362 if (smsShrdPrm.accessEnabled)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1363 return TRUE; /* SMS is accessible*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1364 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1365 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1366 * check SIM status

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1367 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1368 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1369

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1370 switch (simShrdPrm.SIMStat)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1371 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1372 case NO_VLD_SS:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1373 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_SimNotIns );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1374 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1375 case SS_INV:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1376 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_SimFail );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1377 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1378 /* case SS_BLKD:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1379 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_SimPukReq );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1380 break; */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1381 case SS_URCHB:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1382 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_SimWrong );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1383 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1384 case SS_OK:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1385 switch (simShrdPrm.PINStat)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1386 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1387 case PS_PIN1:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1388 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_SimPinReq);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1389 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1390

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1391 case PS_PIN2:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1392 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_SimPin2Req);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1393 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1394

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1395 case PS_PUK1:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1396 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_SimPukReq);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1397 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1398

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1399 case PS_PUK2:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1400 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_SimPuk2Req);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1401 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1402

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1403 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1404 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_SimBsy );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1405 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1406 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1407 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1408 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1409 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_SimBsy );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1410 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1411 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1412 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1413 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1414 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1415 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1416 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1417 | STATE : code ROUTINE : cmhSMS_checkAccess |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1418 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1419

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1420 PURPOSE : This function checks if SMS is accessible. If an error

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1421 condition is found, then *ret is set to either AT_FAIL or

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1422 AT_BUSY, otherwise it remains unaffected. The error code

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1423 is stored.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1424 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1425 GLOBAL BOOL cmhSMS_checkAccess (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1426 T_ACI_RETURN *ret)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1427 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1428 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1429 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1430 * check command source

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1431 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1432 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1433 if(srcId NEQ (T_ACI_CMD_SRC)OWN_SRC_SAT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1434 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1435 if(!cmh_IsVldCmdSrc (srcId))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1436 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1437 TRACE_ERROR ("[cmhSMS_checkAccess]: Cmd Src not valid");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1438 *ret = AT_FAIL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1439 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1440 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1441 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1442 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1443 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1444 * check entity status

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1445 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1446 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1447 if( smsShrdPrm.smsEntStat.curCmd NEQ AT_CMD_NONE )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1448 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1449 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Internal );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1450 TRACE_ERROR ("[cmhSMS_checkAccess]: Entity is busy");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1451 *ret = AT_BUSY;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1452 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1453 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1454

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1455 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1456 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1457 * check SMS access status

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1458 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1459 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1460 if (cmhSMS_checkSIM ())

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1461 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1462

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1463 TRACE_ERROR ("[cmhSMS_checkAccess]: Wrong SIM status");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1464

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1465 *ret = AT_FAIL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1466 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1467 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1468

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1469 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1470 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1471 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1472 | STATE : code ROUTINE : cmhSMS_getPrfRge |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1473 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1474

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1475 PURPOSE : This function gets the number of available profiles for

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1476 SMS related parameters. First, the SIM is checked. If

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1477 there is no space, then PCM ist checked.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1478 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1479 GLOBAL SHORT cmhSMS_getPrfRge ( void )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1480 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1481 /* TEMPORARY, ONLY FOR TEST PURPOSES: Pretend that the SIM has no SMSP !!! */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1482 /* smsShrdPrm.aci_sms_parameter.smsParamMaxRec = 0;*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1483

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1484 if (smsShrdPrm.aci_sms_parameter.smsParamMaxRec > 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1485 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1486 return (SHORT)smsShrdPrm.aci_sms_parameter.smsParamMaxRec;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1487 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1488 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1489 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1490 return (MAX_FFS_SMSPRFLS);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1491 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1492 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1493

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1494 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1495 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1496 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1497 | STATE : code ROUTINE : cmhSMS_ReadPrmFFS |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1498 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1499

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1500 PURPOSE : This function reads one record of EF_SMSPRFL_ID from FFS.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1501 The processed parameters are controlled by bits in

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1502 'access'.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1503 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1504 static T_ACI_RETURN cmhSMS_ReadPrmFFS (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1505 SHORT recNr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1506 int access)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1507 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1508 T_SMS_SET_PRM *pSMSSetPrm; /* points to SMS parameter set */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1509 int i;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1510 T_SMS_SET_PRM *elem;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1511 T_ACI_FFS_SMSPRFL smsPrfl;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1512 #ifndef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1513 T_FFS_SIZE ffs_size;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1514 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1515

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1516 TRACE_FUNCTION ("cmhSMS_ReadPrmFFS()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1517

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1518 #ifdef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1519 smsPrfl.vldFlag = FFS_SMSPRFL_INVLD; /* trigger a failure since nothing can be read in simulation */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1520 #else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1521 ffs_size = FFS_fread(ffs_smsprfl_fname[recNr-1], (void*)&smsPrfl, SIZE_FSS_SMSPRFL);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1522 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1523 Don't check FFS return for only specif ERRORS, as ACI will not know what

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1524 ERROR FFS may send. So, it's walyws better to check for ERROR OK

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1525 i.e EFFS_OK Considering this in mind the below condition is changes to

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1526 do the same.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1527 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1528 if ( ffs_size < EFFS_OK )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1529 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1530 TRACE_EVENT_P1("error when reading FFS object \"%s\"", ffs_smsprfl_fname[recNr-1]);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1531 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_MemFail );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1532 return AT_FAIL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1533 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1534 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1535

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1536 if ( smsPrfl.vldFlag EQ FFS_SMSPRFL_INVLD )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1537 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1538 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_OpNotAllowed );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1539 return AT_FAIL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1540 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1541

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1542 if (access & ACI_PCM_ACCESS_SMSP)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1543 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1544 if (srcId >= CMD_SRC_MAX)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1545 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1546 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_UnknownErr );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1547 return AT_FAIL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1548 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1549 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1550 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1551 if (set_prm_list EQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1552 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1553 set_prm_list = new_list();

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1554 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1555

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1556 elem = find_element(set_prm_list, (UBYTE)recNr, cmhSMS_findPrflId);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1557 if (elem EQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1558 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1559 ACI_MALLOC(elem, sizeof(T_SMS_SET_PRM));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1560 memset(elem, 0, sizeof(T_SMS_SET_PRM));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1561 insert_list(set_prm_list, elem);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1562 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1563 if (srcId <= CMD_SRC_NONE)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1564 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1565 elem->numOfRefs = OWN_SRC_MAX;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1566 for (i=0; i < OWN_SRC_MAX; i++)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1567 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1568 smsShrdPrm.pSetPrm[i] = (T_SMS_SET_PRM*) elem;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1569 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1570 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1571 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1572 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1573 smsShrdPrm.pSetPrm[srcId] = (T_SMS_SET_PRM*) elem;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1574 (smsShrdPrm.pSetPrm[srcId])->numOfRefs++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1575 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1576 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1577

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1578 pSMSSetPrm = (T_SMS_SET_PRM*) elem;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1579 pSMSSetPrm->prflId = (UBYTE)recNr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1580

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1581 #ifndef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1582 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1583 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1584 * restore the service center address

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1585 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1586 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1587 pSMSSetPrm->sca.c_num = MINIMUM (smsPrfl.CSCAlenSca, MAX_SMS_ADDR_DIG);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1588 memcpy ( pSMSSetPrm->sca.num, smsPrfl.CSCAsca, pSMSSetPrm->sca.c_num);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1589 pSMSSetPrm->sca.ton = smsPrfl.CSCAton;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1590 pSMSSetPrm->sca.npi = smsPrfl.CSCAnpi;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1591 pSMSSetPrm->sca.v_ton = TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1592 pSMSSetPrm->sca.v_npi = TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1593

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1594 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1595 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1596 * restore the text mode parameters

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1597 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1598 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1599 pSMSSetPrm->vpRel = smsPrfl.CSMPvprel;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1600 memcpy ( &pSMSSetPrm->vpAbs, smsPrfl.CSMPvpabs, SIZE_FFS_SMSPRFL_VPABS );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1601 memcpy ( &pSMSSetPrm->vpEnh, smsPrfl.CSMPvpenh, SIZE_FFS_SMSPRFL_VPENH );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1602

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1603 pSMSSetPrm->msgType = smsPrfl.CSMPfo;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1604 pSMSSetPrm->pid = smsPrfl.CSMPpid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1605 pSMSSetPrm->dcs = smsPrfl.CSMPdcs;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1606 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1607 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1608

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1609 #ifndef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1610 if (access & ACI_PCM_ACCESS_CBMP)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1611 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1612 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1613 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1614 * restore the cell broadcast message types and data coding

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1615 * schemes

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1616 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1617 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1618 smsShrdPrm.cbmPrm.cbmMode = smsPrfl.CSCBmode;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1619

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1620 { /* default setting */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1621 memset (smsShrdPrm.cbmPrm.msgId, DEF_MID_RANGE, sizeof (smsShrdPrm.cbmPrm.msgId));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1622 memset (smsShrdPrm.cbmPrm.dcsId, DEF_DCS_RANGE, sizeof(smsShrdPrm.cbmPrm.dcsId));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1623 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1624

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1625 for ( i = 0; i < MINIMUM(MAX_IDENTS,SIZE_FFS_SMSPRFL_MIDS/2); i++ )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1626 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1627 smsShrdPrm.cbmPrm.msgId[i] = ( USHORT )smsPrfl.CSCBmids[2*i] << 8;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1628 smsShrdPrm.cbmPrm.msgId[i] |= ( USHORT )smsPrfl.CSCBmids[2*i+1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1629 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1630

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1631 memcpy ( smsShrdPrm.cbmPrm.dcsId, smsPrfl.CSCBdcss,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1632 MINIMUM(MAX_IDENTS,SIZE_FFS_SMSPRFL_DCSS) );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1633

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1634 memcpy (smsShrdPrm.cbmPrm.IMSI, smsPrfl.IMSI, MAX_IMSI);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1635 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1636 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1637 return AT_CMPL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1638 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1639

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1640 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1641 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1642 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1643 | STATE : code ROUTINE : cmhSMS_WritePrmFFS |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1644 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1645

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1646 PURPOSE : This function writes one record of EF_SMSPRFL_ID to FFS.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1647 The processed parameters are controlled by bits in

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1648 'access'.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1649 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1650 static T_ACI_RETURN cmhSMS_WritePrmFFS (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1651 SHORT recNr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1652 int access)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1653 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1654 T_SMS_SET_PRM *pSMSSetPrm; /* points to SMS parameter set */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1655 T_ACI_FFS_SMSPRFL smsPrfl;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1656 int i;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1657 #ifndef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1658 T_FFS_RET ffs_ret;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1659 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1660

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1661 TRACE_FUNCTION ("cmhSMS_WritePrmFFS()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1662

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1663 if (access & ACI_PCM_ACCESS_SMSP)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1664 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1665 if (srcId > CMD_SRC_NONE AND srcId < CMD_SRC_MAX)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1666 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1667 pSMSSetPrm = smsShrdPrm.pSetPrm[srcId];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1668

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1669 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1670 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1671 * save the service center address

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1672 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1673 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1674 smsPrfl.CSCAlenSca = MINIMUM ( pSMSSetPrm->sca.c_num, SIZE_FFS_SMSPRFL_SCA );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1675 memcpy ( smsPrfl.CSCAsca, pSMSSetPrm->sca.num, smsPrfl.CSCAlenSca );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1676

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1677 i = (int)smsPrfl.CSCAlenSca;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1678 while ( i < SIZE_FFS_SMSPRFL_SCA )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1679 smsPrfl.CSCAsca[i++] = 0xFF;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1680

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1681 smsPrfl.CSCAton = pSMSSetPrm->sca.ton;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1682 smsPrfl.CSCAnpi = pSMSSetPrm->sca.npi;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1683

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1684 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1685 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1686 * store the text mode parameters

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1687 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1688 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1689 smsPrfl.CSMPfo = pSMSSetPrm->msgType;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1690

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1691 smsPrfl.CSMPvprel = pSMSSetPrm->vpRel;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1692 memcpy ( smsPrfl.CSMPvpabs, &pSMSSetPrm->vpAbs, SIZE_FFS_SMSPRFL_VPABS );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1693 memcpy ( smsPrfl.CSMPvpenh, &pSMSSetPrm->vpEnh, SIZE_FFS_SMSPRFL_VPENH );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1694

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1695 smsPrfl.CSMPpid = pSMSSetPrm->pid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1696 smsPrfl.CSMPdcs = pSMSSetPrm->dcs;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1697

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1698 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1699 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1700 * set the valid flag

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1701 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1702 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1703 smsPrfl.vldFlag = FFS_SMSPRFL_VLD;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1704 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1705 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1706 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1707 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_UnknownErr );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1708 return AT_FAIL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1709 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1710 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1711 if (access & ACI_PCM_ACCESS_CBMP)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1712 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1713 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1714 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1715 * save the cell broadcast message types

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1716 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1717 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1718 smsPrfl.CSCBmode = smsShrdPrm.cbmPrm.cbmMode;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1719

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1720 { /* default setting */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1721 memset (smsPrfl.CSCBmids, 0xFF, sizeof(smsPrfl.CSCBmids));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1722 memset (smsPrfl.CSCBdcss, 0xFF, sizeof(smsPrfl.CSCBdcss));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1723 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1724

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1725 for ( i = 0; i < MINIMUM(MAX_IDENTS*2,SIZE_FFS_SMSPRFL_MIDS)-1; i += 2 )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1726 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1727 smsPrfl.CSCBmids[i] = (UBYTE)(smsShrdPrm.cbmPrm.msgId[i/2] >> 8);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1728 smsPrfl.CSCBmids[i+1] = (UBYTE)smsShrdPrm.cbmPrm.msgId[i/2];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1729 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1730

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1731 memcpy ( smsPrfl.CSCBdcss, smsShrdPrm.cbmPrm.dcsId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1732 MINIMUM(MAX_IDENTS,SIZE_FFS_SMSPRFL_DCSS) );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1733

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1734 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1735 * Save IMSI also in FFS

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1736 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1737 memcpy (smsPrfl.IMSI, simShrdPrm.imsi.field, simShrdPrm.imsi.c_field);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1738 smsPrfl.vldFlag = FFS_SMSPRFL_VLD;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1739 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1740

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1741 #ifndef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1742 ffs_ret = FFS_mkdir(FFS_SMSPRFL_PATH);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1743 if (ffs_ret EQ EFFS_OK)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1744 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1745 TRACE_EVENT_P1("FFS directory \"%s\" successfully created", FFS_SMSPRFL_PATH);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1746 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1747 else if (ffs_ret EQ EFFS_EXISTS)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1748 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1749 TRACE_EVENT_P1("FFS directory \"%s\" already exists", FFS_SMSPRFL_PATH);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1750 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1751 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1752 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1753 TRACE_EVENT_P1("error when creating FFS directory \"%s\"", FFS_SMSPRFL_PATH);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1754 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1755

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1756 ffs_ret = FFS_fwrite(ffs_smsprfl_fname[recNr-1], (void*)&smsPrfl, SIZE_FSS_SMSPRFL);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1757 if (ffs_ret NEQ EFFS_OK)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1758 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1759 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_MemFail );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1760 TRACE_EVENT_P1("error when writing FFS object \"%s\"", ffs_smsprfl_fname[recNr-1]);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1761 return AT_FAIL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1762 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1763 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1764

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1765 return AT_CMPL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1766 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1767

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1768 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1769 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1770 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1771 | STATE : code ROUTINE : cmhSMS_ReadParams |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1772 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1773

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1774 PURPOSE : This function reads parameters from SIM and/or PCM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1775 In case of AT command +CFUN the first record is read to

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1776 be informed about storage capability of SIM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1777 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1778 GLOBAL T_ACI_RETURN cmhSMS_ReadParams (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1779 T_ACI_AT_CMD cmd,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1780 SHORT recNr)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1781 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1782 T_ACI_RETURN ret = AT_CMPL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1783 int access = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1784

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1785 TRACE_FUNCTION ("cmhSMS_ReadParams()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1786

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1787 smsShrdPrm.smsEntStat.curCmd = cmd;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1788 smsShrdPrm.owner = (T_OWN)srcId;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1789 smsShrdPrm.smsEntStat.entOwn = srcId;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1790

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1791

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1792 if (cmd EQ AT_CMD_CFUN)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1793 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1794 /* initialization */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1795

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1796 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1797 * Always read CSCB params from FFS so that previously stored mode and dcss

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1798 * can also be restored from FFS

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1799 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1800 access |= ACI_PCM_ACCESS_CBMP;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1801 /*if (!psaSIM_ChkSIMSrvSup( SRV_SMS_Parms ))*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1802 access |= ACI_PCM_ACCESS_SMSP;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1803

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1804 ret = cmhSMS_ReadPrmFFS (CMD_SRC_NONE, 1, access);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1805

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1806 if (psaSIM_ChkSIMSrvSup( SRV_SMS_Parms ))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1807 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1808 smsShrdPrm.prmRdSeq = SMS_READ_SIM_SMSP;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1809 ret = cmhSIM_ReadRecordEF (CMD_SRC_NONE, cmd, FALSE, NULL,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1810 SIM_SMSP, 1, 255,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1811 NULL, cmhSMS_InitSMSP);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1812 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1813 else if (psaSIM_ChkSIMSrvSup( SRV_CBMIdRnge ))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1814 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1815 smsShrdPrm.prmRdSeq = SMS_READ_SIM_CBMIR;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1816 ret = cmhSIM_ReadTranspEF (CMD_SRC_NONE, cmd, FALSE, NULL,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1817 SIM_CBMIR, 0, 255,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1818 NULL, cmhSMS_InitSMSP);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1819 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1820 else if (psaSIM_ChkSIMSrvSup( SRV_CBM_Ident ))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1821 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1822 smsShrdPrm.prmRdSeq = SMS_READ_SIM_CBMI;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1823 ret = cmhSIM_ReadTranspEF (CMD_SRC_NONE, cmd, FALSE, NULL,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1824 SIM_CBMI, 0, 255,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1825 NULL, cmhSMS_InitSMSP);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1826 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1827 #ifdef SIM_TOOLKIT

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1828 else if ((psaSIM_ChkSIMSrvSup( SRV_DtaDownlCB )) AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1829 smsShrdPrm.owner EQ OWN_SRC_SAT )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1830 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1831 smsShrdPrm.prmRdSeq = SMS_READ_SIM_CBMID;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1832 ret = cmhSIM_ReadTranspEF (CMD_SRC_NONE, cmd, FALSE, NULL,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1833 SIM_CBMID, 0, 255,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1834 NULL, cmhSMS_InitSMSP);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1835 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1836 #endif /* of SIM_TOOLKIT */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1837 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1838 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1839 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1840

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1841 /* TEMPORARY, ONLY FOR TEST PURPOSES: Pretend that the SIM has no SMSP !!! */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1842 /* smsShrdPrm.aci_sms_parameter.smsParamMaxRec = 0; */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1843

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1844 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1845 * Always read CSCB params from FFS so that previously stored mode and dcss

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1846 * can also be restored from FFS

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1847 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1848 /* normal operation */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1849 access |= ACI_PCM_ACCESS_CBMP;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1850 /* if (smsShrdPrm.aci_sms_parameter.smsParamMaxRec EQ 0)*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1851 access |= ACI_PCM_ACCESS_SMSP;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1852 ret = cmhSMS_ReadPrmFFS (srcId, recNr, access);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1853

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1854 if (smsShrdPrm.aci_sms_parameter.smsParamMaxRec > 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1855 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1856 if (recNr <= 0

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1857 OR recNr > (SHORT)smsShrdPrm.aci_sms_parameter.smsParamMaxRec)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1858 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1859 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_InValMemIdx );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1860 ret= AT_FAIL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1861 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1862 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1863 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1864 smsShrdPrm.prmRdSeq = SMS_READ_SIM_SMSP;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1865 return cmhSIM_ReadRecordEF (CMD_SRC_NONE, cmd, FALSE, NULL, SIM_SMSP,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1866 (UBYTE)(recNr),

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1867 smsShrdPrm.aci_sms_parameter.smsParamRecLen,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1868 NULL, cmhSMS_RdCnfCRES);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1869 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1870 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1871 if (smsShrdPrm.cbmPrm.cbmSIMmaxIdRge > 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1872 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1873 smsShrdPrm.prmRdSeq = SMS_READ_SIM_CBMIR;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1874 return cmhSIM_ReadTranspEF (CMD_SRC_NONE, cmd, FALSE, NULL, SIM_CBMIR,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1875 0, smsShrdPrm.cbmPrm.cbmSIMmaxIdRge,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1876 NULL, cmhSMS_RdCnfCRES);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1877 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1878 if (smsShrdPrm.cbmPrm.cbmSIMmaxId > 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1879 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1880 smsShrdPrm.prmRdSeq = SMS_READ_SIM_CBMI;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1881 return cmhSIM_ReadTranspEF (CMD_SRC_NONE, cmd, FALSE, NULL, SIM_CBMI,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1882 0, smsShrdPrm.cbmPrm.cbmSIMmaxId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1883 NULL, cmhSMS_RdCnfCRES);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1884 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1885 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1886 if (ret NEQ AT_EXCT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1887 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1888 smsShrdPrm.smsEntStat.curCmd = AT_CMD_NONE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1889 smsShrdPrm.owner = (T_OWN)CMD_SRC_NONE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1890 smsShrdPrm.smsEntStat.entOwn =CMD_SRC_NONE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1891

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1892 smsShrdPrm.cbmPrm.cbchOwner = (T_OWN)srcId;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1893 psaMMI_Cbch();

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1894 smsShrdPrm.cbmPrm.cbchOwner = (T_OWN)CMD_SRC_NONE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1895 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1896 return ret;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1897 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1898

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1899 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1900 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1901 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1902 | STATE : code ROUTINE : cmhSMS_WriteParams |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1903 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1904

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1905 PURPOSE : This function reads parameters from SIM and/or PCM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1906 In case of AT command +CFUN the first record is read to

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1907 be informed about storage capability of SIM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1908 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1909 GLOBAL T_ACI_RETURN cmhSMS_WriteParams (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1910 T_ACI_AT_CMD cmd,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1911 SHORT recNr)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1912 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1913 T_ACI_RETURN ret = AT_CMPL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1914 int access = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1915 UBYTE data[MAX_SIM_CMD];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1916

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1917 TRACE_FUNCTION ("cmhSMS_WriteParams()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1918

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1919 smsShrdPrm.smsEntStat.curCmd = cmd;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1920 smsShrdPrm.owner = (T_OWN)srcId;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1921 smsShrdPrm.smsEntStat.entOwn = srcId;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1922

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1923 /* TEMPORARY, ONLY FOR TEST PURPOSES: Pretend that the SIM has no SMSP !!! */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1924 /* smsShrdPrm.aci_sms_parameter.smsParamMaxRec = 0; */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1925

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1926 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1927 * Always write CSCB params to FFS so that mode and dcss

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1928 * can later be restored from FFS

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1929 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1930 access |= ACI_PCM_ACCESS_CBMP;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1931 /*if (smsShrdPrm.aci_sms_parameter.smsParamMaxRec EQ 0)*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1932 access |= ACI_PCM_ACCESS_SMSP;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1933

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1934 ret = cmhSMS_WritePrmFFS (srcId, recNr, access);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1935

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1936 if (smsShrdPrm.aci_sms_parameter.smsParamMaxRec > 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1937 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1938 if (recNr <= 0 OR recNr > (SHORT)smsShrdPrm.aci_sms_parameter.smsParamMaxRec)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1939 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1940 ACI_ERR_DESC( ACI_ERR_CLASS_Cms, CMS_ERR_InValMemIdx );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1941 ret= AT_FAIL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1942 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1943 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1944 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1945 smsShrdPrm.prmRdSeq = SMS_READ_SIM_SMSP;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1946 cmhSMS_PutPrmSIM (srcId, data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1947 (int)smsShrdPrm.aci_sms_parameter.smsParamRecLen);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1948 return cmhSIM_WriteRecordEF (CMD_SRC_NONE, cmd, FALSE, NULL, SIM_SMSP,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1949 (UBYTE)(recNr),

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1950 smsShrdPrm.aci_sms_parameter.smsParamRecLen,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1951 data, cmhSMS_WrCnfCSAS);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1952 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1953 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1954 if (smsShrdPrm.cbmPrm.cbmSIMmaxIdRge > 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1955 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1956 smsShrdPrm.prmRdSeq = SMS_READ_SIM_CBMIR;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1957 cmhSMS_PutCbmirSIM (srcId, data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1958 (int)smsShrdPrm.cbmPrm.cbmSIMmaxIdRge * 4);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1959

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1960 return cmhSIM_WriteTranspEF (CMD_SRC_NONE, cmd, FALSE, NULL, SIM_CBMIR,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1961 0, (UBYTE)(smsShrdPrm.cbmPrm.cbmSIMmaxIdRge * 4),

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1962 data, cmhSMS_WrCnfCSAS);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1963 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1964 if (smsShrdPrm.cbmPrm.cbmSIMmaxId > 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1965 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1966 smsShrdPrm.prmRdSeq = SMS_READ_SIM_CBMI;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1967 cmhSMS_PutCbmiSIM (srcId, data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1968 (int)smsShrdPrm.cbmPrm.cbmSIMmaxId * 2);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1969

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1970 return cmhSIM_WriteTranspEF (CMD_SRC_NONE, cmd, FALSE, NULL, SIM_CBMI,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1971 0, (UBYTE)(smsShrdPrm.cbmPrm.cbmSIMmaxId * 2),

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1972 data, cmhSMS_WrCnfCSAS);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1973 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1974 if (ret NEQ AT_EXCT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1975 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1976 smsShrdPrm.smsEntStat.curCmd = AT_CMD_NONE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1977 smsShrdPrm.owner = (T_OWN)CMD_SRC_NONE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1978 smsShrdPrm.smsEntStat.entOwn = CMD_SRC_NONE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1979 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1980 return ret;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1981 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1982

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1983 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1984 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1985 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1986 | STATE : code ROUTINE : cmhSMS_GetPrmSIM |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1987 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1988

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1989 PURPOSE : This function extracts the parameters of one record of

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1990 EF(SMSP) read from SIM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1991 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1992 GLOBAL BOOL cmhSMS_GetPrmSIM (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1993 UBYTE *data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1994 int dataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1995 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1996 T_SMS_SET_PRM *pSMSSetPrm; /* points to SMS parameter set */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1997 T_ACI_SMS_SIM_PARAMS *smsprm;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1998

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1999 TRACE_FUNCTION ("cmhSMS_GetPrmSIM ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2000

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2001 if (data NEQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2002 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2003 pSMSSetPrm = smsShrdPrm.pSetPrm[srcId];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2004

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2005 smsprm = (T_ACI_SMS_SIM_PARAMS *)&data[(dataLen <= MIN_SMS_PRM_LEN)?

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2006 0: dataLen - MIN_SMS_PRM_LEN];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2007

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2008 if (smsprm->par_ind EQ NOT_PRESENT_8BIT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2009 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2010

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2011 /* ACI-SPR-16431: reset sca number */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2012 pSMSSetPrm->sca.c_num = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2013 memset(pSMSSetPrm->sca.num, 0xFF, sizeof(pSMSSetPrm->sca.num));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2014 /* end of ACI-SPR-16431: reset sca number */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2015

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2016 return TRUE; /* record is empty */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2017 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2018

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2019 if ((smsprm->par_ind & SIM_SMSP_V_SCA) EQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2020 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2021 cmh_demergeTOA (smsprm->sca_ton_npi, &pSMSSetPrm->sca.ton,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2022 &pSMSSetPrm->sca.npi);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2023 pSMSSetPrm->sca.c_num = (UBYTE)cmh_unpackBCD (pSMSSetPrm->sca.num,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2024 smsprm->sca_addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2025 (USHORT)(smsprm->sca_length - 1));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2026 pSMSSetPrm->sca.v_ton = TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2027 pSMSSetPrm->sca.v_npi = TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2028

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2029 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2030 if ((smsprm->par_ind & SIM_SMSP_V_PID) EQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2031 pSMSSetPrm->pid = smsprm->pid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2032

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2033 if ((smsprm->par_ind & SIM_SMSP_V_DCS) EQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2034 pSMSSetPrm->dcs = smsprm->dcs;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2035

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2036 if ((smsprm->par_ind & SIM_SMSP_V_VPREL) EQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2037 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2038 pSMSSetPrm->vpRel = smsprm->vp_rel;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2039 pSMSSetPrm->msgType &= ~TP_VPF_MASK;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2040 pSMSSetPrm->msgType |= TP_VPF_RELATIVE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2041 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2042 else if ((pSMSSetPrm->msgType & TP_VPF_MASK) EQ TP_VPF_RELATIVE)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2043 pSMSSetPrm->msgType &= ~TP_VPF_MASK;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2044

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2045 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2046 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2047 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2048 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2049

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2050 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2051 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2052 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2053 | STATE : code ROUTINE : cmhSMS_PutPrmSIM |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2054 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2055

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2056 PURPOSE : This function conbiness the parameters for one record of

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2057 EF(SMSP) to be written to SIM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2058 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2059 GLOBAL BOOL cmhSMS_PutPrmSIM (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2060 UBYTE *data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2061 int maxDataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2062 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2063 T_SMS_SET_PRM *pSMSSetPrm; /* points to SMS parameter set */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2064 T_ACI_SMS_SIM_PARAMS *smsprm;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2065 size_t datalen;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2066

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2067 TRACE_FUNCTION ("cmhSMS_PutPrmSIM ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2068

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2069 if (data NEQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2070 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2071 pSMSSetPrm = smsShrdPrm.pSetPrm[srcId];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2072

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2073 if (maxDataLen < MIN_SMS_PRM_LEN)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2074 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2075 datalen = MIN_SMS_PRM_LEN;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2076 smsprm = (T_ACI_SMS_SIM_PARAMS *)data;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2077 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2078 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2079 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2080 datalen = (size_t)maxDataLen;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2081 smsprm = (T_ACI_SMS_SIM_PARAMS *)&data[datalen - MIN_SMS_PRM_LEN];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2082 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2083 memset (data, NOT_PRESENT_8BIT, datalen);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2084

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2085 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2086 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2087 * set the service center address

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2088 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2089 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2090 if (pSMSSetPrm->sca.c_num > 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2091 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2092 smsprm->sca_ton_npi = cmh_mergeTOA (pSMSSetPrm->sca.ton,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2093 pSMSSetPrm->sca.npi);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2094 smsprm->sca_length = (UBYTE)cmh_packBCD (smsprm->sca_addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2095 pSMSSetPrm->sca.num,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2096 (USHORT)MINIMUM(pSMSSetPrm->sca.c_num,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2097 MAX_SMS_ADDR_DIG)) + 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2098 smsprm->par_ind &= ~SIM_SMSP_V_SCA;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2099 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2100

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2101 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2102 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2103 * set PID, DCS and VP-REL

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2104 *-------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2105 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2106

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2107 smsprm->pid = pSMSSetPrm->pid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2108 smsprm->par_ind &= ~SIM_SMSP_V_PID;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2109

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2110 smsprm->dcs = pSMSSetPrm->dcs;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2111 smsprm->par_ind &= ~SIM_SMSP_V_DCS;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2112

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2113 if ((pSMSSetPrm->msgType & TP_VPF_MASK) EQ TP_VPF_RELATIVE)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2114 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2115 smsprm->vp_rel = pSMSSetPrm->vpRel;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2116 smsprm->par_ind &= ~SIM_SMSP_V_VPREL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2117 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2118 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2119 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2120 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2121 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2122

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2123 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2124 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2125 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2126 | STATE : code ROUTINE : cmhSMS_GetCbmirSIM |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2127 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2128

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2129 PURPOSE : This function extracts the parameters of EF(CBMIR)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2130 read from SIM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2131 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2132 GLOBAL BOOL cmhSMS_GetCbmirSIM (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2133 UBYTE *data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2134 int dataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2135 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2136 T_ACI_CBM_SIM_MID_RANGE *mid_range;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2137 USHORT lower_mid, upper_mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2138 int mid_entry;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2139

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2140 TRACE_FUNCTION ("cmhSMS_GetCbmirSIM ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2141

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2142 if (data NEQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2143 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2144 /* Please be aware that to keep simulation test cases as less changed as

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2145 possible lets assume that IMSI and CBMs stored in the FFS and from SIM

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2146 card are the same, since we cannot access FFS under SIMULATION*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2147 #ifndef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2148 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2149 * The CSCB parameters read from FFS should be restored only if the same SIM

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2150 * is inserted ( check IMSI to ensure the same SIM), otherwise reset the CSCB

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2151 * parameters to default values

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2152 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2153 if (memcmp (smsShrdPrm.cbmPrm.IMSI, simShrdPrm.imsi.field, simShrdPrm.imsi.c_field) NEQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2154 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2155 /* Implements Measure # 9 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2156 cmhSMS_clearCbmPrm();

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2157 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2158 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2159 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2160 mid_range = (T_ACI_CBM_SIM_MID_RANGE *)data;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2161 mid_entry = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2162

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2163 while (smsShrdPrm.cbmPrm.cbmFoundIds < MAX_IDENTS/2 AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2164 mid_entry < dataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2165 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2166 lower_mid = (USHORT)mid_range->lowerLSB |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2167 ((USHORT)mid_range->lowerMSB << 8);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2168 upper_mid = (USHORT)mid_range->upperLSB |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2169 ((USHORT)mid_range->upperMSB << 8);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2170 mid_range++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2171 mid_entry += 4;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2172

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2173 if (lower_mid NEQ NOT_PRESENT_16BIT OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2174 upper_mid NEQ NOT_PRESENT_16BIT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2175 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2176 /* Please be aware that to keep simulation test cases as less changed as

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2177 possible lets assume that CBMs stored in the FFS and from SIM

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2178 card are the same, since we cannot access FFS under SIMULATION*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2179 #ifndef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2180

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2181 /* Implements Measure # 73 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2182 if (!cmhSMS_findMessageIds (lower_mid, upper_mid))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2183 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2184 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2185 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2186

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2187 #else /* Just for simulation - copy data, received from SIM */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2188 smsShrdPrm.cbmPrm.msgId[smsShrdPrm.cbmPrm.cbmFoundIds * 2] = lower_mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2189 smsShrdPrm.cbmPrm.msgId[smsShrdPrm.cbmPrm.cbmFoundIds * 2 + 1] = upper_mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2190 smsShrdPrm.cbmPrm.cbmFoundIds++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2191 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2192 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2193 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2194 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2195 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2196 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2197 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2198

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2199 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2200 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2201 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2202 | STATE : code ROUTINE : cmhSMS_PutCbmirSIM |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2203 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2204

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2205 PURPOSE : This function conbines the parameters of EF(CBMIR)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2206 to be written to SIM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2207 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2208 GLOBAL BOOL cmhSMS_PutCbmirSIM (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2209 UBYTE *data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2210 int maxDataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2211 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2212 T_ACI_CBM_SIM_MID_RANGE *mid_range;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2213 USHORT lower_mid, upper_mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2214 int mid_entry;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2215

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2216 TRACE_FUNCTION ("cmhSMS_PutCbmirSIM ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2217

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2218 if (data NEQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2219 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2220 memset (data, NOT_PRESENT_8BIT, maxDataLen);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2221

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2222 mid_range = (T_ACI_CBM_SIM_MID_RANGE *)data;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2223 mid_entry = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2224

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2225 while (smsShrdPrm.cbmPrm.cbmFoundIds < MAX_IDENTS/2 AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2226 mid_entry < maxDataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2227 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2228 lower_mid = smsShrdPrm.cbmPrm.msgId[smsShrdPrm.cbmPrm.cbmFoundIds * 2];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2229 upper_mid = smsShrdPrm.cbmPrm.msgId[smsShrdPrm.cbmPrm.cbmFoundIds * 2 + 1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2230 smsShrdPrm.cbmPrm.cbmFoundIds++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2231

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2232 if (lower_mid NEQ NOT_PRESENT_16BIT OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2233 upper_mid NEQ NOT_PRESENT_16BIT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2234 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2235 mid_range->lowerLSB = (UBYTE)lower_mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2236 mid_range->lowerMSB = (UBYTE)(lower_mid >> 8);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2237 mid_range->upperLSB = (UBYTE)upper_mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2238 mid_range->upperMSB = (UBYTE)(upper_mid >> 8);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2239 mid_range++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2240 mid_entry += 4;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2241 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2242 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2243 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2244 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2245 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2246 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2247

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2248 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2249 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2250 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2251 | STATE : code ROUTINE : cmhSMS_GetCbmiSIM |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2252 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2253

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2254 PURPOSE : This function extracts the parameters of one record of

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2255 EF(SMSP) read from SIM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2256 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2257 GLOBAL BOOL cmhSMS_GetCbmiSIM (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2258 UBYTE *data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2259 int dataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2260 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2261 T_ACI_CBM_SIM_MID_LIST **mid_list;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2262 USHORT mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2263 int mid_entry;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2264

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2265 TRACE_FUNCTION ("cmhSMS_GetCbmiSIM ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2266

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2267 if (data NEQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2268 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2269

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2270 /* Please be aware that to keep simulation test cases as less changed as

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2271 possible lets assume that IMSI and CBMs stored in the FFS and from SIM

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2272 card are the same, since we cannot access FFS under SIMULATION*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2273 #ifndef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2274 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2275 * The CSCB parameters read from FFS should be restored only if the same SIM

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2276 * is inserted ( check IMSI to ensure the same SIM), otherwise reset the CSCB

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2277 * parameters to default values

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2278 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2279 if (memcmp (smsShrdPrm.cbmPrm.IMSI, simShrdPrm.imsi.field, simShrdPrm.imsi.c_field) NEQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2280 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2281 /* Implements Measure # 9 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2282 cmhSMS_clearCbmPrm();

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2283 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2284 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2285 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2286 mid_list = (T_ACI_CBM_SIM_MID_LIST **)&data;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2287 mid_entry = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2288

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2289 while (smsShrdPrm.cbmPrm.cbmFoundIds < MAX_IDENTS/2 AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2290 mid_entry < dataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2291 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2292 mid = (USHORT)(*mid_list)->LSB |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2293 ((USHORT)(*mid_list)->MSB << 8);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2294 data += 2; /* overcome TI alignment problem */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2295 mid_entry += 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2296

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2297 if (mid NEQ NOT_PRESENT_16BIT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2298 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2299 /* Please be aware that to keep simulation test cases as less changed as

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2300 possible lets assume that CBMs stored in the FFS and from SIM

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2301 card are the same, since we cannot access FFS under SIMULATION*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2302 #ifndef _SIMULATION_

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2303

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2304 /* Implements Measure # 73 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2305 if (!cmhSMS_findMessageIds (mid, mid))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2306 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2307 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2308 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2309

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2310 #else /* Just for simulation - copy data, received from SIM */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2311 smsShrdPrm.cbmPrm.msgId[smsShrdPrm.cbmPrm.cbmFoundIds * 2] =

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2312 smsShrdPrm.cbmPrm.msgId[smsShrdPrm.cbmPrm.cbmFoundIds * 2 + 1] = mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2313 smsShrdPrm.cbmPrm.cbmFoundIds++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2314 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2315 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2316 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2317 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2318 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2319 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2320 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2321

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2322 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2323 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2324 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2325 | STATE : code ROUTINE : cmhSMS_PutCbmiSIM |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2326 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2327

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2328 PURPOSE : This function conbines the parameters of EF(CBMI)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2329 to be written to SIM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2330 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2331 GLOBAL BOOL cmhSMS_PutCbmiSIM (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2332 UBYTE *data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2333 int maxDataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2334 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2335 T_ACI_CBM_SIM_MID_LIST **mid_list;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2336 USHORT lower_mid, upper_mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2337 UBYTE mid_entry;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2338

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2339 TRACE_FUNCTION ("cmhSMS_PutCbmiSIM ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2340

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2341 if (data NEQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2342 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2343 memset (data, NOT_PRESENT_8BIT, maxDataLen);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2344

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2345 mid_list = (T_ACI_CBM_SIM_MID_LIST **)&data;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2346 mid_entry = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2347

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2348 while (smsShrdPrm.cbmPrm.cbmFoundIds < MAX_IDENTS/2 AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2349 mid_entry < maxDataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2350 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2351 lower_mid = smsShrdPrm.cbmPrm.msgId[smsShrdPrm.cbmPrm.cbmFoundIds * 2];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2352 upper_mid = smsShrdPrm.cbmPrm.msgId[smsShrdPrm.cbmPrm.cbmFoundIds * 2 + 1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2353 smsShrdPrm.cbmPrm.cbmFoundIds++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2354

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2355 if (lower_mid NEQ NOT_PRESENT_16BIT OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2356 upper_mid NEQ NOT_PRESENT_16BIT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2357 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2358 while (lower_mid <= upper_mid AND mid_entry < maxDataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2359 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2360 (*mid_list)->LSB = (UBYTE)lower_mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2361 (*mid_list)->MSB = (UBYTE)(lower_mid >> 8);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2362 lower_mid++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2363 data += 2; /* overcome TI alignment problem */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2364 mid_entry += 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2365 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2366 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2367 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2368 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2369 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2370 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2371 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2372

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2373 #ifdef SIM_TOOLKIT

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2374

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2375 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2376 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2377 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2378 | STATE : code ROUTINE : cmhSMS_FileUpdate |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2379 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2380

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2381 PURPOSE : This function processes the primitive SIM_FILE_UPDATE_IND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2382 to update the SMS parameters stored on the SIM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2383 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2384 GLOBAL BOOL cmhSMS_FileUpdate (int ref, T_SIM_FILE_UPDATE_IND *fu)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2385 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2386 BOOL found = FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2387 int i;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2388

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2389 TRACE_FUNCTION ("cmhSMS_FileUpdate ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2390

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2391 for (i = 0; i < (int)fu->val_nr; i++)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2392 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2393 if (!found AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2394 (fu->file_info[i].v_path_info EQ TRUE AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2395 fu->file_info[i].path_info.df_level1 EQ SIM_DF_GSM AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2396 fu->file_info[i].path_info.v_df_level2 EQ FALSE AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2397 (fu->file_info[i].datafield EQ SIM_CBMI OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2398 fu->file_info[i].datafield EQ SIM_CBMIR OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2399 fu->file_info[i].datafield EQ SIM_CBMID)) OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2400

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2401 (fu->file_info[i].v_path_info EQ TRUE AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2402 fu->file_info[i].path_info.df_level1 EQ SIM_DF_TELECOM AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2403 fu->file_info[i].path_info.v_df_level2 EQ FALSE AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2404 fu->file_info[i].datafield EQ SIM_SMSP))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2405 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2406 found = TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2407 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2408 if (fu->file_info[i].v_path_info EQ TRUE AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2409 fu->file_info[i].path_info.df_level1 EQ SIM_DF_TELECOM AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2410 fu->file_info[i].path_info.v_df_level2 EQ FALSE AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2411 fu->file_info[i].datafield EQ SIM_SMS)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2412 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2413 smsShrdPrm.aci_sms_parameter.simTotal = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2414 smsShrdPrm.aci_sms_parameter.simUsed = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2415 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2416 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2417 if (found)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2418 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2419 smsShrdPrm.cbmPrm.cbmFoundIds = 0; /* new CBMI(R) */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2420

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2421 if (cmhSMS_ReadParams ((T_ACI_CMD_SRC)OWN_SRC_SAT, AT_CMD_CFUN, 1) EQ AT_EXCT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2422 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2423 smsShrdPrm.accessEnabled = FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2424

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2425 simShrdPrm.fuRef = ref;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2426 return FALSE; /* reading files */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2427 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2428 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2429 return TRUE; /* nothing to do */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2430 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2431 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2432 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2433 simShrdPrm.fuRef = -1; /* nothing to do */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2434 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2435 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2436 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2437

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2438 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2439 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2440 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2441 | STATE : code ROUTINE : cmhSMS_GetCbDtaDwnlSIM |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2442 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2443

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2444 PURPOSE : This function extracts the parameters of CBMID record of

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2445 EF(CBMID) read from SIM.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2446 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2447 GLOBAL BOOL cmhSMS_GetCbDtaDwnlSIM (T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2448 UBYTE *data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2449 int dataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2450 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2451 T_ACI_CBM_SIM_MID_LIST **mid_list;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2452 USHORT mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2453 int mid_entry;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2454

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2455 TRACE_FUNCTION ("cmhSMS_GetCbDtaDwnlSIM ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2456

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2457 if (data NEQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2458 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2459 smsShrdPrm.cbmPrm.CBDtaDwnlFoundIds = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2460 memset (smsShrdPrm.cbmPrm.CBDtaDwnlIdent, NOT_PRESENT_8BIT,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2461 sizeof (smsShrdPrm.cbmPrm.CBDtaDwnlIdent));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2462

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2463 mid_list = (T_ACI_CBM_SIM_MID_LIST **)&data;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2464 mid_entry = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2465

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2466 while (smsShrdPrm.cbmPrm.CBDtaDwnlFoundIds < MAX_IDENTS_SAT AND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2467 mid_entry < dataLen)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2468 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2469 mid = (USHORT)(*mid_list)->LSB |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2470 ((USHORT)(*mid_list)->MSB << 8);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2471 data += 2; /* overcome TI alignment problem */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2472 mid_entry += 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2473

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2474 if (mid NEQ NOT_PRESENT_16BIT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2475 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2476 smsShrdPrm.cbmPrm.CBDtaDwnlIdent[smsShrdPrm.cbmPrm.CBDtaDwnlFoundIds] = mid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2477 smsShrdPrm.cbmPrm.CBDtaDwnlFoundIds++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2478 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2479 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2480 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2481 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2482 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2483 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2484

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2485 #endif /*of SIM_TOOLKIT */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2486

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2487

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2488

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2489

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2490 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2491 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2492 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2493 | STATE : code ROUTINE : cmhSMS_decodeMsg |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2494 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2495

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2496 PURPOSE : decodes a SM in two steps

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2497

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2498 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2499 GLOBAL UBYTE* cmhSMS_decodeMsg (T_sms_sdu *sms_sdu, T_rp_addr* rp_addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2500 UBYTE vt_mti)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2501 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2502 UBYTE ccdRet;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2503 UBYTE direction;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2504 UBYTE recover_from_error;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2505

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2506 BUF_tpdu sim_buf; /* source for the second decoding */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2507

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2508 TRACE_FUNCTION("cmhSMS_decodeMsg ()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2509

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2510 if( sms_sdu->l_buf EQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2511 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2512 TRACE_EVENT("empty SDU: no decoding");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2513 return(NULL);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2514 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2515

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2516 CCD_START;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2517 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2518

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2519 MCAST( sim_pdu, SIM_PDU ); /* sim_pdu points to _decodedMsg */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2520 /*memset( sim_pdu, 0, sizeof (T_SIM_PDU) ); */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2521

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2522 /* decoding outer layer */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2523 ccdRet = ccd_decodeMsg ( CCDENT_SMS,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2524 BOTH /* doesn't work with DOWNLINK!!! */,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2525 (T_MSGBUF *) sms_sdu,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2526 (UBYTE *) _decodedMsg, /* target */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2527 SMS_VT_SIM_PDU);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2528

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2529 if ( (ccdRet NEQ ccdOK) OR (!sim_pdu->v_tpdu)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2530 OR (_decodedMsg[0] NEQ SMS_VT_SIM_PDU) )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2531 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2532 TRACE_EVENT_P1("CCD Decoding Error: %d", ccdRet);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2533 CCD_END;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2534 return NULL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2535 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2536

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2537 memcpy(rp_addr, &sim_pdu->rp_addr, sizeof(T_rp_addr) );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2538

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2539 memcpy(&sim_buf, &sim_pdu->tpdu, sizeof(BUF_tpdu) );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2540

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2541 /*memset( _decodedMsg, 0, sizeof (T_TP_SUBMIT) ); */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2542

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2543 if (vt_mti EQ SMS_VT_SUBMIT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2544 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2545 /* for decoding of SMS-SUBMIT (in response to +CMGR, +CMGL) */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2546 direction = UPLINK;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2547 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2548 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2549 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2550 direction = DOWNLINK;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2551 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2552

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2553 /* decoding inner layer */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2554 ccdRet = ccd_decodeMsg ( CCDENT_SMS,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2555 direction,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2556 (T_MSGBUF *) &sim_buf,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2557 (UBYTE *) _decodedMsg, /* target */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2558 vt_mti );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2559

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2560 if (ccdRet EQ ccdWarning)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2561 recover_from_error = TRUE; /* Try to recover if a ccdWarning occoured */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2562 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2563 recover_from_error = FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2564

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2565 if ((ccdRet EQ ccdError) OR (ccdRet EQ ccdWarning))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2566 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2567 UBYTE ccd_err;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2568 USHORT parlist [6];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2569

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2570 TRACE_EVENT_P1 ("ccd_decodeMsg(): %02x", ccdRet);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2571 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2572 * get the first error

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2573 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2574 ccd_err = ccd_getFirstError (CCDENT_SMS, parlist);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2575

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2576 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2577 * Error Handling

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2578 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2579 do

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2580 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2581 #ifndef NTRACE /* save some ROM */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2582 /* Implements Measure#32: Row 1080,...,1093 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2583 if (ccdRet EQ ccdError)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2584 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2585 TRACE_EVENT_P1 ("ERR: %u ", ccd_err);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2586 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2587 else if (ccdRet EQ ccdWarning)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2588 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2589 TRACE_EVENT_P1 ("WRN: %u ", ccd_err);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2590 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2591 switch (ccd_err)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2592 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2593 case ERR_NO_MORE_ERROR:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2594 TRACE_EVENT("the end of the error list is reached");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2595 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2596 case ERR_INVALID_CALC:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2597 TRACE_EVENT("calculation of the element repeat value failed");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2598 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2599 case ERR_PATTERN_MISMATCH:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2600 TRACE_EVENT("a bit pattern was not expected");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2601 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2602 case ERR_COMPREH_REQUIRED:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2603 TRACE_EVENT("check for comprehension required failed");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2604 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2605 case ERR_IE_NOT_EXPECTED:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2606 TRACE_EVENT("an information element was not expected");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2607 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2608 case ERR_IE_SEQUENCE:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2609 TRACE_EVENT("wrong sequence of information elements");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2610 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2611 case ERR_MAX_IE_EXCEED:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2612 TRACE_EVENT("maximum amount of repeatable information elements has exceeded");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2613 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2614 case ERR_MAX_REPEAT:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2615 TRACE_EVENT("a repeatable element occurs too often in the message");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2616 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2617 case ERR_MAND_ELEM_MISS:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2618 TRACE_EVENT("a mandatory information element is missing");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2619 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2620 case ERR_INVALID_MID:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2621 TRACE_EVENT("the message ID is not correct");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2622 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2623 case ERR_INVALID_TYPE:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2624 TRACE_EVENT("the information element is not a spare padding");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2625 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2626 case ERR_EOC_TAG_MISSING:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2627 TRACE_EVENT("indefinite length is specified for the ASN.1-BER but the end tag is missing");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2628 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2629 case ERR_INTERNAL_ERROR:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2630 TRACE_EVENT("an internal CCD error occured ");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2631 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2632 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2633 TRACE_EVENT("unknown error");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2634 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2635 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2636 #endif /* NTRACE */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2637

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2638 if (ccdRet EQ ccdWarning)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2639 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2640 switch (ccd_err)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2641 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2642 case ERR_PATTERN_MISMATCH: /* recoverable warnings */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2643 case ERR_COMPREH_REQUIRED:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2644 case ERR_INTERNAL_ERROR:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2645 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2646 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2647 recover_from_error = FALSE; /* in all other cases reset the recover flag */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2648 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2649 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2650

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2651 ccd_err = ccd_getNextError (CCDENT_SMS, parlist);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2652 }while (ccd_err NEQ ERR_NO_MORE_ERROR);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2653 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2654

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2655 if ( (ccdRet EQ ccdError) OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2656 ((ccdRet EQ ccdWarning) AND (recover_from_error EQ FALSE)) OR /* not possible to recover */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2657 (_decodedMsg[0] NEQ vt_mti) )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2658 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2659 TRACE_EVENT_P1("CCD Decoding Error Stage 2: %d", ccdRet);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2660 CCD_END;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2661 return NULL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2662 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2663 else if ((ccdRet EQ ccdWarning) AND (recover_from_error EQ TRUE))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2664 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2665 TRACE_EVENT ("recovered from warning");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2666 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2667 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2668 CCD_END;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2669

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2670 return _decodedMsg;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2671 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2672

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2673

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2674

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2675 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2676 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2677 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2678 | STATE : code ROUTINE : cmhSMS_codeMsg |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2679 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2680

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2681 PURPOSE : encodes a SM in two steps

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2682

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2683 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2684 GLOBAL void cmhSMS_codeMsg (T_sms_sdu *sms_sdu, UBYTE tp_vt_mti,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2685 T_rp_addr* sc_addr, UBYTE tp_mti,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2686 UBYTE* decoded_pdu )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2687 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2688 BUF_tpdu sim_buf; /* target for first coding */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2689 UBYTE direction;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2690

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2691 TRACE_FUNCTION ("cmhSMS_codeMsg()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2692

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2693

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2694 CCD_START;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2695 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2696 UBYTE ccdRet;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2697

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2698 MCAST( sim_pdu, SIM_PDU );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2699

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2700 /* source of outer encoding */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2701 memset( sim_pdu, 0, sizeof (T_SIM_PDU) );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2702

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2703 /* target of outer encoding */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2704 /* memset( sms_sdu, 0, sizeof (T_sms_sdu) ); */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2705 sms_sdu->o_buf = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2706 sms_sdu->l_buf = SIM_PDU_LEN << 3;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2707

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2708 sim_pdu->tp_vt_mti = SMS_VT_SIM_PDU;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2709 sim_pdu->tp_mti = tp_mti;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2710

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2711 /* service center address exists */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2712 if (sc_addr)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2713 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2714 memcpy(&sim_pdu->rp_addr, sc_addr, sizeof(T_rp_addr));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2715 sim_pdu->rp_addr.v_ton = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2716 sim_pdu->rp_addr.v_npi = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2717 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2718

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2719 /* pdu data exists */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2720 if (decoded_pdu)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2721 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2722 /* target of inner encoding */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2723 /* memset(sim_buf, 0, sizeof(BUF_tpdu)); */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2724 sim_buf.o_tpdu = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2725 //TISH modified for MSIM

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2726 //TISH: l_tpdu should be lenth of sim_buf.b_tpdu not BUF_tpdu.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2727 // sim_buf.l_tpdu = (sizeof(BUF_tpdu)) << 3;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2728 sim_buf.l_tpdu = (sizeof(sim_buf.b_tpdu)) << 3;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2729

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2730 if (tp_vt_mti EQ SMS_VT_DELIVER)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2731 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2732 /* for encoding of SMS-DELIVER (only in +CMGW) */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2733 direction = DOWNLINK;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2734 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2735 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2736 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2737 direction = UPLINK;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2738 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2739

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2740 /* encoding inner layer */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2741 ccdRet = ccd_codeMsg (CCDENT_SMS,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2742 direction,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2743 (T_MSGBUF *) &sim_buf, /* target */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2744 (UBYTE *) decoded_pdu,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2745 tp_vt_mti);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2746

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2747 if ( ccdRet NEQ ccdOK )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2748 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2749 TRACE_EVENT_P1("CCD Coding Error: %d", ccdRet);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2750 CCD_END;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2751 return;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2752 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2753 if (sim_buf.l_tpdu EQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2754 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2755 TRACE_EVENT("Encoded length is zero");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2756 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2757

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2758 memcpy(&sim_pdu->tpdu, &sim_buf, sizeof(BUF_tpdu));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2759 sim_pdu->v_tpdu = 1; /* set validy flag */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2760 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2761

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2762 /* encoding outer layer */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2763 ccdRet = ccd_codeMsg (CCDENT_SMS,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2764 UPLINK,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2765 (T_MSGBUF *) sms_sdu, /* target */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2766 (UBYTE *) sim_pdu,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2767 SMS_VT_SIM_PDU);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2768

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2769 if ( ccdRet NEQ ccdOK )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2770 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2771 TRACE_EVENT_P1("CCD Coding Error: %d", ccdRet);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2772 CCD_END;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2773 return;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2774 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2775 if (sms_sdu->l_buf EQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2776 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2777 TRACE_EVENT("Encoded length is zero");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2778 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2779 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2780 CCD_END;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2781 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2782

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2783

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2784

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2785 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2786 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2787 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2788 | STATE : code ROUTINE : cmhSMS_cpyDeliver |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2789 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2790

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2791 PURPOSE : converts a SMS-DELIVER message to the T_ACI_CMGL_SM

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2792 structure

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2793

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2794 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2795 GLOBAL BOOL cmhSMS_cpyDeliver ( T_ACI_CMGL_SM * sm, T_sms_sdu * sms_sdu )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2796 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2797 T_rp_addr rp_addr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2798 UBYTE* message;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2799 T_TP_DELIVER *sms_deliver;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2800 UBYTE alphabet;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2801

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2802 TRACE_FUNCTION("cmhSMS_cpyDeliver()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2803

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2804 message = cmhSMS_decodeMsg(sms_sdu, &rp_addr, SMS_VT_DELIVER);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2805

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2806 if (message EQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2807 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2808 sm->stat = SMS_STAT_Invalid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2809 return (FALSE);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2810 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2811

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2812 if ( message[0] NEQ SMS_VT_DELIVER)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2813 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2814 TRACE_EVENT_P1("wrong VTI = %x", message[0]);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2815 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2816

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2817 sms_deliver = (T_TP_DELIVER*)message;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2818

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2819 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2820 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2821 * process originator address

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2822 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2823 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2824 /* Implements Measure # 126 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2825 /* Since T_tp_oa and T_tp_da are of same type, there is no problem in

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2826 passing sms_deliver->tp_oa */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2827 cmhSMS_processOrigDestAddr (sm,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2828 &rp_addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2829 &sms_deliver->tp_oa);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2830

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2831 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2832 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2833 * process first octet

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2834 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2835 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2836 sm -> fo = sms_sdu->buf[sms_sdu->buf[0] + 1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2837

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2838 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2839 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2840 * process protocol identifier

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2841 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2842 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2843 sm -> pid = sms_deliver->tp_pid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2844

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2845 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2846 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2847 * process data coding scheme

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2848 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2849 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2850 sm -> dcs = sms_deliver->tp_dcs;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2851

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2852

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2853 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2854 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2855 * process short message data, expanding from 7 to 8 bit

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2856 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2857 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2858

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2859 if (sms_deliver->v_tp_ud)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2860 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2861 /* user data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2862 cmhSMS_expdSmsPp ( 0,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2863 sms_deliver->tp_dcs,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2864 sms_deliver->tp_ud.data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2865 sms_deliver->tp_ud.length,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2866 sm -> data.data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2867 &sm->data.len );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2868

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2869 sm->udh.len = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2870 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2871 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2872 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2873 alphabet = cmhSMS_getAlphabetPp ( sms_deliver->tp_dcs );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2874

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2875 /* user data header */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2876 memcpy (sm->udh.data, sms_deliver->tp_udh_inc.tp_udh.data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2877 sms_deliver->tp_udh_inc.tp_udh.c_data);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2878 sm->udh.len = sms_deliver->tp_udh_inc.tp_udh.c_data;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2879

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2880 /* user data (only user data can be 7bit data!!!) */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2881 cmhSMS_expdSmsPp ( (UBYTE)(sm->udh.len+1),

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2882 sms_deliver->tp_dcs,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2883 sms_deliver->tp_udh_inc.data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2884 sms_deliver->tp_udh_inc.length, /* ACI-SPR-9440 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2885 sm->data.data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2886 &sm->data.len );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2887

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2888 /* 7-bit data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2889 if (alphabet EQ 0x00)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2890 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2891 sm->data.len = sms_deliver->tp_udh_inc.length - ((sm->udh.len+1)*8)/7;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2892

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2893 /* minus space for the fill bits */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2894 if (((sm->udh.len+1)*8)%7 NEQ 0) sm->data.len--;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2895 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2896 /* 8-bit data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2897 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2898 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2899 sm->data.len = sms_deliver->tp_udh_inc.length-(sm->udh.len+1);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2900 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2901 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2902

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2903 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2904 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2905 * process service center time stamp

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2906 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2907 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2908 sm -> vp_rel = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2909 memset ( &sm->vp_enh, 0, sizeof(T_ACI_VP_ENH) );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2910

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2911 cmhSMS_setVpabsCmh ( &sm -> scts,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2912 (T_tp_vp_abs*) &sms_deliver->tp_scts );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2913

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2914 return (TRUE);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2915 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2916

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2917

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2918 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2919 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2920 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2921 | STATE : code ROUTINE : cmhSMS_cpySubmit |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2922 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2923

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2924 PURPOSE : converts a SMS-SUBMIT message to the T_ACI_CMGL_SM

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2925 structure

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2926

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2927 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2928 GLOBAL BOOL cmhSMS_cpySubmit ( T_ACI_CMGL_SM * sm, T_sms_sdu * sms_sdu )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2929 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2930 T_rp_addr rp_addr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2931 UBYTE* message;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2932 T_TP_SUBMIT *sms_submit;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2933 UBYTE alphabet;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2934

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2935 TRACE_FUNCTION("cmhSMS_cpySubmit()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2936

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2937 message = cmhSMS_decodeMsg(sms_sdu, &rp_addr, SMS_VT_SUBMIT);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2938

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2939 if (message EQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2940 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2941 sm->stat = SMS_STAT_Invalid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2942 return (FALSE);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2943 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2944

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2945 if ( message[0] NEQ SMS_VT_SUBMIT)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2946 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2947 TRACE_EVENT_P1("wrong VTI = %x", message[0]);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2948 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2949

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2950 sms_submit = (T_TP_SUBMIT*)message;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2951

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2952

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2953 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2954 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2955 * process recepient address

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2956 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2957 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2958 /* Implements Measure # 126 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2959 cmhSMS_processOrigDestAddr (sm,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2960 &rp_addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2961 &sms_submit->tp_da);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2962

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2963 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2964 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2965 * process first octet

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2966 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2967 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2968 sm -> fo = sms_sdu->buf[sms_sdu->buf[0] + 1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2969

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2970 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2971 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2972 * process protocol identifier

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2973 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2974 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2975 sm -> pid = sms_submit->tp_pid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2976

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2977 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2978 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2979 * process data coding scheme

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2980 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2981 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2982 sm -> dcs = sms_submit->tp_dcs;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2983

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2984 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2985 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2986 * process short message data, expanding from 7 to 8 bit

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2987 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2988 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2989

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2990 if (sms_submit->v_tp_ud)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2991 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2992 /* user data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2993 cmhSMS_expdSmsPp ( 0,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2994 sms_submit->tp_dcs,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2995 sms_submit->tp_ud.data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2996 sms_submit->tp_ud.length, /* ACI-SPR-9440 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2997 sm->data.data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2998 &sm->data.len );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2999

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3000 sm->udh.len = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3001 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3002 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3003 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3004 alphabet = cmhSMS_getAlphabetPp ( sms_submit->tp_dcs );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3005

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3006 /* user data header */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3007 memcpy (sm->udh.data, sms_submit->tp_udh_inc.tp_udh.data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3008 sms_submit->tp_udh_inc.tp_udh.c_data);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3009 sm->udh.len = sms_submit->tp_udh_inc.tp_udh.c_data;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3010

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3011 /* user data (only user data can be 7bit data!!!) */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3012 cmhSMS_expdSmsPp ( (UBYTE)(sm->udh.len+1),

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3013 sms_submit->tp_dcs,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3014 sms_submit->tp_udh_inc.data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3015 sms_submit->tp_udh_inc.length, /* ACI-SPR-9440 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3016 sm->data.data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3017 &sm->data.len );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3018

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3019 /* 7-bit data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3020 if (alphabet EQ 0x00)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3021 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3022 sm->data.len = sms_submit->tp_udh_inc.length - ((sm->udh.len+1)*8)/7;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3023

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3024 /* minus space for the fill bits */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3025 if (((sm->udh.len+1)*8)%7 NEQ 0) sm->data.len--;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3026 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3027 /* 8-bit data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3028 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3029 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3030 sm->data.len = sms_submit->tp_udh_inc.length-(sm->udh.len+1);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3031 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3032 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3033

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3034 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3035 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3036 * process validity period

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3037 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3038 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3039 if (sms_submit->v_tp_vp_abs)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3040 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3041 cmhSMS_setVpabsCmh ( &sm->scts, &sms_submit->tp_vp_abs );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3042 sm -> vp_rel = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3043 memset ( &sm->vp_enh, 0, sizeof(T_ACI_VP_ENH) );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3044 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3045 else if (sms_submit->v_tp_vp_enh)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3046 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3047 cmhSMS_setVpenhCmh ( &sm->vp_enh, &sms_submit->tp_vp_enh );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3048 sm -> vp_rel = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3049 memset ( &sm->scts, 0, sizeof(T_ACI_VP_ABS) );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3050 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3051 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3052 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3053 sm -> vp_rel = sms_submit->tp_vp_rel;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3054 memset ( &sm -> scts, 0, sizeof(T_ACI_VP_ABS) );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3055 memset ( &sm -> vp_enh, 0, sizeof(T_ACI_VP_ENH) );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3056 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3057 return (TRUE);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3058 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3059

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3060 /* Implements Measure # 110 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3061

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3062 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3063 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3064 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3065 | STATE : code ROUTINE : cmhSMS_cpyStatInd |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3066 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3067

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3068 PURPOSE : handles a status indication

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3069

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3070 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3071 GLOBAL BOOL cmhSMS_cpyStatInd ( T_ACI_CDS_SM * sm,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3072 T_MNSMS_STATUS_IND *mnsms_status_ind )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3073 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3074 T_rp_addr rp_addr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3075 UBYTE* message;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3076 T_TP_STATUS *sms_status;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3077

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3078 TRACE_FUNCTION("cmhSMS_cpyStatInd()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3079

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3080 message = cmhSMS_decodeMsg(&mnsms_status_ind->sms_sdu, &rp_addr, SMS_VT_STATUS);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3081

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3082 if (message EQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3083 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3084 return (FALSE);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3085 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3086

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3087 if ( message[0] NEQ SMS_VT_STATUS)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3088 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3089 TRACE_EVENT_P1("wrong VTI = %x", message[0]);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3090 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3091

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3092 sms_status = (T_TP_STATUS*)message;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3093

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3094

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3095 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3096 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3097 * process message type

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3098 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3099 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3100 sm -> fo = mnsms_status_ind->sms_sdu.buf[mnsms_status_ind->sms_sdu.buf[0]+1];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3101

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3102 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3103 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3104 * process message reference

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3105 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3106 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3107 sm -> msg_ref = sms_status->tp_mr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3108

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3109 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3110 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3111 * process recipient address

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3112 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3113 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3114 cmhSMS_getAdrStr ( sm->addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3115 MAX_SMS_ADDR_DIG - 1,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3116 sms_status->tp_ra.num,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3117 sms_status->tp_ra.digits);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3118

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3119 sm->toa.ton = cmhSMS_getTon ( sms_status->tp_ra.ton );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3120 sm->toa.npi = cmhSMS_getNpi ( sms_status->tp_ra.npi );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3121

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3122 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3123 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3124 * process service center time stamp

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3125 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3126 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3127 cmhSMS_setVpabsCmh ( &sm->vpabs_scts, (T_tp_vp_abs*) &sms_status->tp_scts );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3128

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3129 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3130 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3131 * process discharge time

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3132 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3133 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3134 cmhSMS_setVpabsCmh ( &sm->vpabs_dt, (T_tp_vp_abs*) &sms_status->tp_dt );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3135

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3136 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3137 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3138 * process status

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3139 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3140 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3141 sm -> tp_status = sms_status->tp_st;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3142

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3143 return (TRUE);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3144 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3145

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3146

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3147 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3148 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3149 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3150 | STATE : code ROUTINE : cmhSMS_getPhbEntry |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3151 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3152

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3153 PURPOSE : gets phone book entry from coded SM

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3154

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3155 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3156 GLOBAL void cmhSMS_getPhbEntry( UBYTE *buf,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3157 T_ACI_PB_TEXT *alpha,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3158 T_ACI_SMS_STAT status )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3159 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3160 UBYTE *p_data;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3161 UBYTE sca_len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3162 UBYTE nplan;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3163 UBYTE no_bcd;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3164 UBYTE bcd[MAX_SMS_ADDR_DIG];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3165 CHAR addr[MAX_SMS_ADDR_DIG+1]; /* for '\0' */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3166 USHORT octets;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3167

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3168 alpha->len = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3169

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3170 p_data = &buf[0];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3171 sca_len = buf[0];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3172

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3173 switch (status)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3174 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3175 case SMS_STAT_RecUnread:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3176 case SMS_STAT_RecRead:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3177 if ((*(p_data+sca_len+1) & TP_MTI_MASK) EQ TP_MTI_SMS_STATUS_REP)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3178 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3179 p_data++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3180 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3181 p_data += (sca_len+1) + 1; /* sms-deliver */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3182 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3183 case SMS_STAT_StoUnsent:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3184 case SMS_STAT_StoSent:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3185 p_data += (sca_len+1) + 2; /* sms-submit */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3186 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3187 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3188 return;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3189 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3190

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3191 /* process originator/destination address */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3192 no_bcd = *p_data++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3193 no_bcd = MINIMUM(no_bcd, MAX_SMS_ADDR_DIG);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3194

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3195 nplan = *p_data++ & 0x0F; /* npi */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3196

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3197 octets = (no_bcd+1)/2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3198

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3199 no_bcd = (UBYTE)cmh_unpackBCD (bcd, p_data, octets);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3200

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3201 if (nplan EQ 0x05) /* VO patch - if (patch) else ... */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3202 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3203 UBYTE i,j = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3204 for (i = 0 ; i < no_bcd; i=i+2)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3205 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3206 addr[j] = (UBYTE)(bcd[i+1] << 4) + (UBYTE)(bcd[i]);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3207 j++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3208 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3209 addr[j] = '\0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3210 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3211 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3212 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3213 cmhSMS_getAdrStr ( addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3214 MAX_SMS_ADDR_DIG,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3215 bcd,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3216 no_bcd );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3217 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3218

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3219 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3220 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3221 * process alphanumerical phonebook entry

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3222 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3223 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3224 psaCC_phbMfwSrchNumPlnTxt ( addr, alpha );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3225 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3226

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3227

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3228 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3229 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3230 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3231 | STATE : code ROUTINE : cmhSMS_codeDelRep |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3232 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3233

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3234 PURPOSE : codes RP-ACK for SMS-DELIVER-REPORT (without PID, DCS, UD)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3235

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3236 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3237 GLOBAL void cmhSMS_codeDelRep(T_sms_sdu *sms_sdu, T_rp_addr *sc_addr)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3238 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3239 UBYTE sca_len; /* SCA len incl. length byte and toa */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3240 UBYTE sca_buf[MAX_SMS_ADDR_DIG/2 + 2];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3241

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3242 sca_len = CodeRPAddress( sca_buf,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3243 sc_addr->c_num,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3244 sc_addr->ton,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3245 sc_addr->npi,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3246 sc_addr->num );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3247

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3248 sms_sdu->l_buf = (sca_len+2)<<3;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3249 sms_sdu->o_buf = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3250

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3251 memcpy ( sms_sdu->buf, sca_buf, sca_len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3252 memset ( sms_sdu->buf+sca_len, 0, 2);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3253 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3254

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3255

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3256 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3257 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3258 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3259 | STATE : code ROUTINE : CodeRPAddress |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3260 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3261

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3262 PURPOSE : converts address (in BCD format) to semi-octet representation

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3263 (including address-length, ton and npi),

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3264 for RP addresses (e.g SCA)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3265

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3266 returns number of octets including address-length,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3267 ton and npi

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3268

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3269 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3270 GLOBAL UBYTE CodeRPAddress( UBYTE *buf, UBYTE numDigits, UBYTE ton,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3271 UBYTE npi, UBYTE *bcd )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3272 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3273 UBYTE length;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3274

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3275 if (numDigits EQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3276 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3277 length = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3278 *buf = 0x00;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3279 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3280 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3281 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3282 *buf++ = (numDigits+1)/2 + 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3283 *buf++ = (ton << 4) + npi + 0x80;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3284

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3285 length = (UBYTE)cmh_packBCD ( buf, bcd, numDigits );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3286

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3287 /* add length of length field, ton and npi */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3288 length += 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3289 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3290

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3291 return length;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3292 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3293

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3294

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3295 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3296 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3297 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3298 | STATE : code ROUTINE : CodeTPAddress |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3299 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3300

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3301 PURPOSE : converts address (in BCD format) to semi-octet representation

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3302 (including address-length, ton and npi),

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3303 for TP addresses (e.g OA or DA)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3304

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3305 returns number of octets including including address-length,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3306 ton and npi

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3307

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3308 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3309 GLOBAL UBYTE CodeTPAddress( UBYTE *buf, UBYTE numDigits, UBYTE ton,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3310 UBYTE npi, UBYTE *bcd )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3311 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3312 UBYTE length;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3313

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3314 *buf++ = numDigits;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3315 *buf++ = (ton << 4) + npi + 0x80;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3316

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3317 length = (UBYTE)cmh_packBCD ( buf, bcd, numDigits );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3318

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3319 /* add length of length field, to and npi */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3320 length += 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3321

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3322 return length;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3323 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3324

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3325

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3326 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3327 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3328 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3329 | STATE : code ROUTINE : DecodeRPAddress |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3330 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3331

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3332 PURPOSE : converts RP address (SC address) from semi-octet

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3333 representation to address in BCD format (including

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3334 address-length, ton and npi)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3335

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3336 returns number of processed octets in buf

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3337

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3338 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3339 GLOBAL UBYTE DecodeRPAddress(UBYTE *c_num, UBYTE *ton,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3340 UBYTE *npi, UBYTE *bcd, UBYTE *buf)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3341 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3342 UBYTE sca_length; /* sca length is lenth in bytes plus TOA-octet */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3343 UBYTE processed_octets;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3344

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3345 sca_length = *buf++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3346 *ton = (*buf & 0x70)>>4;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3347 *npi = *buf++ & 0x0F;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3348

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3349 *c_num = (UBYTE)cmh_unpackBCD (bcd, buf, (USHORT)(sca_length-1));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3350

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3351 processed_octets = (*c_num+1)/2 + 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3352

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3353 return processed_octets;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3354 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3355

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3356 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3357 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3358 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3359 | STATE : code ROUTINE : DecodeTPAddress |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3360 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3361

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3362 PURPOSE : converts TP address (DA, OA)from semi-octet

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3363 representation to address in BCD format (including

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3364 address-length, ton and npi)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3365

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3366 returns number of processed octets in buf

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3367

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3368 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3369 GLOBAL UBYTE DecodeTPAddress(UBYTE *c_num, UBYTE *ton,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3370 UBYTE *npi, UBYTE *bcd, UBYTE *buf)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3371 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3372 UBYTE digits;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3373 UBYTE processed_octets;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3374

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3375 digits = *buf++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3376 *ton = (*buf & 0x70)>>4;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3377 *npi = *buf++ & 0x0F;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3378

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3379 *c_num = (UBYTE)cmh_unpackBCD (bcd, buf, (USHORT)((digits+1)/2));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3380

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3381 processed_octets = (*c_num+1)/2 + 2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3382

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3383 return processed_octets;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3384 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3385

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3386

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3387

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3388

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3389 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3390 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3391 | PROJECT : MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3392 | STATE : code ROUTINE : cmhSMS_fillTpSubmit |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3393 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3394

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3395 PURPOSE : fills a T_TP_SUBMIT

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3396

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3397 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3398 GLOBAL void cmhSMS_fillTpSubmit (T_TP_SUBMIT* tp_submit,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3399 T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3400 UBYTE msgType,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3401 UBYTE mr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3402 T_tp_da* da_addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3403 T_ACI_SM_DATA* data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3404 UBYTE septets,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3405 T_ACI_UDH_DATA* udh )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3406 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3407 T_SMS_SET_PRM * pSMSSetPrm; /* points to SMS parameter set */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3408 UBYTE alphabet;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3409

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3410 TRACE_FUNCTION ("cmhSMS_fillTpSubmit()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3411

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3412 pSMSSetPrm = smsShrdPrm.pSetPrm[srcId];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3413

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3414 memset(tp_submit, 0, sizeof(T_TP_SUBMIT));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3415

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3416 tp_submit->tp_vt_mti = SMS_VT_SUBMIT;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3417 tp_submit->tp_rp = (msgType & TP_RP_MASK) ? 1 : 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3418 tp_submit->tp_mti = SMS_SUBMIT;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3419 tp_submit->tp_mr = mr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3420 tp_submit->tp_srr = (msgType & TP_SRR_MASK) ? 1 : 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3421

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3422 if (da_addr->digits NEQ 0x00)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3423 memcpy(&tp_submit->tp_da, da_addr, sizeof(T_tp_da));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3424

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3425 tp_submit->tp_pid = pSMSSetPrm -> pid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3426 tp_submit->tp_dcs = pSMSSetPrm -> dcs;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3427

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3428 switch (msgType & VPF_MASK)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3429 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3430

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3431 case VPF_RELATIVE: /* validity period relative */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3432 tp_submit->v_tp_vp_rel = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3433 tp_submit->tp_vpf = SMS_VPF_RELATIVE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3434 tp_submit->tp_vp_rel = pSMSSetPrm -> vpRel;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3435 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3436

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3437 case VPF_ABSOLUTE: /* validity period absolute */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3438 tp_submit->v_tp_vp_abs = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3439 tp_submit->tp_vpf = SMS_VPF_ABSOLUTE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3440 memcpy(&tp_submit->tp_vp_abs, &pSMSSetPrm -> vpAbs, sizeof(T_tp_vp_abs));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3441 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3442

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3443 case VPF_ENHANCED: /* validity period enhanced */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3444 tp_submit->v_tp_vp_enh = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3445 tp_submit->tp_vpf = SMS_VPF_ENHANCED;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3446 memcpy(&tp_submit->tp_vp_enh, &pSMSSetPrm -> vpEnh, sizeof(T_tp_vp_enh));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3447 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3448

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3449 default: /* validity period not present */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3450 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3451 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3452

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3453

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3454 alphabet = cmhSMS_getAlphabetPp ( pSMSSetPrm -> dcs );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3455

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3456 if ((udh) AND (udh->len))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3457 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3458 tp_submit->tp_udhi = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3459 tp_submit->v_tp_udh_inc = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3460 tp_submit->tp_udh_inc.tp_udh.c_data = udh->len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3461 memcpy(tp_submit->tp_udh_inc.tp_udh.data, udh->data, udh->len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3462

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3463 /* copy user data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3464 if ((data) AND (data->len))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3465 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3466 tp_submit->tp_udh_inc.c_data = data->len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3467 memcpy(tp_submit->tp_udh_inc.data, data->data, data->len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3468 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3469

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3470 /* 7-bit data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3471 if (alphabet EQ 0x00)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3472 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3473 tp_submit->tp_udh_inc.length = septets + (((udh->len+1)*8)/7);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3474

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3475 /* space for the fill bits */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3476 if (((udh->len+1)*8)%7 NEQ 0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3477 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3478 tp_submit->tp_udh_inc.length++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3479 if ((data EQ NULL) OR (data->len EQ 0))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3480 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3481 tp_submit->tp_udh_inc.c_data = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3482 tp_submit->tp_udh_inc.data[0] = 0; /* redundant */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3483 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3484 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3485 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3486 /* 8-bit data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3487 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3488 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3489 tp_submit->tp_udh_inc.length = tp_submit->tp_udh_inc.c_data+udh->len+1; /* UDH length should be also added */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3490 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3491 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3492 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3493 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3494 /* validity flag set for both normal SMS and empty SMS */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3495 tp_submit->v_tp_ud = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3496

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3497 if ((data) AND (data->len))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3498 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3499 tp_submit->tp_ud.length = septets;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3500 tp_submit->tp_ud.c_data = data->len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3501 memcpy(tp_submit->tp_ud.data, data->data, data->len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3502 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3503 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3504 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3505 /* enters when zero character SMS to be sent */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3506 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3507 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3508 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3509

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3510

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3511

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3512 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3513 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3514 | PROJECT : MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3515 | STATE : code ROUTINE : cmhSMS_fillTpDeliver |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3516 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3517

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3518 PURPOSE : fills a T_TP_DELIVER (only used by +CMGW)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3519

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3520 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3521 GLOBAL void cmhSMS_fillTpDeliver (T_TP_DELIVER* tp_deliver,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3522 T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3523 UBYTE msgType,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3524 T_tp_oa* oa_addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3525 T_ACI_SM_DATA* data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3526 UBYTE septets,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3527 T_ACI_UDH_DATA* udh )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3528 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3529 T_SMS_SET_PRM * pSMSSetPrm; /* points to SMS parameter set */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3530 UBYTE alphabet;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3531

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3532 TRACE_FUNCTION ("cmhSMS_fillTpDeliver()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3533

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3534 pSMSSetPrm = smsShrdPrm.pSetPrm[srcId];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3535

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3536 memset(tp_deliver, 0, sizeof(T_TP_DELIVER));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3537

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3538 tp_deliver->tp_vt_mti = SMS_VT_DELIVER;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3539 tp_deliver->tp_rp = (msgType & TP_RP_MASK) ? 1 : 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3540 tp_deliver->tp_mti = SMS_DELIVER;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3541

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3542 if (oa_addr->digits NEQ 0x00)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3543 memcpy(&tp_deliver->tp_oa, oa_addr, sizeof(T_tp_oa));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3544

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3545 tp_deliver->tp_pid = pSMSSetPrm -> pid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3546 tp_deliver->tp_dcs = pSMSSetPrm -> dcs;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3547

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3548 memcpy(&tp_deliver->tp_scts, &pSMSSetPrm -> vpAbs, sizeof(T_tp_scts));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3549

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3550 if ((data) AND (data->len))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3551 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3552 alphabet = cmhSMS_getAlphabetPp ( pSMSSetPrm -> dcs );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3553

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3554 if ((udh) AND (udh->len))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3555 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3556 tp_deliver->tp_udhi = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3557 tp_deliver->v_tp_udh_inc = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3558 tp_deliver->tp_udh_inc.tp_udh.c_data = udh->len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3559 memcpy(tp_deliver->tp_udh_inc.tp_udh.data, udh->data, udh->len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3560

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3561 /* copy user data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3562 tp_deliver->tp_udh_inc.c_data = data->len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3563 memcpy(tp_deliver->tp_udh_inc.data, data->data, data->len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3564

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3565 /* 7-bit data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3566 if (alphabet EQ 0x00)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3567 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3568 tp_deliver->tp_udh_inc.length = septets + (((udh->len+1)*8)/7);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3569

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3570 /* space for the fill bits */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3571 if (((udh->len+1)*8)%7 NEQ 0) tp_deliver->tp_udh_inc.length++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3572 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3573 /* 8-bit data */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3574 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3575 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3576 tp_deliver->tp_udh_inc.length = tp_deliver->tp_udh_inc.c_data;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3577 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3578 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3579 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3580 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3581 tp_deliver->v_tp_ud = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3582 tp_deliver->tp_ud.length = septets;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3583 tp_deliver->tp_ud.c_data = data->len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3584 memcpy(tp_deliver->tp_ud.data, data->data, data->len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3585 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3586 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3587 else /* if ((data) AND (data->len)) */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3588 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3589 tp_deliver->v_tp_ud = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3590 tp_deliver->tp_ud.length = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3591 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3592 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3593

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3594

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3595 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3596 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3597 | PROJECT : MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3598 | STATE : code ROUTINE : cmhSMS_fillTpCommand |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3599 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3600

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3601 PURPOSE : fills a T_TP_COMMAND

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3602

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3603 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3604 GLOBAL void cmhSMS_fillTpCommand ( T_TP_COMMAND* tp_command,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3605 UBYTE fo,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3606 UBYTE ct,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3607 UBYTE mr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3608 UBYTE pid,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3609 UBYTE mn,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3610 T_tp_da* da_addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3611 T_ACI_CMD_DATA* data,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3612 T_ACI_UDH_DATA* udh)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3613

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3614 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3615 TRACE_FUNCTION ("cmhSMS_fillTpCommand()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3616

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3617 memset(tp_command, 0, sizeof(T_TP_COMMAND));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3618

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3619 tp_command->tp_vt_mti = SMS_VT_COMMAND;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3620 tp_command->tp_srr = (fo & TP_SRR_MASK) ? 1 : 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3621 tp_command->tp_mti = SMS_COMMAND;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3622 tp_command->tp_mr = mr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3623 tp_command->tp_pid = pid;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3624 tp_command->tp_ct = ct;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3625 tp_command->tp_mn = mn;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3626

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3627 if (da_addr->digits NEQ 0x00)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3628 memcpy(&tp_command->tp_da, da_addr, sizeof(T_tp_da));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3629

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3630 if ((data) AND (data->len))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3631 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3632 if ((udh) AND (udh->len))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3633 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3634 tp_command->tp_udhi = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3635 tp_command->v_tp_cdh_inc = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3636 tp_command->tp_cdh_inc.tp_udh.c_data = udh->len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3637 memcpy(tp_command->tp_cdh_inc.tp_udh.data, udh->data, udh->len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3638 tp_command->tp_cdh_inc.c_data = data->len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3639 memcpy(tp_command->tp_cdh_inc.data, data->data, data->len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3640 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3641 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3642 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3643 tp_command->v_tp_cd = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3644 tp_command->tp_cd.c_data = data->len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3645 memcpy(tp_command->tp_cd.data, data->data, data->len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3646 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3647 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3648 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3649 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3650 /* command length field must be present */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3651 tp_command->v_tp_cd = 1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3652 tp_command->tp_cd.c_data = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3653 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3654

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3655 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3656 #ifdef FF_CPHS

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3657

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3658 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3659 +----------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3660 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3661 | ROUTINE : cmhSMS_check_voice_mail_ind|

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3662 +----------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3663

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3664 PURPOSE :

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3665 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3666

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3667 LOCAL BOOL cmhSMS_check_voice_mail_ind( T_TP_DELIVER *sms_deliver )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3668 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3669 TRACE_FUNCTION("cmhSMS_check_voice_mail_ind()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3670

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3671 if ( sms_deliver->tp_oa.digits NEQ 4 OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3672 sms_deliver->tp_oa.ton NEQ SMS_TON_ALPHANUMERIC )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3673 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3674 TRACE_EVENT_P2("no vmi -> oa... digits:%d ton:%d",

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3675 sms_deliver->tp_oa.digits, sms_deliver->tp_oa.ton);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3676 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3677 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3678

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3679 switch (sms_deliver->tp_dcs & 0xF0)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3680 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3681 case SMS_DCS_GRP_DEF:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3682 case SMS_DCS_GRP_CLASS:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3683 if ( (sms_deliver->tp_dcs & 0xF) EQ 0 OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3684 (sms_deliver->tp_dcs & 0xF) EQ 0xC )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3685 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3686 break; /* GSM Default Alphabet */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3687 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3688 /* no break, if FALSE */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3689 /*lint -fallthrough*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3690 case SMS_DCS_GRP_COMPR:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3691 case SMS_DCS_GRP_CLASS_COMPR:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3692 case SMS_DCS_GRP_MW_STORE_UCS2:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3693 TRACE_EVENT_P1("no vmi -> dcs: %d", sms_deliver->tp_dcs);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3694 return FALSE; /* no GSM Default Alphabet */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3695 case SMS_DCS_DATA_CLASS:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3696 if (sms_deliver->tp_dcs & 0x4)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3697 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3698 TRACE_EVENT_P1("no vmi -> dcs: %d", sms_deliver->tp_dcs);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3699 return FALSE; /* no GSM Default Alphabet */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3700 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3701 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3702

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3703 if (!sms_deliver->v_tp_ud)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3704 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3705 TRACE_EVENT("no vmi -> no ud");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3706 return FALSE; /* not only text present */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3707 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3708 if ( ( sms_deliver->tp_ud.length NEQ 1 ) OR

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3709 ( (sms_deliver->tp_ud.data[0] & 0x7F) NEQ ' ') )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3710 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3711 TRACE_EVENT_P2("no vmi -> ud... length:%d data[0]:%d",

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3712 sms_deliver->tp_ud.length, sms_deliver->tp_ud.data[0]);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3713 return FALSE; /* no single space */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3714 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3715

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3716 TRACE_FUNCTION ("CPHS VWI: send to cphs module");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3717

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3718 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3719 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3720

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3721

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3722 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3723 +-------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3724 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3725 | ROUTINE : cmhSMS_voice_mail_ind_get_line|

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3726 +-------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3727

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3728 PURPOSE :

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3729 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3730 LOCAL void cmhSMS_voice_mail_ind_get_data( T_TP_DELIVER *sms_deliver,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3731 UBYTE *flag_set,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3732 T_CPHS_LINES *line )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3733 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3734 TRACE_FUNCTION("cmhSMS_voice_mail_ind_get_line()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3735

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3736 /* get flag set, which is send in the first bit of the first

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3737 byte of the originating address number. Due to the decoding

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3738 each byte of the originating address number is now splitted

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3739 into 2 bytes, so that the first 4 bits of the former first

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3740 byte can be found in byte 1 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3741 *flag_set = sms_deliver->tp_oa.num[0] & 0x1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3742

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3743 /* line is coded in character 1 bit 1 of second byte of GSM originating

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3744 address based on 7bit default alphabet. In the message indication we

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3745 get the data in the last bit of the first byte of the orginating address.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3746 Due to the decoding each byte of the originating address number is now

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3747 splitted into 2 bytes, so that the last 4 bits of the former first

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3748 byte can be found in byte 2 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3749

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3750 if (sms_deliver->tp_oa.num[1] & 0x8)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3751

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3752 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3753 *line = CPHS_LINE2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3754 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3755 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3756 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3757 *line = CPHS_LINE1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3758 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3759 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3760

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3761

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3762 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3763 +----------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3764 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3765 | ROUTINE : cmhSMS_voice_mail_ind |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3766 +----------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3767

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3768 PURPOSE :

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3769 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3770

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3771 GLOBAL BOOL cmhSMS_voice_mail_ind( T_sms_sdu *sms_sdu)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3772 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3773 T_TP_DELIVER *sms_deliver;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3774 T_rp_addr rp_addr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3775 T_CPHS_LINES line;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3776 UBYTE flag_set;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3777 UBYTE *message;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3778

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3779 TRACE_FUNCTION("cmhSMS_voice_mail_ind()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3780

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3781 /* check if cphs is active */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3782

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3783

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3784 /* check if indication is voice mail indication */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3785 if ( sms_sdu )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3786 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3787 message = cmhSMS_decodeMsg(sms_sdu, &rp_addr, SMS_VT_DELIVER);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3788

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3789 if (message EQ NULL)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3790 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3791

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3792 if ( message[0] NEQ SMS_VT_DELIVER)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3793 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3794 TRACE_EVENT_P1("wrong VTI = %x", message[0]);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3795 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3796

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3797 sms_deliver = (T_TP_DELIVER*)message;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3798

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3799 if ( cphs_check_status() EQ CPHS_OK )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3800 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3801 if ( cmhSMS_check_voice_mail_ind(sms_deliver) )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3802 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3803 cmhSMS_voice_mail_ind_get_data(sms_deliver, &flag_set, &line);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3804

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3805 cphs_voice_mail_ind(flag_set, line);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3806

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3807 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3808 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3809 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3810 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3811 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3812 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3813

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3814 #endif /* FF_CPHS*/

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3815

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3816

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3817 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3818 +----------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3819 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3820 | ROUTINE : cmhSMS_resetMtDsCnmiParam |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3821 +----------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3822 PURPOSE : this function resets the <mt> and <ds> parameter for the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3823 SMS acknowledge in Phase2+ mode (+CNMA).

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3824 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3825 GLOBAL void cmhSMS_resetMtDsCnmiParam(void)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3826 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3827 smsShrdPrm.mtHndl = 0; /* reset <mt> and <ds> param in error case */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3828 smsShrdPrm.srHndl = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3829

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3830 smsShrdPrm.CNMImt = CNMI_MT_NoSmsDeliverInd;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3831 smsShrdPrm.CNMIds = CNMI_DS_NoSmsStatRpt;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3832 /* Implements measure 149 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3833 cmhSMS_sendConfigureReq (FALSE);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3834 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3835

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3836 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3837 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3838 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSS |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3839 | STATE : code ROUTINE : sAT_PlusCMGWPdu |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3840 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3841

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3842 PURPOSE : This is the internal function which is responsible for

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3843 storing messages into the mobile station or SIM card.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3844 AT command which is responsible for writing a short

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3845 message to memory in PDU mode.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3846 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3847 GLOBAL BOOL cmhSMS_storePduToSim( T_ACI_CMD_SRC srcId,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3848 UBYTE stat,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3849 T_ACI_SM_DATA *pdu )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3850 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3851 T_ACI_RETURN ret;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3852

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3853 TRACE_FUNCTION ("cmhSMS_storePduToSim()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3854

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3855 /* check if command executable */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3856 if(!cmhSMS_checkAccess (srcId, &ret))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3857 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3858 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3859 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3860

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3861 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3862 PALLOC (mnsms_store_req, MNSMS_STORE_REQ);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3863

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3864 mnsms_store_req -> mem_type = smsShrdPrm.mem2;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3865 mnsms_store_req -> rec_num = CMGW_IDX_FREE_ENTRY;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3866 mnsms_store_req -> condx = SMS_CONDX_OVR_NON;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3867 mnsms_store_req -> status = stat;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3868

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3869 if ( (pdu->len > 0) AND (pdu->len <= SIM_PDU_LEN) )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3870 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3871 mnsms_store_req->sms_sdu.l_buf = pdu->len * 8;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3872 mnsms_store_req->sms_sdu.o_buf = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3873 memcpy (mnsms_store_req->sms_sdu.buf, pdu->data, pdu->len);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3874 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3875 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3876 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3877 TRACE_FUNCTION ("cmhSMS_storePduToSim() : wrong PDU len");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3878 PFREE (mnsms_store_req);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3879 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3880 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3881

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3882 PSENDX (SMS, mnsms_store_req);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3883 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3884

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3885 smsShrdPrm.smsEntStat.curCmd = AT_CMD_CMGW;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3886 smsShrdPrm.owner = (T_OWN)srcId;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3887 smsShrdPrm.smsEntStat.entOwn = srcId;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3888 smsShrdPrm.uiInternalSmsStorage = srcId;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3889

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3890 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3891 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3892

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3893 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3894 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3895 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3896 | STATE : code ROUTINE : cmhSMS_removeStatusRFUBits |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3897 +--------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3898

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3899 PURPOSE : ACI-SPR-17004: Method for removing of SMS RFU status

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3900 bits as defined by GSM 11.11 section 9.3

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3901

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3902 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3903 GLOBAL void cmhSMS_removeStatusRFUBits ( UBYTE* status )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3904 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3905 TRACE_FUNCTION("cmhSMS_removeStatusRFUBits()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3906

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3907 /* See GSM 11.11 section 10.5.3 for position of RFU bits in status */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3908

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3909 /* test the pattern of the three lowest bits, match for "101" */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3910 if ((*status & 0x07) EQ 0x05)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3911 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3912 /* set the highest three bits to 0 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3913 *status &= 0x1F;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3914 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3915 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3916 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3917 /* set the highest five bits to 0 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3918 *status &= 0x07;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3919 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3920

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3921 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3922

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3923 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3924 +-------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3925 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3926 | STATE : code ROUTINE : cmhSMS_convertDeliverStatusToACI|

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3927 +-------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3928

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3929 PURPOSE : converts the SMS delivery status to ACI CPRSM status.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3930

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3931 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3932 GLOBAL T_ACI_CPRSM_MOD cmhSMS_convertDeliverStatusToACI ( UBYTE status )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3933 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3934 T_ACI_CPRSM_MOD mode;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3935

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3936 TRACE_FUNCTION("cmhSMS_convertDeliverStatusToACI()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3937

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3938 switch (status)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3939 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3940 case SMS_DELIVER_STATUS_PAUSE:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3941 mode = CPRSM_MOD_Pause;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3942 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3943 case SMS_DELIVER_STATUS_RESUME:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3944 mode = CPRSM_MOD_Resume;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3945 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3946 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3947 mode = CPRSM_MOD_NotPresent;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3948 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3949 return mode;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3950 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3951

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3952 #ifdef FF_CPHS_REL4

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3953 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3954 +-------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3955 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3956 | STATE : code ROUTINE : cmhSMS_chk_WtngInd |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3957 +-------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3958

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3959 PURPOSE : This function expect an already decoded SMS in the T_TP_DELIVER

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3960 format and checks if it is a "special SMS" (refer to TS 23.040,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3961 chpt. 9.2.3.24.2).

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3962

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3963 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3964 LOCAL BOOL cmhSMS_chk_WtngInd( T_TP_DELIVER *pSms )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3965 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3966

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3967 TRACE_FUNCTION("cmhSMS_chk_WtngInd");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3968 return ( (pSms->tp_udhi) AND /* it is an UDH message */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3969 (pSms->v_tp_udh_inc) AND /* UDH successfuly decoded */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3970 (pSms->tp_udh_inc.tp_udh.c_data >= 4) AND /* min len of special SMS */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3971 (pSms->tp_udh_inc.tp_udh.data[0] EQ 0x01)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3972 );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3973 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3974

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3975

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3976 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3977 +-------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3978 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3979 | STATE : code ROUTINE : cmhSMS_chk_SpclMsg |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3980 +-------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3981

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3982 PURPOSE : This function checks if the received SMS is a special sms which

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3983 indicates the message waiting status.If so,the message will be processed

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3984 and TRUE will be returned,indicating that the message was already handled.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3985 If it is no special message , the function will returns FALSE causing the

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3986 SMS to be treated in the common way.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3987

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3988 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3989

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3990 GLOBAL BOOL cmhSMS_chk_SpclMsg( T_MNSMS_MESSAGE_IND *mnsms_message_ind )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3991 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3992 BOOL res = FALSE ;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3993 T_MSG_WAITING_TYPE msgType = MSG_WAITING_TYPE_INVALID;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3994 U8 *ptr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3995 T_TP_DELIVER *smDlvr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3996

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3997 TRACE_FUNCTION( "cmhSMS_chk_SpclMsg()" );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3998

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3999 if(!psaSIM_ChkSIMSrvSup( SRV_No_54 ))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4000 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4001 return res;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4002 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4003

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4004 if (&mnsms_message_ind->sms_sdu)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4005 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4006 T_rp_addr rpAddr;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4007 UBYTE *pMsg;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4008

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4009 pMsg = cmhSMS_decodeMsg( &mnsms_message_ind->sms_sdu, &rpAddr, SMS_VT_DELIVER );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4010 smDlvr = (T_TP_DELIVER *)pMsg;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4011

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4012 if (pMsg)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4013 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4014 if (pMsg[0] NEQ SMS_VT_DELIVER)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4015 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4016 TRACE_EVENT_P1( "wrong VTI = %x", (int)pMsg[0] );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4017 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4018

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4019 /* Check the reqired fields in the SMS to qaulify for Special Message */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4020

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4021 if (cmhSMS_chk_WtngInd( smDlvr ))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4022 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4023

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4024 /* For Loop: Decode the SMS properly as ,more than one type of message

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4025 can be indicated within one SMS message. A varible for

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4026 tp_udh_inc.tp_udh.data has been avoided , therefore For loop

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4027 seems to be lengthy,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4028 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4029 for( ptr = smDlvr->tp_udh_inc.tp_udh.data ;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4030 ptr < &smDlvr->tp_udh_inc.tp_udh.data[smDlvr->tp_udh_inc.tp_udh.c_data ];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4031 ptr +=(ptr[1] + 2 ))

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4032 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4033 /* Filling the Message Type */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4034

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4035 msgType = (ptr[2] & 0x03); /* see TS 23.040 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4036

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4037 /* Update Status field in EF-MWIS according to the values already

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4038 present in the SIM and the current values in the recieved SMS.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4039 Also if the count for any type of Special SMS is ZERO then

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4040 also update the status.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4041 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4042 if( (!(smsShrdPrm.MWISdata.mwiStat >> msgType & 1U)) OR (ptr[3] EQ 0) )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4043 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4044 smsShrdPrm.MWISdata.mwiStat ^= 1U << msgType;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4045 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4046

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4047 /* Filling the count for specfic type of SMS */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4048

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4049 switch ( msgType )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4050 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4051 case MSG_WAITING_TYPE_VOICE :

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4052 smsShrdPrm.MWISdata.mwis_count_voice = ptr[3];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4053 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4054 case MSG_WAITING_TYPE_FAX :

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4055 smsShrdPrm.MWISdata.mwis_count_fax = ptr[3];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4056 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4057 case MSG_WAITING_TYPE_EMAIL :

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4058 smsShrdPrm.MWISdata.mwis_count_email = ptr[3];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4059 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4060 case MSG_WAITING_TYPE_OTHER :

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4061 smsShrdPrm.MWISdata.mwis_count_other = ptr[3];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4062 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4063 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4064 TRACE_EVENT("INVALID MESSAGE TYPE");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4065 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4066 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4067 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4068

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4069 /* Writing decoded data to EF-MWIS */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4070

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4071 if(cmhSIM_WrMwis(CMD_SRC_NONE,MWIS_MOD_Write,1,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4072 &smsShrdPrm.MWISdata) NEQ AT_EXCT )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4073 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4074 TRACE_EVENT(" Error in Sending the Sim Update Request ");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4075 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4076

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4077 /* If message was stored we need to indicate this, too */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4078

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4079 if (mnsms_message_ind->rec_num NEQ SMS_RECORD_NOT_EXIST)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4080 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4081 cmhSMS_SMSMemory( mnsms_message_ind );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4082 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4083 res = TRUE; /* message processed, nothing left to do */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4084 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4085 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4086 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4087 return res;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4088 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4089 #endif

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4090 /* Implements Measure # 73 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4091

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4092 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4093 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4094 | PROJECT : GSM-PS (6147) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4095 | ROUTINE : cmhSMS_findMessageIds |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4096 +-------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4097 PARAMETERS : lower_mid - lower message id

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4098 upper_mid - upper message id

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4099 RETURN : TRUE if message has been found, else FALSE

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4100

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4101 PURPOSE : Find message ids based on the mids given as parameters and

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4102 update smsShrdPrm.cbmPrm.cbmFoundIds based on the same.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4103

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4104 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4105 LOCAL BOOL cmhSMS_findMessageIds (USHORT lower_mid, USHORT upper_mid)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4106 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4107 TRACE_FUNCTION("cmhSMS_findMessageIds()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4108 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4109 * If the msg ids are same that in FFS and SIM, then restore else reset

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4110 * to default values

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4111 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4112 if (smsShrdPrm.cbmPrm.msgId[smsShrdPrm.cbmPrm.cbmFoundIds * 2] EQ lower_mid

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4113 AND smsShrdPrm.cbmPrm.msgId[smsShrdPrm.cbmPrm.cbmFoundIds * 2 + 1] EQ upper_mid)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4114 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4115 smsShrdPrm.cbmPrm.cbmFoundIds++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4116 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4117 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4118 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4119 cmhSMS_clearCbmPrm();

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4120 return FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4121 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4122 return TRUE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4123 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4124

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4125 /* Implements Measure # 126 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4126 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4127 +---------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4128 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4129 | STATE : code ROUTINE : cmhSMS_processOrigDestAddr|

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4130 +---------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4131 PARAMETERS : sm - Structure into which the data is filled.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4132 rp_addr - RP Address used for filling sm

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4133 tp_addr - destination or origination address that has to be

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4134 filled in sm

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4135 RETURN : None

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4136

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4137 PURPOSE : Processes originator address and converts it into 8 bit or string

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4138 format as requried

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4139

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4140 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4141 LOCAL void cmhSMS_processOrigDestAddr (T_ACI_CMGL_SM *sm,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4142 T_rp_addr *rp_addr,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4143 T_tp_da *tp_addr)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4144 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4145 TRACE_FUNCTION("cmhSMS_processOrigDestAddr()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4146 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4147 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4148 * process address

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4149 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4150 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4151 if (tp_addr->ton EQ SMS_TON_ALPHANUMERIC)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4152 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4153 UBYTE i,j = 0;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4154 UBYTE dest_len;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4155 CHAR address_buf[MAX_SMS_ADDR_DIG/2];

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4156

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4157 for (i = 0 ; i < tp_addr->digits ; i=i+2)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4158 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4159 address_buf[j] = (UBYTE)(tp_addr->num[i+1] << 4) + (UBYTE)(tp_addr->num[i]);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4160 j++;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4161 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4162

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4163 if( tp_addr->digits % 2 )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4164 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4165 address_buf[j-1] = address_buf[j-1] & 0x0f;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4166 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4167

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4168 dest_len = utl_cvt7To8 ( (UBYTE*)address_buf, j, (UBYTE*)sm->adress, 0);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4169 sm -> adress[dest_len] = '\0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4170

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4171 if( (tp_addr->digits % 2) AND (dest_len + 3) % 8 >= 4 )

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4172 sm -> adress[dest_len--] = '\0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4173 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4174 sm -> adress[dest_len] = '\0';

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4175

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4176 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4177 else

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4178 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4179 cmhSMS_getAdrStr ( sm -> adress,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4180 MAX_SMS_NUM_LEN - 1,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4181 tp_addr->num,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4182 tp_addr->digits );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4183 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4184 sm -> toa.ton = cmhSMS_getTon ( tp_addr->ton );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4185 sm -> toa.npi = cmhSMS_getNpi ( tp_addr->npi );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4186 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4187 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4188 * process service center address

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4189 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4190 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4191 cmhSMS_getAdrStr ( sm -> sca,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4192 MAX_SMS_NUM_LEN - 1,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4193 rp_addr->num,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4194 rp_addr->c_num);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4195

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4196 sm -> tosca.ton = cmhSMS_getTon ( rp_addr->ton );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4197 sm -> tosca.npi = cmhSMS_getNpi ( rp_addr->npi );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4198

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4199 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4200 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4201 * process alphanumerical phonebook entry

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4202 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4203 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4204 psaCC_phbMfwSrchNumPlnTxt ( sm -> adress, &sm -> alpha );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4205 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4206

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4207 /* Implements Measure # 149 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4208 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4209 +---------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4210 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4211 | STATE : code ROUTINE : cmhSMS_sendConfigureReq |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4212 +---------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4213 PARAMETERS : v_cmms_val - Set to TRUE if cmms_mode and tmms_val has to be

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4214 filled.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4215 RETURN : None

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4216

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4217 PURPOSE : Sends mnsms_configure_req to inform the SMS entity

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4218 about the parameter changes. v_cmms_val is TRUE if cmms_mode and

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4219 tmms_val has to be filled.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4220

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4221 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4222 GLOBAL void cmhSMS_sendConfigureReq (BOOL v_cmms_val)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4223 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4224 TRACE_FUNCTION("cmhSMS_sendConfigureReq()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4225 { /* inform the SMS entity about the parameter changes */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4226 PALLOC (mnsms_configure_req, MNSMS_CONFIGURE_REQ);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4227

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4228 /* fill in primitive parameter: command request */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4229 mnsms_configure_req -> pref_mem_3 = smsShrdPrm.mem3;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4230 mnsms_configure_req -> mt = smsShrdPrm.mtHndl;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4231 mnsms_configure_req -> ds = smsShrdPrm.srHndl;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4232 mnsms_configure_req -> mhc = (smsShrdPrm.CSMSservice NEQ CSMS_SERV_GsmPh2Plus)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4233 ? SMS_MHC_PH2 : SMS_MHC_PH2PLUS;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4234 mnsms_configure_req->v_cmms_mode = mnsms_configure_req->v_tmms_val =

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4235 v_cmms_val;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4236 if(v_cmms_val)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4237 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4238 mnsms_configure_req -> cmms_mode = smsShrdPrm.CMMSmode;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4239 mnsms_configure_req->tmms_val = CMMS_MODE_TIMER_VAL;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4240 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4241

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4242 PSENDX (SMS, mnsms_configure_req);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4243 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4244 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4245

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4246 /* Implements Measure # 110 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4247 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4248 +---------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4249 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4250 | STATE : code ROUTINE : cmhSMS_cpyMsgIndReadCnf |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4251 +---------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4252 PARAMETERS : sm - Structure into which the data is filled.

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4253 status - SMS record status

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4254 sms_sdu - SMS SDU from which data has to be filled in sm

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4255 rec_num - Record number of the SMS

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4256 RETURN : BOOL value indicating the status returned by cmhSMS_cpyDeliver

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4257 or cmhSMS_cpySubmit

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4258

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4259 PURPOSE : handles a message indication or a read cnf

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4260

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4261 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4262 GLOBAL BOOL cmhSMS_cpyMsgIndReadCnf (T_ACI_CMGL_SM * sm,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4263 UBYTE *status,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4264 T_sms_sdu *sms_sdu,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4265 UBYTE rec_num)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4266 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4267 BOOL ret = FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4268 TRACE_FUNCTION("cmhSMS_cpyMsgIndReadCnf()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4269

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4270 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4271 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4272 * decode SMS-DELIVER or SMS-SUBMIT

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4273 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4274 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4275

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4276 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4277 * ACI-SPR-17004: set RFU bits of status to 0 if present since these

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4278 * should be ignored in a GSM session (GSM 11.11 section 9.3)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4279 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4280 cmhSMS_removeStatusRFUBits( status );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4281

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4282 switch (*status)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4283 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4284 case SMS_RECORD_REC_UNREAD:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4285 case SMS_RECORD_REC_READ:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4286 ret = cmhSMS_cpyDeliver ( sm, sms_sdu );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4287 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4288 case SMS_RECORD_STO_UNSENT:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4289 case SMS_RECORD_STO_SENT:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4290 /* ACI-SPR-17003: Handle unsupported statuses */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4291 case SMS_RECORD_STAT_UNRCVD:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4292 case SMS_RECORD_STAT_UNSTRD:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4293 case SMS_RECORD_STAT_STRD:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4294 ret = cmhSMS_cpySubmit ( sm, sms_sdu );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4295 break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4296 /* 21.Mar.2003 currently not used by SMS entity */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4297 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4298 * case SMS_RECORD_INVALID:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4299 * ret = FALSE;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4300 * break;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4301 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4302 default:

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4303 TRACE_EVENT("incorrect status");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4304 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4305

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4306 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4307 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4308 * process status (convert from PSA type to CMH type)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4309 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4310 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4311 if (sm->stat NEQ SMS_STAT_Invalid)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4312 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4313 cmhSMS_getStatCmh ( *status, &sm -> stat );

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4314 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4315

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4316 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4317 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4318 * process message reference

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4319 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4320 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4321 sm -> msg_ref = rec_num;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4322

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4323 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4324 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4325 * process tp_status

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4326 *-----------------------------------------------------------------

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4327 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4328 sm ->tp_status = (UBYTE) -1;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4329

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4330 return (ret);

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4331 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4332

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4333 /* Implements Measure # 9 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4334 /*

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4335 +---------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4336 | PROJECT : GSM-F&D (8411) MODULE : CMH_SMSF |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4337 | STATE : code ROUTINE : cmhSMS_clearCbmPrm |

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4338 +---------------------------------------------------------------------------+

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4339 PARAMETERS : None

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4340 RETURN : None

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4341

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4342 PURPOSE : Resets smsShrdPrm.cbmPrm to default values

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4343

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4344 */

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4345 LOCAL void cmhSMS_clearCbmPrm (void)

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4346 {

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4347 TRACE_FUNCTION("cmhSMS_clearCbmPrm()");

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4348

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4349 smsShrdPrm.cbmPrm.cbmMode = CBCH_ACCEPT;

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4350 memset (smsShrdPrm.cbmPrm.msgId, DEF_MID_RANGE,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4351 sizeof (smsShrdPrm.cbmPrm.msgId));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4352 memset (smsShrdPrm.cbmPrm.dcsId, DEF_DCS_RANGE,

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4353 sizeof(smsShrdPrm.cbmPrm.dcsId));

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4354 }

53929b40109c src/g23m-aci: initial import from TCS3.2/LoCosto

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4355 /*==== EOF ========================================================*/

FreeCalypso > hg > fc-magnetite

annotate src/g23m-aci/aci/cmh_smsf.c @ 537:3575e65c059e