fc-magnetite: src/aci2/aci/cphs.c annotate

author	Mychaela Falconia <falcon@freecalypso.org>
date	Tue, 11 Oct 2016 03:11:27 +0000 (2016-10-11)
parents	93999a60b835
children

rev	line source
3 93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2 +--------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	3 \| PROJECT: $Workfile:: cphs.c $\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4 \| $Author:: $Revision:: $\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	5 \| CREATED: $Modtime:: $\|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6 \| STATE : code \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 +--------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	8
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	9 MODULE : CPHS
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11 PURPOSE : This module contains the CPHS functionalities.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	12 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	13
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	14 #ifdef FF_CPHS
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	15
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	16 #ifndef CPHS_C
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	17 #define CPHS_C
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	18
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	19 /* needed for all files that are part of ACI */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	20 #include "aci_all.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21 #include "aci_cmh.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	22 #include "phb.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23 #include "cphs.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25 #include "psa.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26 #include "cmh.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	27 #include "psa_sim.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28 #include "dti_conn_mng.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29 #include "cmh_sim.h"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	31 /* Definition of records indices in association with cphs lines */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32 #define CPHS_LINE1_REC (1)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33 #define CPHS_LINE2_REC (2)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	34 #define CPHS_LINE_DATA_REC (3)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35 #define CPHS_LINE_FAX_REC (4)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37 /* cphs initialising status */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38 typedef enum
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	39 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	40 CPHS_NOT_INITIALISED = 0,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41 CPHS_INITIALISING, /* currently initialising */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42 CPHS_INITIALISED, /* initialised, currently does nothing */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 CPHS_REFRESHING, /* refreshing cached data */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44 CPHS_WRITING_CFU, /* writing new CFU status on SIM */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 CPHS_WRITING_VWI, /* writing new VWI status on SIM: user initiated */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46 CPHS_WRITING_VWI_IND /* writing new VWI status on SIM: network initiated */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47 } T_CPHS_STATUS;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 /* data send to SIM */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50 static UBYTE exchData[100];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52 /* CPHS status: provides information on what action is currently on progress */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53 static T_CPHS_STATUS cphs_status = CPHS_NOT_INITIALISED;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55 /* parameter describing at what step updating currently is */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56 static UBYTE sim_cache_update_state = CPHS_SIM_NOT_UPDATING;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58 #define CINF_SIZE (3)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60 /* VWI and CFU tables have to have the same size */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61 #define FLAG_TABLE_SIZE (2)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 #define CFU_SIZE FLAG_TABLE_SIZE
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63 #define VWI_SIZE FLAG_TABLE_SIZE
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65 typedef struct
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 T_CPHS_USER_CB user_cb; / callback used by CPHS module to pass results to ACI */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68 UBYTE current_record; /* record currently read */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 UBYTE sim_read_record_buffer; / buffer for record currently read */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71 UBYTE tmp_activate_state; /* TEMP setting being currently written on SIM (CFU or VWI) */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72 T_CPHS_LINES tmp_lines; /* TEMP lines being currently written on SIM (CFU or VWI) */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74 UBYTE tmp_flag_set[FLAG_TABLE_SIZE]; /* Flags Field (corresponding to tmp_lines) being currently
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 written on SIM (CFU or VWI) */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76 UBYTE tmp_info[CINF_SIZE]; /* voice mail waiting bitmask of CPHS lines */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 } T_CPHS_INTERNAL_PARAMS;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79 LOCAL T_CPHS_INTERNAL_PARAMS *cphs_internal_params;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81 /*** Parameters concerning ALS info ******/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82 /* how many different lines are there ? line1, line2, fax, data */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 /* defines order of presentation of the lines when testing command AT%CPALS=? */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84 #define LINE1_ID (0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 #define LINE2_ID (1)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 #define LINEDATA_ID (2)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 #define LINEFAX_ID (3)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88 #define MAX_LINE_ID (4)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 #define DEFAULT_LINE1_NAME "Line 1"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91 #define DEFAULT_LINE2_NAME "Line 2"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 #define DEFAULT_DATA_NAME "Data"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 #define DEFAULT_FAX_NAME "Fax"
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 #define CPHS_MAX_SIZE_ALPHA (22)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 typedef struct
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98 T_CPHS_LINES line;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99 CHAR line_desc[CPHS_MAX_SIZE_ALPHA];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 } T_CPHS_ALS_NAMES;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104 /* structure containing the cached parameters from SIM */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105 typedef struct
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107 UBYTE cfu_flags[CFU_SIZE]; /* same format as on the SIM: field 6F13 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108 UBYTE vwi_flags[VWI_SIZE]; /* same format as on the SIM: field 6F11 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109 UBYTE opn_long[CPHS_MAX_OPER_LONG]; /* operator long name */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110 UBYTE opn_short[CPHS_MAX_OPER_SHORT]; /* operator shortname */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 T_CPHS_INF_NUM info_numbers; / contains all info numbers entries */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112 UBYTE max_info_numbers; /* index of last entry in info number list */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 T_CPHS_ALS_NAMES *als;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114 UBYTE max_als_names_entries;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115 T_CPHS_CINF info; /* cphs information */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116 UBYTE csp[CPHS_MAX_CSP]; /* same format as on the SIM: field 6F15 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117 UBYTE csp_length; /* Value given by SIM after Read action */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 UBYTE orange_csp2[CPHS_MAX_CSP2]; /* Orange specific - same format as on the SIM: field 0x6f98 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119 UBYTE orange_csp2_length; /* Orange specific - Value given by SIM after Read action */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120 T_CPHS_MB *mb_numbers;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121 UBYTE max_mb_numbers;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122 UBYTE max_mb_entry_length; /* max length for mailbox entry */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123 } T_CPHS_CACHED_PARAMS;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125 LOCAL T_CPHS_CACHED_PARAMS cphs_cached_params; / memory allocated at initialisation */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127 LOCAL void cphs_cache_sim_data(UBYTE max_records, UBYTE latest_record_len);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 LOCAL void cphs_set_next_update_state(void);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129 LOCAL T_CPHS_RET cphs_get_indicator_flag(UBYTE *flag_set, T_CPHS_LINES line, UBYTE indicator);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 LOCAL void cphs_write_indicator_flag(UBYTE flag_set,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131 T_CPHS_LINES lines,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 UBYTE indicator);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 LOCAL void get_name_pointer_over_lineid(T_CPHS_LINES line, CHAR **line_desc, UBYTE max_lined);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 /*
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136 +--------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 \| PROJECT : GSM-PS (6147) MODULE : CPHS \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138 \| STATE : code ROUTINE : Internal functions \|
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 +--------------------------------------------------------------------+
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 PURPOSE : Set of functions used internally.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 /* Informs user of the result of an operation */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145 GLOBAL void cphs_inform_user(T_CPHS_CB callback_type,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146 T_CPHS_RET return_value,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147 UBYTE set_flag,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148 T_CPHS_LINES line)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150 T_CPHS_PARAMS user_cb_params;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 TRACE_EVENT_P4("cphs_inform_user(): cb_type: %d, result: %d, flag: %d, line: %d",
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153 callback_type, return_value, set_flag, line);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155 user_cb_params.cb_type = callback_type;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156 user_cb_params.operation_result = return_value;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158 user_cb_params.set_flag = set_flag;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159 user_cb_params.line = line;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161 cphs_internal_params->user_cb(&user_cb_params);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164 /* Checks whether CPHS module has been initialised or if it is currently
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165 being used.
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 * All user interface function should use this function *
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168 * to check cphs_status before processing * */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169 GLOBAL T_CPHS_RET cphs_check_status(void)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171 TRACE_FUNCTION("cphs_check_status()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	173 switch(cphs_status)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	174 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175 case(CPHS_NOT_INITIALISED):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	176 TRACE_EVENT("CPHS has not been initialised");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	177 return(CPHS_NOT_INIT);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179 case(CPHS_INITIALISED):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180 return(CPHS_OK);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	181
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182 default:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183 TRACE_EVENT("CPHS is BUSY: currently processing data");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184 return(CPHS_BUSY);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189 /* Aborts currently processed operation */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190 GLOBAL void cphs_abort_current_action(void)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	191 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	192 TRACE_EVENT_P1("cphs_abort_current_action(): action id: %d", cphs_status);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	193
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	194 switch(cphs_status)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	196 case(CPHS_INITIALISING):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197 case(CPHS_REFRESHING):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 /* CPHS module was currently updating cached data from the SIM */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199 sim_cache_update_state = CPHS_SIM_NOT_UPDATING;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201 cphs_inform_user(CPHS_INIT_RES, CPHS_FAIL, NOT_PRESENT_8BIT, CPHS_LINE_NULL);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	202 cphs_status = CPHS_NOT_INITIALISED; /* initialising aborted */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	205 default:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206 cphs_status = CPHS_INITIALISED;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211 #define RECORD_BUFF (0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212 #define INFO_BUFF (1)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213 #define ALS_BUFF (2)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214 #define MB_BUFF (3)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216 LOCAL void free_buffer(UBYTE buffer_id)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	217 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218 switch(buffer_id)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	219 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220 case(RECORD_BUFF):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	221 if(cphs_internal_params->sim_read_record_buffer NEQ NULL)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223 MFREE(cphs_internal_params->sim_read_record_buffer);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	224 cphs_internal_params->sim_read_record_buffer = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	225 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	227
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	228 case(INFO_BUFF):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229 if(cphs_cached_params->info_numbers NEQ NULL)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231 //MFREE(cphs_cached_params->info_numbers);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	232 cphs_cached_params->info_numbers = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	233 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	236 case(ALS_BUFF):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	237 if(cphs_cached_params->als NEQ NULL)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	238 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	239 MFREE(cphs_cached_params->als);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240 cphs_cached_params->als = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244 case(MB_BUFF):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	245 if(cphs_cached_params->mb_numbers NEQ NULL)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247 MFREE(cphs_cached_params->mb_numbers);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	248 cphs_cached_params->mb_numbers = NULL;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 LOCAL void write_dummy_function(UBYTE info_number_index, UBYTE *sim_data, UBYTE record_len)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256 TRACE_FUNCTION("write_dummy_function()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	257 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	258
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259 LOCAL void write_info_number(UBYTE info_number_index, UBYTE *sim_data, UBYTE record_len)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	261 UBYTE alpha_length, bcd_length;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262 BOOL check_network_specific_bit,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263 check_premium_service_bit;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	264 UBYTE *ptr;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 T_CPHS_INF_NUM *current_info_number;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	266
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	267 TRACE_FUNCTION("write_info_number()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	269 /* write data read from SIM for current_record */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	270 ptr = sim_data;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	272 /* get structure where data are to be written for this record */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273 current_info_number = &cphs_cached_params->info_numbers[info_number_index];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	274
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	275 current_info_number->element_index = info_number_index;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	276
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	277 /* first byte: alpha_length */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278 alpha_length = *ptr;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 if(alpha_length EQ 0xFF)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	281 /* it has to be a NULL entry: Shall be ignored (see CPHS recom.). Jump to next record */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	282 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	284
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	285 /* second byte */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286 ptr++;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287 check_network_specific_bit = *ptr & 0x20;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	288 check_premium_service_bit = *ptr & 0x10;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289 current_info_number->index_level = *ptr & 0x0F;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	290
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	291 if(check_network_specific_bit)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	293 /* info number is network specific */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	294 current_info_number->network_flag = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	295 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	296 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	297 current_info_number->network_flag = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	298
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299 if(check_premium_service_bit)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	300 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	301 /* info number is network specific */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302 current_info_number->premium_flag = TRUE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	303 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	304 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	305 current_info_number->premium_flag = FALSE;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	307 /* third byte to alpha_len+2 */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	308 /* Check 03.40 ?? */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	309 ptr++;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	310
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	311 if(alpha_length > sizeof(current_info_number->alpha_tag))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	312 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	313 alpha_length = sizeof(current_info_number->alpha_tag);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	314 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	315
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	316 /* initialize with 0s */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	317 memset(current_info_number->alpha_tag,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	318 0,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	319 sizeof(current_info_number->alpha_tag));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320 memcpy(current_info_number->alpha_tag, ptr, alpha_length);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	321
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	322 /* Length of BCD byte / /******** ignore ??? *************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	323 ptr += alpha_length;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	324 if(*ptr EQ 0xFF)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	325 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	326 /* this is a folder: no number information */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	327 bcd_length = 1; /* TON/NPI */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	328 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	330 bcd_length = *ptr;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	331
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	332 /* TON and NPI byte */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	333 ptr++;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	334 current_info_number->type_of_address = *ptr;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	335 bcd_length--; /* TON and NPI are counted in bcd length */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	336
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	337 /* Digits section */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	338 ptr++;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339 /* initialize with 0s */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	340 memset(current_info_number->number,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341 0,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	342 sizeof(current_info_number->number));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	343 if(2*bcd_length > sizeof(current_info_number->number))
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	344 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	345 bcd_length = sizeof(current_info_number->number);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	346 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	347 cphs_bcd2number(current_info_number->number, ptr, bcd_length);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	348
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 /********* Trace info number read: **************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	351 TRACE_EVENT_P7("Info Number: add: %d, index: %d, alpha: %s, number: %s, index_level: %d, premium: %d, network: %d",
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352 current_info_number,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	353 current_info_number->element_index,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	354 current_info_number->alpha_tag,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355 current_info_number->number,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356 current_info_number->index_level,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	357 current_info_number->premium_flag,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358 current_info_number->network_flag);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	359 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	360
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361 LOCAL T_CPHS_LINES translate_index2line(UBYTE index)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	362 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	363 switch(index - 1)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	365 case(LINE1_ID):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	366 return(CPHS_LINE1);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368 case(LINE2_ID):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369 return(CPHS_LINE2);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	370
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	371 case(LINEDATA_ID):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 return(CPHS_LINE_DATA);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374 case(LINEFAX_ID):
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375 return(CPHS_LINE_FAX);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377 default:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378 TRACE_EVENT_P1("wrong index: %d", index);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	379 return(CPHS_LINE_NULL);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	380 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	383 LOCAL void write_als_names(UBYTE number_index, UBYTE *sim_data, UBYTE record_len)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 UBYTE max_entries, alpha_length;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386 UBYTE i;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387 CHAR *line_desc;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388 T_CPHS_LINES lineid;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	390 TRACE_FUNCTION("write_als_names( )");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	391
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	392 max_entries = cphs_cached_params->max_als_names_entries;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	393
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	394 lineid = translate_index2line(number_index);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395 get_name_pointer_over_lineid(lineid, &line_desc, max_entries);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397 if(line_desc EQ NULL)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	398 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	399 TRACE_ERROR("line_desc is NULL");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	403 alpha_length = 0;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	404 for(i=0 ; i<(record_len - CPHS_MIN_MB_LEN); i++)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	405 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406 if(sim_data[i] EQ 0xFF)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	407 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	408 TRACE_EVENT_P1("length: %d", i);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411 alpha_length++;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	413
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	414 if(alpha_length EQ 0)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	415 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	416 TRACE_EVENT("No alpha tag on SIM");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	417 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	419 memcpy(line_desc, sim_data, MINIMUM(alpha_length,CPHS_MAX_SIZE_ALPHA));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	420 line_desc[alpha_length] = '\0';
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422 /********* Trace **************/
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	423 TRACE_EVENT_P3("index: %d, line: %d, alpha: %s",
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	424 number_index,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	425 lineid,
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	426 line_desc);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	427 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	428
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	429 LOCAL void write_mb_number(UBYTE number_index, UBYTE *sim_data, UBYTE record_len)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	431 UBYTE i;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	432 UBYTE pos;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	433 UBYTE bcd_len;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434 T_CPHS_MB *current_number;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	436 TRACE_FUNCTION("write_mb_number()");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	437
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438 TRACE_EVENT_P3("idx: %d, ln: %d, data: %s",
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439 number_index, record_len, sim_data);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	440
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	441 /* get structure where data are to be written for this record */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	442 current_number = &cphs_cached_params->mb_numbers[number_index-1];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443 memset(current_number->alpha_id, 0, sizeof(current_number->alpha_id));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	444 memset(current_number->number, 0, sizeof(current_number->number));
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	445
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	446 if (cphs_cached_params->max_mb_numbers < number_index)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	447 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	448 cphs_cached_params->max_mb_numbers = number_index;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	449 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	450
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	451 /* map record index to lines */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	452 switch(number_index)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	453 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	454 case CPHS_LINE1_REC:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	455 current_number->line = CPHS_LINE1;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	456 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	457 case CPHS_LINE2_REC:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	458 current_number->line = CPHS_LINE2;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460 case CPHS_LINE_DATA_REC:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461 current_number->line = CPHS_LINE_DATA;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463 case CPHS_LINE_FAX_REC:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	464 current_number->line = CPHS_LINE_FAX;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	465 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466 default:
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467 TRACE_EVENT("unexpected record index of cphs mailbox number");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468 break;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	470
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471 /* get alpha identifier, if available */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472 pos = record_len - CPHS_MIN_MB_LEN;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473 if ( ( pos > 0 ) AND ( sim_data[0] NEQ 0xFF ) )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	474 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475 for (i=0; i<pos; i++)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	476 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 if (sim_data[i] NEQ 0xFF)
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478 current_number->alpha_id[i] = sim_data[i];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 else
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	482 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	483 TRACE_EVENT("empty MB alpha");
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	484 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	485
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	486 /* get length of bcd */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	487 bcd_len = sim_data[pos];
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	488
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	489 if ( bcd_len EQ 0xFF )
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490 {
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491 /* empty MB number */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	492 TRACE_EVENT_P2("empty MB number, pos: %d, bcd_len:%d",
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493 pos, bcd_len);
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	495 current_number->toa = NOT_PRESENT_8BIT;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	496 return;
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497 }
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	498
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499 /* TON and NPI byte */
93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211 Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500 pos++;

3

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

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

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

3 | PROJECT: $Workfile:: cphs.c $|

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

4 | $Author:: $Revision:: $|

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

5 | CREATED: $Modtime:: $|

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

6 | STATE : code |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

7 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

8

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

9 MODULE : CPHS

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

10

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

11 PURPOSE : This module contains the CPHS functionalities.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

12 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

13

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

14 #ifdef FF_CPHS

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

15

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

16 #ifndef CPHS_C

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

17 #define CPHS_C

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

18

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

19 /* needed for all files that are part of ACI */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

20 #include "aci_all.h"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

21 #include "aci_cmh.h"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

22 #include "phb.h"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

23 #include "cphs.h"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

24

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

25 #include "psa.h"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

26 #include "cmh.h"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

27 #include "psa_sim.h"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

28 #include "dti_conn_mng.h"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

29 #include "cmh_sim.h"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

30

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

31 /* Definition of records indices in association with cphs lines */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

32 #define CPHS_LINE1_REC (1)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

33 #define CPHS_LINE2_REC (2)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

34 #define CPHS_LINE_DATA_REC (3)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

35 #define CPHS_LINE_FAX_REC (4)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

36

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

37 /* cphs initialising status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

38 typedef enum

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

39 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

40 CPHS_NOT_INITIALISED = 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

41 CPHS_INITIALISING, /* currently initialising */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

42 CPHS_INITIALISED, /* initialised, currently does nothing */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

43 CPHS_REFRESHING, /* refreshing cached data */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

44 CPHS_WRITING_CFU, /* writing new CFU status on SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

45 CPHS_WRITING_VWI, /* writing new VWI status on SIM: user initiated */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

46 CPHS_WRITING_VWI_IND /* writing new VWI status on SIM: network initiated */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

47 } T_CPHS_STATUS;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

48

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

49 /* data send to SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

50 static UBYTE exchData[100];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

51

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

52 /* CPHS status: provides information on what action is currently on progress */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

53 static T_CPHS_STATUS cphs_status = CPHS_NOT_INITIALISED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

54

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

55 /* parameter describing at what step updating currently is */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

56 static UBYTE sim_cache_update_state = CPHS_SIM_NOT_UPDATING;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

57

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

58 #define CINF_SIZE (3)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

59

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

60 /* VWI and CFU tables have to have the same size */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

61 #define FLAG_TABLE_SIZE (2)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

62 #define CFU_SIZE FLAG_TABLE_SIZE

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

63 #define VWI_SIZE FLAG_TABLE_SIZE

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

64

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

65 typedef struct

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

66 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

67 T_CPHS_USER_CB *user_cb; /* callback used by CPHS module to pass results to ACI */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

68 UBYTE current_record; /* record currently read */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

69 UBYTE *sim_read_record_buffer; /* buffer for record currently read */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

70

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

71 UBYTE tmp_activate_state; /* TEMP setting being currently written on SIM (CFU or VWI) */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

72 T_CPHS_LINES tmp_lines; /* TEMP lines being currently written on SIM (CFU or VWI) */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

73

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

74 UBYTE tmp_flag_set[FLAG_TABLE_SIZE]; /* Flags Field (corresponding to tmp_lines) being currently

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

75 written on SIM (CFU or VWI) */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

76 UBYTE tmp_info[CINF_SIZE]; /* voice mail waiting bitmask of CPHS lines */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

77 } T_CPHS_INTERNAL_PARAMS;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

78

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

79 LOCAL T_CPHS_INTERNAL_PARAMS *cphs_internal_params;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

80

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

81 /***** Parameters concerning ALS info ********/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

82 /* how many different lines are there ? line1, line2, fax, data */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

83 /* defines order of presentation of the lines when testing command AT%CPALS=? */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

84 #define LINE1_ID (0)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

85 #define LINE2_ID (1)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

86 #define LINEDATA_ID (2)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

87 #define LINEFAX_ID (3)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

88 #define MAX_LINE_ID (4)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

89

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

90 #define DEFAULT_LINE1_NAME "Line 1"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

91 #define DEFAULT_LINE2_NAME "Line 2"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

92 #define DEFAULT_DATA_NAME "Data"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

93 #define DEFAULT_FAX_NAME "Fax"

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

94 #define CPHS_MAX_SIZE_ALPHA (22)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

95

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

96 typedef struct

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

97 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

98 T_CPHS_LINES line;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

99 CHAR line_desc[CPHS_MAX_SIZE_ALPHA];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

100

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

101 } T_CPHS_ALS_NAMES;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

102

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

103

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

104 /* structure containing the cached parameters from SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

105 typedef struct

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

106 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

107 UBYTE cfu_flags[CFU_SIZE]; /* same format as on the SIM: field 6F13 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

108 UBYTE vwi_flags[VWI_SIZE]; /* same format as on the SIM: field 6F11 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

109 UBYTE opn_long[CPHS_MAX_OPER_LONG]; /* operator long name */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

110 UBYTE opn_short[CPHS_MAX_OPER_SHORT]; /* operator shortname */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

111 T_CPHS_INF_NUM *info_numbers; /* contains all info numbers entries */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

112 UBYTE max_info_numbers; /* index of last entry in info number list */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

113 T_CPHS_ALS_NAMES *als;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

114 UBYTE max_als_names_entries;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

115 T_CPHS_CINF info; /* cphs information */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

116 UBYTE csp[CPHS_MAX_CSP]; /* same format as on the SIM: field 6F15 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

117 UBYTE csp_length; /* Value given by SIM after Read action */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

118 UBYTE orange_csp2[CPHS_MAX_CSP2]; /* Orange specific - same format as on the SIM: field 0x6f98 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

119 UBYTE orange_csp2_length; /* Orange specific - Value given by SIM after Read action */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

120 T_CPHS_MB *mb_numbers;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

121 UBYTE max_mb_numbers;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

122 UBYTE max_mb_entry_length; /* max length for mailbox entry */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

123 } T_CPHS_CACHED_PARAMS;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

124

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

125 LOCAL T_CPHS_CACHED_PARAMS *cphs_cached_params; /* memory allocated at initialisation */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

126

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

127 LOCAL void cphs_cache_sim_data(UBYTE max_records, UBYTE latest_record_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

128 LOCAL void cphs_set_next_update_state(void);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

129 LOCAL T_CPHS_RET cphs_get_indicator_flag(UBYTE *flag_set, T_CPHS_LINES line, UBYTE indicator);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

130 LOCAL void cphs_write_indicator_flag(UBYTE flag_set,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

131 T_CPHS_LINES lines,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

132 UBYTE indicator);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

133 LOCAL void get_name_pointer_over_lineid(T_CPHS_LINES line, CHAR **line_desc, UBYTE max_lined);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

134

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

135 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

136 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

137 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

138 | STATE : code ROUTINE : Internal functions |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

139 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

140

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

141 PURPOSE : Set of functions used internally.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

142 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

143

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

144 /* Informs user of the result of an operation */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

145 GLOBAL void cphs_inform_user(T_CPHS_CB callback_type,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

146 T_CPHS_RET return_value,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

147 UBYTE set_flag,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

148 T_CPHS_LINES line)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

149 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

150 T_CPHS_PARAMS user_cb_params;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

151

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

152 TRACE_EVENT_P4("cphs_inform_user(): cb_type: %d, result: %d, flag: %d, line: %d",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

153 callback_type, return_value, set_flag, line);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

154

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

155 user_cb_params.cb_type = callback_type;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

156 user_cb_params.operation_result = return_value;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

157

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

158 user_cb_params.set_flag = set_flag;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

159 user_cb_params.line = line;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

160

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

161 cphs_internal_params->user_cb(&user_cb_params);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

162 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

163

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

164 /* Checks whether CPHS module has been initialised or if it is currently

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

165 being used.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

166

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

167 *** All user interface function should use this function ***

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

168 *** to check cphs_status before processing *** */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

169 GLOBAL T_CPHS_RET cphs_check_status(void)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

170 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

171 TRACE_FUNCTION("cphs_check_status()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

172

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

173 switch(cphs_status)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

174 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

175 case(CPHS_NOT_INITIALISED):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

176 TRACE_EVENT("CPHS has not been initialised");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

177 return(CPHS_NOT_INIT);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

178

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

179 case(CPHS_INITIALISED):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

180 return(CPHS_OK);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

181

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

182 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

183 TRACE_EVENT("CPHS is BUSY: currently processing data");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

184 return(CPHS_BUSY);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

185 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

186 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

187

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

188

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

189 /* Aborts currently processed operation */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

190 GLOBAL void cphs_abort_current_action(void)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

191 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

192 TRACE_EVENT_P1("cphs_abort_current_action(): action id: %d", cphs_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

193

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

194 switch(cphs_status)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

195 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

196 case(CPHS_INITIALISING):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

197 case(CPHS_REFRESHING):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

198 /* CPHS module was currently updating cached data from the SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

199 sim_cache_update_state = CPHS_SIM_NOT_UPDATING;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

200

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

201 cphs_inform_user(CPHS_INIT_RES, CPHS_FAIL, NOT_PRESENT_8BIT, CPHS_LINE_NULL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

202 cphs_status = CPHS_NOT_INITIALISED; /* initialising aborted */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

203 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

204

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

205 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

206 cphs_status = CPHS_INITIALISED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

207 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

208 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

209 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

210

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

211 #define RECORD_BUFF (0)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

212 #define INFO_BUFF (1)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

213 #define ALS_BUFF (2)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

214 #define MB_BUFF (3)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

215

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

216 LOCAL void free_buffer(UBYTE buffer_id)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

217 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

218 switch(buffer_id)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

219 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

220 case(RECORD_BUFF):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

221 if(cphs_internal_params->sim_read_record_buffer NEQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

222 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

223 MFREE(cphs_internal_params->sim_read_record_buffer);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

224 cphs_internal_params->sim_read_record_buffer = NULL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

225 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

226 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

227

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

228 case(INFO_BUFF):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

229 if(cphs_cached_params->info_numbers NEQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

230 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

231 //MFREE(cphs_cached_params->info_numbers);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

232 cphs_cached_params->info_numbers = NULL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

233 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

234 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

235

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

236 case(ALS_BUFF):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

237 if(cphs_cached_params->als NEQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

238 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

239 MFREE(cphs_cached_params->als);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

240 cphs_cached_params->als = NULL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

241 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

242 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

243

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

244 case(MB_BUFF):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

245 if(cphs_cached_params->mb_numbers NEQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

246 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

247 MFREE(cphs_cached_params->mb_numbers);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

248 cphs_cached_params->mb_numbers = NULL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

249 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

250 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

251 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

252 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

253

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

254 LOCAL void write_dummy_function(UBYTE info_number_index, UBYTE *sim_data, UBYTE record_len)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

255 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

256 TRACE_FUNCTION("write_dummy_function()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

257 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

258

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

259 LOCAL void write_info_number(UBYTE info_number_index, UBYTE *sim_data, UBYTE record_len)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

260 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

261 UBYTE alpha_length, bcd_length;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

262 BOOL check_network_specific_bit,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

263 check_premium_service_bit;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

264 UBYTE *ptr;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

265 T_CPHS_INF_NUM *current_info_number;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

266

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

267 TRACE_FUNCTION("write_info_number()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

268

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

269 /* write data read from SIM for current_record */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

270 ptr = sim_data;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

271

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

272 /* get structure where data are to be written for this record */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

273 current_info_number = &cphs_cached_params->info_numbers[info_number_index];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

274

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

275 current_info_number->element_index = info_number_index;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

276

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

277 /* first byte: alpha_length */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

278 alpha_length = *ptr;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

279 if(alpha_length EQ 0xFF)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

280 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

281 /* it has to be a NULL entry: Shall be ignored (see CPHS recom.). Jump to next record */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

282 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

283 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

284

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

285 /* second byte */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

286 ptr++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

287 check_network_specific_bit = *ptr & 0x20;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

288 check_premium_service_bit = *ptr & 0x10;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

289 current_info_number->index_level = *ptr & 0x0F;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

290

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

291 if(check_network_specific_bit)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

292 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

293 /* info number is network specific */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

294 current_info_number->network_flag = TRUE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

295 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

296 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

297 current_info_number->network_flag = FALSE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

298

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

299 if(check_premium_service_bit)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

300 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

301 /* info number is network specific */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

302 current_info_number->premium_flag = TRUE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

303 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

304 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

305 current_info_number->premium_flag = FALSE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

306

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

307 /* third byte to alpha_len+2 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

308 /* Check 03.40 ?? */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

309 ptr++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

310

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

311 if(alpha_length > sizeof(current_info_number->alpha_tag))

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

312 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

313 alpha_length = sizeof(current_info_number->alpha_tag);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

314 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

315

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

316 /* initialize with 0s */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

317 memset(current_info_number->alpha_tag,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

318 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

319 sizeof(current_info_number->alpha_tag));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

320 memcpy(current_info_number->alpha_tag, ptr, alpha_length);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

321

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

322 /* Length of BCD byte */ /*********** ignore ??? ***************/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

323 ptr += alpha_length;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

324 if(*ptr EQ 0xFF)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

325 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

326 /* this is a folder: no number information */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

327 bcd_length = 1; /* TON/NPI */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

328 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

329 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

330 bcd_length = *ptr;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

331

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

332 /* TON and NPI byte */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

333 ptr++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

334 current_info_number->type_of_address = *ptr;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

335 bcd_length--; /* TON and NPI are counted in bcd length */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

336

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

337 /* Digits section */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

338 ptr++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

339 /* initialize with 0s */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

340 memset(current_info_number->number,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

341 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

342 sizeof(current_info_number->number));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

343 if(2*bcd_length > sizeof(current_info_number->number))

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

344 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

345 bcd_length = sizeof(current_info_number->number);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

346 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

347 cphs_bcd2number(current_info_number->number, ptr, bcd_length);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

348

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

349

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

350 /*********** Trace info number read: ****************/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

351 TRACE_EVENT_P7("Info Number: add: %d, index: %d, alpha: %s, number: %s, index_level: %d, premium: %d, network: %d",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

352 current_info_number,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

353 current_info_number->element_index,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

354 current_info_number->alpha_tag,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

355 current_info_number->number,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

356 current_info_number->index_level,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

357 current_info_number->premium_flag,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

358 current_info_number->network_flag);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

359 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

360

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

361 LOCAL T_CPHS_LINES translate_index2line(UBYTE index)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

362 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

363 switch(index - 1)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

364 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

365 case(LINE1_ID):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

366 return(CPHS_LINE1);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

367

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

368 case(LINE2_ID):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

369 return(CPHS_LINE2);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

370

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

371 case(LINEDATA_ID):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

372 return(CPHS_LINE_DATA);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

373

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

374 case(LINEFAX_ID):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

375 return(CPHS_LINE_FAX);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

376

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

377 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

378 TRACE_EVENT_P1("wrong index: %d", index);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

379 return(CPHS_LINE_NULL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

380 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

381 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

382

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

383 LOCAL void write_als_names(UBYTE number_index, UBYTE *sim_data, UBYTE record_len)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

384 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

385 UBYTE max_entries, alpha_length;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

386 UBYTE i;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

387 CHAR *line_desc;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

388 T_CPHS_LINES lineid;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

389

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

390 TRACE_FUNCTION("write_als_names( )");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

391

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

392 max_entries = cphs_cached_params->max_als_names_entries;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

393

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

394 lineid = translate_index2line(number_index);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

395 get_name_pointer_over_lineid(lineid, &line_desc, max_entries);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

396

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

397 if(line_desc EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

398 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

399 TRACE_ERROR("line_desc is NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

400 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

401 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

402

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

403 alpha_length = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

404 for(i=0 ; i<(record_len - CPHS_MIN_MB_LEN); i++)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

405 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

406 if(sim_data[i] EQ 0xFF)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

407 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

408 TRACE_EVENT_P1("length: %d", i);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

409 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

410 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

411 alpha_length++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

412 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

413

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

414 if(alpha_length EQ 0)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

415 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

416 TRACE_EVENT("No alpha tag on SIM");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

417 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

418 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

419 memcpy(line_desc, sim_data, MINIMUM(alpha_length,CPHS_MAX_SIZE_ALPHA));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

420 line_desc[alpha_length] = '\0';

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

421

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

422 /*********** Trace ****************/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

423 TRACE_EVENT_P3("index: %d, line: %d, alpha: %s",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

424 number_index,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

425 lineid,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

426 line_desc);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

427 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

428

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

429 LOCAL void write_mb_number(UBYTE number_index, UBYTE *sim_data, UBYTE record_len)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

430 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

431 UBYTE i;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

432 UBYTE pos;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

433 UBYTE bcd_len;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

434 T_CPHS_MB *current_number;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

435

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

436 TRACE_FUNCTION("write_mb_number()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

437

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

438 TRACE_EVENT_P3("idx: %d, ln: %d, data: %s",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

439 number_index, record_len, sim_data);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

440

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

441 /* get structure where data are to be written for this record */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

442 current_number = &cphs_cached_params->mb_numbers[number_index-1];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

443 memset(current_number->alpha_id, 0, sizeof(current_number->alpha_id));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

444 memset(current_number->number, 0, sizeof(current_number->number));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

445

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

446 if (cphs_cached_params->max_mb_numbers < number_index)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

447 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

448 cphs_cached_params->max_mb_numbers = number_index;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

449 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

450

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

451 /* map record index to lines */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

452 switch(number_index)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

453 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

454 case CPHS_LINE1_REC:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

455 current_number->line = CPHS_LINE1;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

456 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

457 case CPHS_LINE2_REC:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

458 current_number->line = CPHS_LINE2;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

459 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

460 case CPHS_LINE_DATA_REC:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

461 current_number->line = CPHS_LINE_DATA;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

462 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

463 case CPHS_LINE_FAX_REC:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

464 current_number->line = CPHS_LINE_FAX;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

465 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

466 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

467 TRACE_EVENT("unexpected record index of cphs mailbox number");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

468 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

469 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

470

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

471 /* get alpha identifier, if available */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

472 pos = record_len - CPHS_MIN_MB_LEN;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

473 if ( ( pos > 0 ) AND ( sim_data[0] NEQ 0xFF ) )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

474 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

475 for (i=0; i<pos; i++)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

476 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

477 if (sim_data[i] NEQ 0xFF)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

478 current_number->alpha_id[i] = sim_data[i];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

479 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

480 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

481 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

482 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

483 TRACE_EVENT("empty MB alpha");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

484 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

485

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

486 /* get length of bcd */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

487 bcd_len = sim_data[pos];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

488

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

489 if ( bcd_len EQ 0xFF )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

490 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

491 /* empty MB number */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

492 TRACE_EVENT_P2("empty MB number, pos: %d, bcd_len:%d",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

493 pos, bcd_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

494

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

495 current_number->toa = NOT_PRESENT_8BIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

496 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

497 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

498

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

499 /* TON and NPI byte */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

500 pos++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

501 current_number->toa = sim_data[pos];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

502 bcd_len--; /* TON and NPI are counted in bcd length */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

503

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

504 /* Digits section */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

505 pos++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

506 if(2*bcd_len > sizeof(current_number->number))

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

507 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

508 bcd_len = sizeof(current_number->number);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

509 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

510 cphs_bcd2number(current_number->number, &(sim_data[pos]), bcd_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

511

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

512

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

513 /*********** Trace mailbox number read: ****************/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

514 TRACE_EVENT_P5("index: %d, line: %d, alpha: %s, number: %s, toa: %d",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

515 number_index,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

516 current_number->line,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

517 current_number->alpha_id,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

518 current_number->number,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

519 current_number->toa);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

520 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

521

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

522 LOCAL void write_csp_ok(UBYTE *sim_data, UBYTE record_len)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

523 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

524 TRACE_FUNCTION("write_csp_ok()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

525

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

526 if( sim_data NEQ NULL )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

527 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

528 memcpy(cphs_cached_params->csp, sim_data, record_len );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

529 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

530 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

531 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

532 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

533 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

534 | STATE : code ROUTINE : cphs_first_free |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

535 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

536

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

537 PURPOSE : Find first free location in mailbox list

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

538 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

539 GLOBAL T_CPHS_RET cphs_first_free(

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

540 UBYTE *first_free)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

541 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

542 UBYTE rec_id;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

543

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

544 if(cphs_cached_params EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

545 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

546 TRACE_ERROR("cphs_cached_params==NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

547 ACI_ERR_DESC(ACI_ERR_CLASS_Cme,CME_ERR_OpNotAllow);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

548 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

549 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

550

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

551 if (cphs_cached_params->mb_numbers EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

552 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

553 TRACE_ERROR("cphs_cached_params->mb_numbers==NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

554 ACI_ERR_DESC(ACI_ERR_CLASS_Cme,CME_ERR_OpNotAllow);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

555 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

556 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

557

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

558 for (rec_id=0;rec_id<cphs_cached_params->max_mb_numbers;rec_id++)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

559 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

560 if (cphs_cached_params->mb_numbers[rec_id].number[0] EQ 0)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

561 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

562 *first_free=(UBYTE)(rec_id+1);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

563 return(CPHS_OK);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

564 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

565 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

566

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

567 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

568 * List is full, indicate this with 0.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

569 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

570 *first_free=0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

571 return(CPHS_OK);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

572 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

573

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

574 /* temp until we use lists */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

575 /* Size has to be set to 600 considering the length alignment of the datastrct*/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

576 UBYTE info_numbers_buffer[600];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

577

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

578 LOCAL void cphs_init_records_info(UBYTE max_records)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

579 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

580 TRACE_FUNCTION("cphs_init_records_info( )");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

581

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

582 if(cphs_cached_params->info_numbers EQ NULL) // should only be checked for first entry

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

583 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

584 /* This should happen only once: on the SIM are more records than thought at first.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

585 structure size has to be increased (and this has to be done before 1st entry is copied !!) */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

586 TRACE_EVENT_P1("cphs_cached_params->info_numbers list size: %d records on SIM", max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

587

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

588 /******* use lists !!!!!!!!!!!!! *****/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

589 //MALLOC(cphs_cached_params->info_numbers, (ULONG)(max_records*sizeof(T_CPHS_INF_NUM)));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

590 cphs_cached_params->info_numbers = (T_CPHS_INF_NUM*)&info_numbers_buffer;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

591 cphs_cached_params->max_info_numbers = max_records;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

592 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

593

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

594 /* First entry should be "ROOT" with index 0 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

595 cphs_cached_params->info_numbers[0].element_index = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

596 cphs_cached_params->info_numbers[0].index_level = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

597 sprintf(cphs_cached_params->info_numbers[0].alpha_tag, "ROOT");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

598 memset(cphs_cached_params->info_numbers[0].number,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

599 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

600 sizeof(cphs_cached_params->info_numbers[0].number));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

601 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

602

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

603 LOCAL void cphs_init_records_mailbox(UBYTE max_records)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

604 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

605 TRACE_FUNCTION("cphs_init_records_mailbox( )");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

606

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

607 if(cphs_cached_params->mb_numbers EQ NULL) // should only be checked for first entry

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

608 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

609

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

610 /* This should happen only once: on the SIM are more records than thought at first.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

611 structure size has to be increased (and this has to be done before 1st entry is copied !!) */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

612 TRACE_EVENT_P1("cphs_cached_params->mb_numbers list size: %d records on SIM", max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

613

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

614 MALLOC(cphs_cached_params->mb_numbers, (USHORT)(max_records*sizeof(T_CPHS_MB)));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

615

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

616 cphs_cached_params->max_mb_numbers = max_records;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

617 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

618

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

619 cphs_cached_params->mb_numbers[0].line = CPHS_LINE_NULL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

620 cphs_cached_params->mb_numbers[0].toa = NOT_PRESENT_8BIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

621 memset(cphs_cached_params->mb_numbers[0].number, 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

622 sizeof(cphs_cached_params->info_numbers[0].number));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

623 memset(cphs_cached_params->mb_numbers[0].alpha_id, 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

624 sizeof(cphs_cached_params->mb_numbers[0].alpha_id));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

625 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

626

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

627 LOCAL void initialize_als_info(UBYTE als_max_records)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

628 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

629 CHAR *line_desc;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

630

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

631 TRACE_FUNCTION("initialize_als_info( )");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

632

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

633 MALLOC(cphs_cached_params->als, (USHORT)(als_max_records* sizeof(T_CPHS_ALS_NAMES)));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

634 cphs_cached_params->max_als_names_entries = als_max_records;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

635

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

636 /* for SIMs with als_max_records > MAX_LINE_ID */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

637 if (als_max_records > MAX_LINE_ID)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

638 als_max_records = MAX_LINE_ID;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

639

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

640 switch (als_max_records)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

641 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

642 case (LINEFAX_ID+1):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

643 cphs_cached_params->als[LINEFAX_ID].line = CPHS_LINE_FAX;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

644 get_name_pointer_over_lineid(CPHS_LINE_FAX, &line_desc, als_max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

645 sprintf(line_desc, DEFAULT_FAX_NAME);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

646 //lint -fallthrough

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

647 case (LINEDATA_ID+1):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

648 cphs_cached_params->als[LINEDATA_ID].line = CPHS_LINE_DATA;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

649 get_name_pointer_over_lineid(CPHS_LINE_DATA, &line_desc, als_max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

650 sprintf(line_desc, DEFAULT_DATA_NAME);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

651 //lint -fallthrough

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

652 case (LINE2_ID+1):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

653 cphs_cached_params->als[LINE2_ID].line = CPHS_LINE2;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

654 get_name_pointer_over_lineid(CPHS_LINE2, &line_desc, als_max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

655 sprintf(line_desc, DEFAULT_LINE2_NAME);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

656 //lint -fallthrough

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

657 case (LINE1_ID+1):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

658 cphs_cached_params->als[LINE1_ID].line = CPHS_LINE1;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

659 get_name_pointer_over_lineid(CPHS_LINE1, &line_desc, als_max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

660 sprintf(line_desc, DEFAULT_LINE1_NAME);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

661 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

662 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

663

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

664 LOCAL void cphs_init_records_alsnames(UBYTE max_records)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

665 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

666 TRACE_FUNCTION("cphs_init_records_alsnames( )");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

667

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

668 TRACE_EVENT_P1("cphs_cached_params->als list size: %d records on SIM", max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

669

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

670 if(cphs_cached_params->als EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

671 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

672 /* This should happen only once: on the SIM are more records than thought at first.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

673 structure size has to be increased (and this has to be done before 1st entry is copied !!) */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

674

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

675 /* init als name structure */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

676 initialize_als_info(max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

677 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

678 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

679

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

680 LOCAL void cphs_init_records(UBYTE max_records, UBYTE sim_update_type)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

681 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

682 TRACE_FUNCTION("cphs_init_records( )");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

683

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

684 switch (sim_update_type)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

685 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

686 case(CPHS_SIM_INFO_NUMS):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

687 case(CPHS_SIM_INFO_NUMS_EA01):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

688 cphs_init_records_info(max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

689 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

690

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

691 case(CPHS_SIM_MB):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

692 cphs_init_records_mailbox(max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

693 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

694

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

695 case(CPHS_SIM_ALSNAMES):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

696 cphs_init_records_alsnames(max_records);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

697 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

698

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

699 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

700 TRACE_EVENT_P1("Wrong sim_update_state: %d", sim_update_type);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

701 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

702 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

703

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

704 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

705

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

706

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

707 #define DEFAULT_MAXSIZE_OF_RECORD (100)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

708 typedef void T_CPHS_WRITE_NUMBER_FCT (UBYTE number_index, UBYTE *sim_data, UBYTE record_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

709

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

710 LOCAL T_CPHS_WRITE_NUMBER_FCT *get_the_specific_data_update_type_dependant(UBYTE sim_update_type,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

711 UBYTE *max_number)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

712 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

713 switch(sim_update_type)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

714 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

715 case(CPHS_SIM_INFO_NUMS):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

716 case(CPHS_SIM_INFO_NUMS_EA01):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

717 TRACE_EVENT("Information Numbers");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

718 *max_number = cphs_cached_params->max_info_numbers;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

719 return(write_info_number);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

720

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

721 case(CPHS_SIM_MB):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

722 TRACE_EVENT("Mailbox Numbers");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

723 *max_number = cphs_cached_params->max_mb_numbers;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

724 return(write_mb_number);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

725

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

726 case(CPHS_SIM_ALSNAMES):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

727 TRACE_EVENT("MSISDN Names");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

728 *max_number = cphs_cached_params->max_als_names_entries;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

729 return(write_als_names);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

730

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

731 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

732 TRACE_ERROR("wrong sim_update_type value");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

733 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

734 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

735 return(write_dummy_function);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

736 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

737

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

738 /* returns TRUE if all records have been read... */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

739 LOCAL BOOL cphs_read_sim_records(UBYTE max_records,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

740 UBYTE sim_update_type,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

741 UBYTE latest_record_len)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

742 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

743 UBYTE *current_record = &cphs_internal_params->current_record;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

744 UBYTE *number_exdata = cphs_internal_params->sim_read_record_buffer; /* buffer for the SIM to write data: temporary buffer */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

745 T_CPHS_WRITE_NUMBER_FCT *write_number;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

746 UBYTE max_numbers;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

747

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

748 TRACE_FUNCTION("cphs_read_sim_records()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

749

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

750 write_number = get_the_specific_data_update_type_dependant(sim_update_type, &max_numbers);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

751

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

752 switch(*current_record)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

753 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

754 case(0):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

755 TRACE_EVENT("CPHS read records: START !!!");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

756

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

757 /* Begin of reading of the Information Numbers */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

758 if(cphs_internal_params->sim_read_record_buffer EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

759 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

760 MALLOC(cphs_internal_params->sim_read_record_buffer, DEFAULT_MAXSIZE_OF_RECORD); // buffer for the SIM to write data: temporary buffer

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

761 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

762 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

763 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

764 TRACE_EVENT("sim_read_record_buffer should be NULL: weird indeed...");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

765 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

766 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

767

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

768 case(1):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

769 cphs_init_records(max_records, sim_update_type);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

770 //lint -fallthrough

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

771

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

772 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

773 TRACE_EVENT_P1("number retrieved from SIM: record %d read", *current_record);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

774 if (write_number NEQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

775 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

776 write_number(*current_record, cphs_internal_params->sim_read_record_buffer, latest_record_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

777 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

778 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

779 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

780

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

781 /* last record read ?? */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

782 if(*current_record EQ max_records)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

783 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

784 *current_record = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

785 free_buffer(RECORD_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

786 return(TRUE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

787 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

788

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

789

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

790 /* Read next record */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

791 (*current_record)++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

792

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

793 cphs_sim_access_data( CPHS_SIM_READ_RECORD,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

794 sim_update_type,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

795 *current_record,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

796 cphs_internal_params->sim_read_record_buffer,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

797 DEFAULT_MAXSIZE_OF_RECORD );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

798

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

799 return(FALSE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

800 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

801

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

802 LOCAL void get_name_pointer_over_lineid(T_CPHS_LINES line, CHAR **line_desc, UBYTE max_lined)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

803 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

804 UBYTE i;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

805 T_CPHS_ALS_NAMES *current_als;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

806

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

807 TRACE_FUNCTION("get_name_pointer_over_lineid()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

808

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

809 for(i=0; i<max_lined; i++)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

810 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

811 current_als = &(cphs_cached_params->als[i]);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

812 if(current_als->line EQ line)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

813 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

814 *line_desc = current_als->line_desc;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

815 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

816 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

817 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

818

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

819 TRACE_ERROR("Ugly error: wrong line type");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

820 *line_desc = NULL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

821 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

822

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

823 /* Read data to be cached from SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

824 /* param_max_records: when reading first record, SIM return the number of records to be found

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

825 on the SIM: thus CPHS module can check whether allocated memory is enough */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

826 LOCAL void cphs_cache_sim_data(UBYTE max_records, UBYTE latest_record_len)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

827 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

828 BOOL end_of_read;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

829

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

830 TRACE_FUNCTION("cphs_cache_sim_data()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

831

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

832 /* operation to be performed */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

833 switch(sim_cache_update_state)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

834 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

835 case(CPHS_SIM_NOT_UPDATING):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

836 /* START UPDATING !!! */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

837 cphs_set_next_update_state();

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

838 cphs_cache_sim_data(NOT_PRESENT_8BIT, NOT_PRESENT_8BIT);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

839 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

840

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

841 case(CPHS_SIM_CFU):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

842 /* Read Call Forwarding Flag */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

843 cphs_sim_access_data( CPHS_SIM_READ_TRANSP_EF,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

844 CPHS_SIM_CFU,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

845 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

846 cphs_cached_params->cfu_flags,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

847 CFU_SIZE );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

848 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

849

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

850 case(CPHS_SIM_VWI):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

851 /* read waiting flags on SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

852 cphs_sim_access_data( CPHS_SIM_READ_TRANSP_EF,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

853 CPHS_SIM_VWI,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

854 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

855 cphs_cached_params->vwi_flags,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

856 VWI_SIZE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

857 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

858

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

859 case(CPHS_SIM_CINF):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

860 /* read cphs info on SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

861 cphs_sim_access_data( CPHS_SIM_READ_TRANSP_EF,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

862 CPHS_SIM_CINF,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

863 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

864 cphs_internal_params->tmp_info,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

865 CINF_SIZE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

866 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

867

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

868 case(CPHS_SIM_CSP):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

869 /* read customer service profile on SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

870 cphs_sim_access_data( CPHS_SIM_READ_TRANSP_EF,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

871 CPHS_SIM_CSP,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

872 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

873 cphs_cached_params->csp,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

874 CPHS_MAX_CSP);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

875 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

876

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

877 /* Add support for Orange SIM's */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

878 case(CPHS_SIM_ORANGE_CSP):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

879 /* read customer service profile on SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

880 cphs_sim_access_data( CPHS_SIM_READ_TRANSP_EF,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

881 CPHS_SIM_ORANGE_CSP,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

882 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

883 cphs_cached_params->orange_csp2,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

884 CPHS_MAX_CSP2);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

885 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

886

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

887 case(CPHS_SIM_OPNLONG):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

888 /* read operator name string on SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

889 cphs_sim_access_data( CPHS_SIM_READ_TRANSP_EF,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

890 CPHS_SIM_OPNLONG,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

891 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

892 cphs_cached_params->opn_long,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

893 CPHS_MAX_OPER_LONG);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

894 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

895

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

896 case(CPHS_SIM_OPNSHORT):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

897 /* read operator name short string on SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

898 cphs_sim_access_data( CPHS_SIM_READ_TRANSP_EF,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

899 CPHS_SIM_OPNSHORT,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

900 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

901 cphs_cached_params->opn_short,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

902 CPHS_MAX_OPER_SHORT);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

903 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

904

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

905 case(CPHS_SIM_ALSNAMES):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

906 case(CPHS_SIM_MB):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

907 case(CPHS_SIM_INFO_NUMS):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

908 case(CPHS_SIM_INFO_NUMS_EA01):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

909 /* Read mailbox/information numbers */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

910

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

911 end_of_read = cphs_read_sim_records(max_records, sim_cache_update_state, latest_record_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

912

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

913 if(end_of_read)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

914 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

915 /* END of mailbox/information numbers initialising */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

916 TRACE_EVENT("End of Reading Numbers");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

917 cphs_set_next_update_state();

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

918 cphs_cache_sim_data(NOT_PRESENT_8BIT, NOT_PRESENT_8BIT);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

919 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

920 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

921

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

922 case(CPHS_SIM_STOP_INIT):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

923 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

924 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

925 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

926

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

927 /* End of update */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

928 if(sim_cache_update_state NEQ CPHS_SIM_NOT_UPDATING)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

929 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

930 TRACE_ERROR("wrong sim_cache_update_state state");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

931 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

932 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

933 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

934 TRACE_EVENT("End of initialisation: Success");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

935 sim_cache_update_state = CPHS_SIM_NOT_UPDATING;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

936 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

937

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

938 /* reset states */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

939 cphs_set_next_update_state();

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

940 cphs_status = CPHS_INITIALISED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

941

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

942 cphs_inform_user(CPHS_INIT_RES, CPHS_OK, NOT_PRESENT_8BIT, CPHS_LINE_NULL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

943 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

944

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

945 LOCAL void cphs_set_next_update_state(void)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

946 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

947 switch(sim_cache_update_state)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

948 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

949 /****** Mandatory Fields *******/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

950 case(CPHS_SIM_NOT_UPDATING): /* START ! */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

951 sim_cache_update_state = CPHS_SIM_CFU;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

952 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

953

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

954 case(CPHS_SIM_CFU):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

955 sim_cache_update_state = CPHS_SIM_VWI;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

956 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

957

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

958 case(CPHS_SIM_VWI):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

959 sim_cache_update_state = CPHS_SIM_OPNLONG;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

960 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

961

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

962 case(CPHS_SIM_OPNLONG):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

963 sim_cache_update_state = CPHS_SIM_CINF;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

964 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

965

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

966 /****** Optional Fields *******/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

967 case(CPHS_SIM_CINF):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

968 sim_cache_update_state = CPHS_SIM_CSP;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

969 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

970

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

971 case(CPHS_SIM_CSP):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

972 sim_cache_update_state = CPHS_SIM_ORANGE_CSP;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

973 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

974

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

975 /* Add support for Orange SIM's */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

976 case(CPHS_SIM_ORANGE_CSP):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

977 sim_cache_update_state = CPHS_SIM_OPNSHORT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

978 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

979

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

980 case(CPHS_SIM_OPNSHORT):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

981 sim_cache_update_state = CPHS_SIM_MB;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

982 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

983

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

984 case(CPHS_SIM_MB):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

985 sim_cache_update_state = CPHS_SIM_INFO_NUMS;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

986 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

987

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

988 case(CPHS_SIM_INFO_NUMS):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

989 case(CPHS_SIM_INFO_NUMS_EA01):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

990 sim_cache_update_state = CPHS_SIM_ALSNAMES;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

991 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

992

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

993 case(CPHS_SIM_ALSNAMES):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

994 sim_cache_update_state = CPHS_SIM_STOP_INIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

995 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

996

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

997 case(CPHS_SIM_STOP_INIT):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

998 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

999 sim_cache_update_state = CPHS_SIM_NOT_UPDATING;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1000 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1001 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1002 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1003

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1004 /* Should action (e.g cache updating) be aborted if field

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1005 is not present ? */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1006 LOCAL BOOL is_cphs_field_mandatory(UBYTE field_type)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1007 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1008 TRACE_FUNCTION("is_cphs_field_mandatory()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1009

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1010 switch(field_type)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1011 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1012 /****** Mandatory Fields *******/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1013 case(CPHS_SIM_CFU):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1014 case(CPHS_SIM_VWI):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1015 case(CPHS_SIM_CINF):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1016 case(CPHS_SIM_OPNLONG):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1017 return(TRUE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1018

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1019 /****** Optional fields ********/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1020 case(CPHS_SIM_OPNSHORT):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1021 case(CPHS_SIM_MB):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1022 case(CPHS_SIM_INFO_NUMS):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1023 case(CPHS_SIM_INFO_NUMS_EA01):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1024 case(CPHS_SIM_ALSNAMES):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1025 case(CPHS_SIM_CSP):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1026 /* Add support for Orange SIM's */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1027 case(CPHS_SIM_ORANGE_CSP):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1028 return(FALSE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1029

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1030 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1031 TRACE_EVENT_P1("Unexpected field type: %d", field_type);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1032 return(TRUE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1033 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1034 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1035

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1036 /* Positive Result of data SIM data access while updating cached data */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1037 LOCAL void cphs_init_sim_ok(UBYTE max_records, UBYTE sim_data_len)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1038 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1039 UBYTE i;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1040 BOOL set_next_state = TRUE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1041 USHORT temp_sst_ushort2;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1042

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1043 TRACE_FUNCTION("cphs_init_sim_ok()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1044

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1045 TRACE_EVENT_P1("cphs_init_sim_ok(): data_len: %d", sim_data_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1046

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1047 /* set next operation if needed */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1048 switch(sim_cache_update_state)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1049 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1050 case(CPHS_SIM_CFU):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1051 TRACE_EVENT_P2("cfu_flags: %02X, %02X", cphs_cached_params->cfu_flags[0], cphs_cached_params->cfu_flags[1]);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1052 if(sim_data_len < CFU_SIZE)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1053 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1054 /* Typically there are 2 bytes in CFU Ef_File: Yet only the first one is

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1055 mandatory. Set non-present optional bytes to 0x00 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1056 for(i=sim_data_len; i<CFU_SIZE; i++)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1057 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1058 cphs_cached_params->cfu_flags[i] = 0x00;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1059 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1060 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1061 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1062

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1063 case(CPHS_SIM_VWI):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1064 TRACE_EVENT_P2("vwi_flags: %02X, %02X", cphs_cached_params->vwi_flags[0], cphs_cached_params->vwi_flags[1]);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1065 if(sim_data_len < VWI_SIZE)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1066 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1067 /* Typically there are 2 bytes in VWI Ef_File: Yet only the first one is

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1068 mandatory. Set non-present optional bytes to 0x00 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1069 for(i=sim_data_len; i<VWI_SIZE; i++)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1070 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1071 cphs_cached_params->vwi_flags[i] = 0x00;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1072 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1073 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1074 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1075

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1076 case(CPHS_SIM_MB):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1077 TRACE_EVENT_P1("store max_mb_entry_length: %d",sim_data_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1078 cphs_cached_params->max_mb_entry_length = sim_data_len;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1079 set_next_state = FALSE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1080 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1081 case(CPHS_SIM_ALSNAMES):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1082 case(CPHS_SIM_INFO_NUMS):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1083 case(CPHS_SIM_INFO_NUMS_EA01):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1084 /* decision is made within cphs_cache_sim_data( )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1085 whether next action should be started */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1086 set_next_state = FALSE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1087 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1088

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1089 case(CPHS_SIM_CSP):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1090 if(sim_data_len > CPHS_MAX_CSP)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1091 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1092 TRACE_EVENT_P1("Risk of loss of CSP data: sim_data_len: %d", sim_data_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1093 cphs_cached_params->csp_length = CPHS_MAX_CSP;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1094 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1095 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1096 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1097 cphs_cached_params->csp_length = sim_data_len;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1098 TRACE_EVENT_P1("cphs_cached_params->csp_length: %d",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1099 cphs_cached_params->csp_length);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1100 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1101 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1102

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1103 /* Add support for Orange SIM's */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1104 case(CPHS_SIM_ORANGE_CSP):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1105 if(sim_data_len > CPHS_MAX_CSP2)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1106 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1107 TRACE_EVENT_P1("Risk of loss of Orange CSP2 data: sim_data_len: %d", sim_data_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1108 cphs_cached_params->orange_csp2_length = CPHS_MAX_CSP2;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1109 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1110 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1111 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1112 cphs_cached_params->orange_csp2_length = sim_data_len;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1113 TRACE_EVENT_P1("cphs_cached_params->orange_csp2_length: %d",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1114 cphs_cached_params->orange_csp2_length);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1115 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1116 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1117

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1118 case(CPHS_SIM_CINF):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1119 TRACE_EVENT_P3("CPHS info phase: %d sst: %02X, %02X",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1120 cphs_internal_params->tmp_info[0],

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1121 cphs_internal_params->tmp_info[1],

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1122 cphs_internal_params->tmp_info[2]);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1123

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1124 cphs_cached_params->info.phase = cphs_internal_params->tmp_info[0];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1125

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1126 cphs_cached_params->info.sst = 0x0000;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1127

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1128 if(sim_data_len > 1)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1129 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1130 cphs_cached_params->info.sst = (cphs_internal_params->tmp_info[1] << 8);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1131 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1132

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1133 if(sim_data_len < CINF_SIZE)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1134 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1135 /* Typically there should be at least 3 bytes in CPHS information Ef_File:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1136 however, there are some SIMs with only 2 bytes... :-( Maybe with Phase 3 ?? */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1137 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1138 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1139 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1140 temp_sst_ushort2 = 0x00FF & (USHORT)(cphs_internal_params->tmp_info[2]);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1141 cphs_cached_params->info.sst |= temp_sst_ushort2;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1142 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1143

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1144 TRACE_EVENT_P1("cphs_cached_params->info.sst: %04X",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1145 cphs_cached_params->info.sst);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1146 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1147 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1148

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1149 if(set_next_state)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1150 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1151 cphs_set_next_update_state();

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1152 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1153

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1154 /* Continue cache from SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1155 cphs_cache_sim_data(max_records, sim_data_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1156 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1157

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1158 LOCAL void writing_vwi_ok(void)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1159 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1160 TRACE_FUNCTION("writing_vwi_ok()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1161

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1162 memcpy(cphs_cached_params->vwi_flags, cphs_internal_params->tmp_flag_set, VWI_SIZE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1163

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1164 TRACE_EVENT_P2("vwi_flags: %02X %02X", cphs_cached_params->vwi_flags[0],

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1165 cphs_cached_params->vwi_flags[1]);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1166

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1167 if(cphs_status EQ CPHS_WRITING_VWI)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1168 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1169 /* if this was initiated by user, then send final result */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1170 cphs_inform_user(CPHS_VOICE_MAIL_RES, CPHS_OK, NOT_PRESENT_8BIT, CPHS_LINE_NULL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1171 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1172 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1173 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1174 /* if this was initiated by network (upon receiving of an SMS, then send indication

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1175 to the user */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1176 cphs_inform_user( CPHS_VOICE_MAIL_IND, CPHS_OK, cphs_internal_params->tmp_activate_state,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1177 cphs_internal_params->tmp_lines );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1178 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1179 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1180

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1181 LOCAL void writing_cfu_ok(void)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1182 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1183 TRACE_FUNCTION("writing_cfu_ok()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1184

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1185 memcpy(cphs_cached_params->cfu_flags, cphs_internal_params->tmp_flag_set, CFU_SIZE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1186

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1187 TRACE_EVENT_P2("cfu_flags: %02X %02X", cphs_cached_params->cfu_flags[0],

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1188 cphs_cached_params->cfu_flags[1]);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1189

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1190 cphs_inform_user(CPHS_CFU_RES, CPHS_OK, NOT_PRESENT_8BIT, CPHS_LINE_NULL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1191 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1192

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1193 /* Positive Result of data SIM data access */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1194 GLOBAL void cphs_sim_data_accessed(UBYTE max_records, UBYTE data_len)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1195 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1196 TRACE_FUNCTION("cphs_sim_data_accessed()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1197

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1198 switch(cphs_status)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1199 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1200 case(CPHS_INITIALISING):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1201 case(CPHS_REFRESHING):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1202 cphs_init_sim_ok(max_records, data_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1203 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1204

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1205 case(CPHS_WRITING_VWI_IND):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1206 case(CPHS_WRITING_VWI):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1207 TRACE_EVENT_P1("vwi_flags length: %d bytes", data_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1208 writing_vwi_ok();

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1209 cphs_status = CPHS_INITIALISED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1210 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1211

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1212 case(CPHS_WRITING_CFU):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1213 /* cfu_flags is only updated if writing on SIM has been successful */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1214 TRACE_EVENT_P1("cfu_flags: %d bytes length", data_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1215 writing_cfu_ok();

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1216 cphs_status = CPHS_INITIALISED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1217 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1218

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1219 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1220 TRACE_EVENT("cphs_sim_data_accessed(): unexpected status");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1221 cphs_status = CPHS_INITIALISED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1222 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1223 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1224 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1225

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1226 LOCAL void cphs_init_sim_failure(void)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1227 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1228 TRACE_FUNCTION("cphs_init_sim_failure()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1229

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1230 /* set next operation if needed */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1231 switch(sim_cache_update_state)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1232 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1233 case(CPHS_SIM_INFO_NUMS):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1234 /* Special case: when reading information number, if file 6F19

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1235 is not present, another try should be done with EA01 for old SIMs */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1236 cphs_internal_params->current_record = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1237 free_buffer(RECORD_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1238 free_buffer(INFO_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1239 sim_cache_update_state = CPHS_SIM_INFO_NUMS_EA01;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1240 cphs_cache_sim_data(NOT_PRESENT_8BIT, NOT_PRESENT_8BIT);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1241 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1242

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1243 case(CPHS_SIM_INFO_NUMS_EA01):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1244 cphs_internal_params->current_record = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1245 free_buffer(RECORD_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1246 free_buffer(INFO_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1247 /* No information numbers found... */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1248 cphs_cached_params->max_info_numbers = NOT_PRESENT_8BIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1249 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1250

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1251 case(CPHS_SIM_ALSNAMES):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1252 cphs_internal_params->current_record = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1253 free_buffer(ALS_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1254 initialize_als_info(MAX_LINE_ID);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1255 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1256

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1257 case(CPHS_SIM_MB):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1258 cphs_internal_params->current_record = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1259 free_buffer(RECORD_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1260 free_buffer(MB_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1261 /* No mailbox numbers found... */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1262 cphs_cached_params->max_mb_numbers = NOT_PRESENT_8BIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1263 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1264 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1265

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1266 if(is_cphs_field_mandatory(sim_cache_update_state))

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1267 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1268 cphs_abort_current_action( );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1269 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1270 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1271

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1272 cphs_set_next_update_state();

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1273 cphs_cache_sim_data(NOT_PRESENT_8BIT, NOT_PRESENT_8BIT);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1274 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1275

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1276 /* Failure Result of data SIM data access */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1277 GLOBAL void cphs_sim_data_failure(void)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1278 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1279 TRACE_FUNCTION("cphs_sim_data_failure()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1280

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1281 switch(cphs_status)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1282 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1283 case(CPHS_INITIALISING):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1284 case(CPHS_REFRESHING):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1285 cphs_init_sim_failure();

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1286 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1287

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1288 case(CPHS_WRITING_VWI):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1289 TRACE_ERROR("Voice Mail Indicator setting: SIM FAILURE !!!!");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1290 cphs_status = CPHS_INITIALISED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1291 cphs_inform_user(CPHS_VOICE_MAIL_RES, CPHS_FAIL,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1292 NOT_PRESENT_8BIT, CPHS_LINE_NULL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1293 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1294

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1295 case(CPHS_WRITING_VWI_IND):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1296 TRACE_ERROR("Voice Mail Indication: SIM FAILURE !!!!");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1297 cphs_status = CPHS_INITIALISED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1298 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1299

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1300 case(CPHS_WRITING_CFU):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1301 TRACE_ERROR("Call Fwd Flags: SIM FAILURE !!!!");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1302 cphs_inform_user(CPHS_CFU_RES, CPHS_FAIL,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1303 NOT_PRESENT_8BIT, CPHS_LINE_NULL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1304 cphs_status = CPHS_INITIALISED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1305 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1306

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1307 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1308 TRACE_EVENT("cphs_sim_data_failure(): unexpected status");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1309 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1310 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1311 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1312

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1313 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1314 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1315 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1316 | STATE : code ROUTINE : starts/ends/refreshes |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1317 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1318

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1319 PURPOSE : Set of functions enabling initialising, ending or refreshing

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1320 the CPHS module.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1321 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1322

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1323 GLOBAL T_CPHS_RET cphs_start (T_CPHS_USER_CB *cphs_user_cb)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1324 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1325 TRACE_FUNCTION("cphs_start()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1326

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1327 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1328 switch(cphs_status)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1329 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1330 case(CPHS_NOT_INITIALISED):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1331 TRACE_EVENT("CPHS starting !!!");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1332 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1333

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1334 case(CPHS_INITIALISED):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1335 TRACE_EVENT("cphs_start: CPHS module already initialised");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1336 return(CPHS_OK);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1337

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1338 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1339 TRACE_EVENT("cphs_start: CPHS has already been initialised: BUSY !!!");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1340 return(CPHS_BUSY);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1341 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1342

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1343 if(cphs_user_cb EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1344 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1345 TRACE_ERROR("cphs_start: cphs_user_cb is NULL. CPHS module cannot be initialised");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1346 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1347 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1348

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1349 /* allocate memory for parameters to be cached from the SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1350 MALLOC(cphs_cached_params, sizeof(T_CPHS_CACHED_PARAMS));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1351

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1352 cphs_cached_params->max_mb_numbers = NOT_PRESENT_8BIT; //MAX_LINE_ID;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1353 cphs_cached_params->mb_numbers = NULL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1354 cphs_cached_params->max_info_numbers = NOT_PRESENT_8BIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1355 cphs_cached_params->info_numbers = NULL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1356 cphs_cached_params->als = NULL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1357 cphs_cached_params->max_als_names_entries = NOT_PRESENT_8BIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1358

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1359 memset(cphs_cached_params->opn_long, 0, sizeof(cphs_cached_params->opn_long));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1360 memset(cphs_cached_params->opn_short, 0, sizeof(cphs_cached_params->opn_short));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1361 memset(cphs_cached_params->csp, 0, sizeof(cphs_cached_params->csp));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1362 /* Add support for Orange SIM's */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1363 memset(cphs_cached_params->orange_csp2, 0, sizeof(cphs_cached_params->orange_csp2));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1364 cphs_cached_params->orange_csp2_length = 0; /* Set this to 0, will indicate if vaild */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1365

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1366 MALLOC(cphs_internal_params, sizeof(T_CPHS_INTERNAL_PARAMS));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1367 /* Set user callback */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1368 cphs_internal_params->user_cb = cphs_user_cb;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1369

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1370 cphs_internal_params->current_record = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1371 cphs_internal_params->sim_read_record_buffer = NULL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1372

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1373

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1374 /****** Get params from SIM *******/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1375 cphs_status = CPHS_INITIALISING;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1376

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1377 cphs_cache_sim_data(NOT_PRESENT_8BIT, NOT_PRESENT_8BIT);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1378

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1379 return(CPHS_EXEC);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1380 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1381

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1382

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1383 GLOBAL T_CPHS_RET cphs_refresh_data (void)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1384 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1385 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1386

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1387 TRACE_FUNCTION("cphs_refresh_data()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1388

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1389 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1390 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1391 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1392 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1393 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1394

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1395 cphs_status = CPHS_REFRESHING;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1396

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1397 /****** Get params from SIM *******/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1398 cphs_cache_sim_data(NOT_PRESENT_8BIT, NOT_PRESENT_8BIT);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1399

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1400 return(CPHS_EXEC);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1401 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1402

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1403 GLOBAL T_CPHS_RET cphs_stop (void)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1404 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1405 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1406

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1407 TRACE_FUNCTION("cphs_stop()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1408

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1409 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1410 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1411 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1412 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1413 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1414

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1415 /* abort current action */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1416 cphs_abort_current_action( );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1417

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1418 /* reinitialise CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1419 cphs_status = CPHS_NOT_INITIALISED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1420

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1421 /* free memory allocated for CPHS */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1422 free_buffer(INFO_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1423 free_buffer(ALS_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1424 free_buffer(MB_BUFF);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1425

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1426 MFREE(cphs_cached_params);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1427 MFREE(cphs_internal_params);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1428

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1429 return(CPHS_OK);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1430 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1431

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1432 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1433 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1434 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1435 | STATE : code ROUTINE : |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1436 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1437

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1438 PURPOSE : Functions related to CPHS information numbers.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1439 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1440

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1441 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1442 Returns elements contained in a folder.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1443

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1444 element_idx Index of folder element to be explored

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1445 inf_num_list returns list of indexes of elements contained in folder

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1446 max_elmts limits amount of bytes to be written in inf_num_indexes.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1447 If numbers of elements to be written is bigger, then function returns

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1448 with CPHS_EXEC and amount of elements will be written in max_elmts

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1449 (so that function caller knows how many memory it has to allocate

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1450 to retrieve the whole list). */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1451

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1452 GLOBAL T_CPHS_RET cphs_explore_info_nbs(UBYTE element_idx, UBYTE *inf_num_indexes, UBYTE *max_elmts)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1453 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1454 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1455 T_CPHS_INF_NUM *explored_folder,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1456 *try_element;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1457 UBYTE i = 0, index;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1458

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1459 TRACE_FUNCTION("cphs_explore_info_nbs()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1460

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1461 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1462 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1463 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1464 /* CPHS status not initialized, set error as CME_ERR_OpNotAllow */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1465 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_OpNotAllow );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1466 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1467 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1468 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1469 ret_status = CPHS_OK; // unless we then find out buffer was too small...

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1470

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1471 if(cphs_cached_params EQ NULL OR

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1472 inf_num_indexes EQ NULL OR

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1473 max_elmts EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1474 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1475 TRACE_ERROR("cphs_explore_info_nbs: some needed pointers have value NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1476 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1477 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1478

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1479 /* init */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1480 *inf_num_indexes = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1481

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1482 if(element_idx > cphs_cached_params->max_info_numbers)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1483 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1484 TRACE_ERROR("wrong element_idx");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1485 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1486 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1487

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1488 /* Check for info_numbers, set CME_ERR_NotFound return CPHS_FAIL */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1489 if (cphs_cached_params->info_numbers EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1490 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1491 /* information numbers have not been read from SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1492 *max_elmts = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1493 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_NotFound );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1494 return (CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1495 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1496

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1497 explored_folder = &cphs_cached_params->info_numbers[element_idx];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1498

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1499 if(explored_folder->number[0] NEQ 0)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1500 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1501 TRACE_EVENT_P1("Cannot explore: element %d is not a folder", element_idx);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1502 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1503 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1504

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1505 index = element_idx + 1;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1506 try_element = &cphs_cached_params->info_numbers[index];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1507

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1508 while(try_element->index_level NEQ explored_folder->index_level) // search for next element of same index_level

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1509 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1510 if( try_element->index_level EQ (explored_folder->index_level+1) ) // element is direct under folder

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1511 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1512 if(i < *max_elmts)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1513 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1514 inf_num_indexes[i] = index;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1515 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1516 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1517 ret_status = CPHS_EXEC; // buffer is too small: but we need to count how many bytes are then needed

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1518

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1519 i++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1520 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1521 index++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1522 try_element = &cphs_cached_params->info_numbers[index];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1523

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1524 if(index > cphs_cached_params->max_info_numbers)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1525 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1526 break; /* end of list: can happen, e.g when exploring the last folder of a given index_level */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1527 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1528 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1529

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1530 *max_elmts = i;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1531 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1532 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1533

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1534 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1535 Returns information related to element id

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1536

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1537 element_idx Index of element chosen

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1538 inf_num structure containing information related to an element */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1539

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1540 GLOBAL T_CPHS_RET cphs_read_info_nb (UBYTE element_idx, T_CPHS_INF_NUM *inf_num)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1541 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1542 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1543

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1544 TRACE_FUNCTION("cphs_read_info_nb()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1545

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1546 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1547 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1548 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1549 /* CPHS status not initialized, set error as CME_ERR_OpNotAllow */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1550 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_OpNotAllow );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1551 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1552 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1553

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1554 if(cphs_cached_params EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1555 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1556 TRACE_ERROR("cphs_cached_params EQ NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1557 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1558 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1559

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1560 /* Check Information numbers are cached or not */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1561 if(cphs_cached_params->info_numbers EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1562 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1563 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_NotFound );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1564 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1565 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1566

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1567 if(element_idx < 1 OR

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1568 element_idx > cphs_cached_params->max_info_numbers)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1569 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1570 TRACE_ERROR("wrong element_idx");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1571 /* Element index not in the range, set CME_ERR_InvIdx */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1572 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_InvIdx );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1573 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1574 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1575

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1576 memcpy(inf_num, &cphs_cached_params->info_numbers[element_idx], sizeof(T_CPHS_INF_NUM));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1577

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1578 return(CPHS_OK);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1579 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1580

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1581 GLOBAL T_CPHS_RET cphs_info_num_get_max(UBYTE *max_index)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1582 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1583 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1584

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1585 TRACE_FUNCTION("cphs_info_num_get_max()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1586

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1587 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1588 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1589 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1590 /* CPHS status not initialized, set error as CME_ERR_OpNotAllow */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1591 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_OpNotAllow );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1592 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1593 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1594

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1595 if(cphs_cached_params NEQ NULL AND

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1596 cphs_cached_params->max_info_numbers NEQ NOT_PRESENT_8BIT)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1597 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1598 *max_index = cphs_cached_params->max_info_numbers;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1599 return(CPHS_OK);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1600 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1601

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1602 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_NotFound );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1603 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1604 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1605

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1606 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1607 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1608 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1609 | STATE : code ROUTINE : |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1610 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1611

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1612 PURPOSE : Functions related to CPHS alternate line service.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1613 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1614

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1615 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1616 Returns elements contained in a folder.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1617

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1618 call_id call id of line being queried. This value is the same as the call id

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1619 described in GSM 02.30 subclause 4.5.5.1 (also see AT+CLCC). If not present

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1620 (value 255), then current active line is to be returned.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1621 line contains line of queried call, or current active line.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1622 line_desc line identification in SIM

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1623 max_line_desc maximal length of line_desc:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1624 IN: should contain the size of memory allocated for line_desc.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1625 OUT: If memory is not enough, then function returns with CPHS_FAIL

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1626 and max_line_desc will contain the amount of memory needed.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1627 Otherwise contains amount of written characters. */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1628

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1629

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1630 GLOBAL T_CPHS_RET cphs_get_line(UBYTE srcId, UBYTE call_id, T_CPHS_LINES *line,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1631 CHAR *line_desc, UBYTE *max_line_desc)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1632 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1633 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1634 T_CPHS_LINES call_line;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1635 CHAR *cached_line_name;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1636

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1637 TRACE_FUNCTION("cphs_get_line()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1638

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1639 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1640 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1641 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1642 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1643 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1644

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1645 if(line EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1646 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1647 TRACE_ERROR("wrong parameter: line is NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1648 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1649 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1650

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1651 if(call_id EQ NOT_PRESENT_8BIT)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1652 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1653 /* Get current active line */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1654 cphs_get_als_active_line(srcId, &call_line);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1655 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1656 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1657 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1658 /* get line associated to call_id */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1659 call_line = als_get_call_info(call_id);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1660 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1661

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1662 if( call_line EQ CPHS_LINE_NULL )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1663 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1664 TRACE_ERROR("als_get_call_info: not a valid call");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1665 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1666 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1667 *line = call_line;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1668

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1669 if(max_line_desc EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1670 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1671 TRACE_ERROR("max_line_desc EQ NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1672 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1673 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1674

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1675 if(*max_line_desc < CPHS_MAX_SIZE_ALPHA)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1676 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1677 // buffer too small

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1678 *max_line_desc = CPHS_MAX_SIZE_ALPHA;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1679 return(CPHS_EXEC);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1680 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1681

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1682 get_name_pointer_over_lineid(call_line, &cached_line_name,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1683 cphs_cached_params->max_als_names_entries);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1684 if(cached_line_name NEQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1685 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1686 memcpy(line_desc, cached_line_name, *max_line_desc);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1687 return(CPHS_OK);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1688 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1689 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1690 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1691 memset(line_desc, 0, *max_line_desc);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1692 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1693 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1694 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1695

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1696

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1697 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1698 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1699 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1700 | STATE : code ROUTINE : cphs_roaming_ind |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1701 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1702

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1703 PURPOSE :

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1704 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1705

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1706 GLOBAL void cphs_roaming_ind(UBYTE roaming_status)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1707 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1708 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1709

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1710 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1711 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1712 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1713 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1714 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1715

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1716 TRACE_FUNCTION("cphs_roaming_ind()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1717

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1718 /* inform user */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1719 cphs_inform_user(CPHS_ROAM_IND, CPHS_OK, roaming_status, CPHS_LINE_NULL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1720 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1721

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1722 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1723 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1724 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1725 | STATE : code ROUTINE : cphs_voice_mail_ind |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1726 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1727

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1728 PURPOSE :

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1729 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1730

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1731 GLOBAL void cphs_voice_mail_ind (UBYTE flag_set, USHORT line)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1732 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1733 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1734

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1735 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1736 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1737 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1738 TRACE_ERROR("cannot proceed Voice Mail Indication: CPHS module is busy");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1739 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1740 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1741

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1742 TRACE_FUNCTION("cphs_voice_mail_ind()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1743

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1744 /* write to SIM and in cached data */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1745 cphs_status = CPHS_WRITING_VWI_IND;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1746

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1747 cphs_write_indicator_flag(flag_set, line, CPHS_SIM_VWI);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1748

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1749 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1750 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1751

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1752 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1753 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1754 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1755 | STATE : code ROUTINE : cphs_set_waiting_flag |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1756 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1757

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1758 PURPOSE : set/clear waiting flag for given lines

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1759 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1760

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1761 GLOBAL T_CPHS_RET cphs_set_waiting_flag(UBYTE flag_set, T_CPHS_LINES lines)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1762 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1763 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1764

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1765 TRACE_FUNCTION("cphs_set_waiting_flag()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1766

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1767 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1768 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1769 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1770 TRACE_ERROR("cannot proceed SET of Voice Mail Indicator: CPHS module is busy");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1771 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_OpNotAllow );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1772 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1773 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1774

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1775 cphs_status = CPHS_WRITING_VWI;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1776

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1777 cphs_write_indicator_flag(flag_set, lines, CPHS_SIM_VWI);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1778

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1779 return(CPHS_EXEC);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1780 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1781

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1782

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1783 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1784 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1785 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1786 | STATE : code ROUTINE : cphs_get_waiting_flag |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1787 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1788

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1789 PURPOSE : look up if waiting flag for queried line is set

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1790 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1791

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1792 GLOBAL T_CPHS_RET cphs_get_waiting_flag(UBYTE *flag_set, T_CPHS_LINES line)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1793 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1794 UBYTE setting = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1795 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1796

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1797 TRACE_FUNCTION("cphs_get_waiting_flag()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1798

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1799 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1800 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1801 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1802 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1803 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1804

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1805 ret_status = cphs_get_indicator_flag(flag_set, line, CPHS_SIM_VWI);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1806

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1807 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1808 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1809

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1810 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1811 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1812 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1813 | STATE : code ROUTINE : cphs_get_opn |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1814 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1815

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1816 PURPOSE : look up operator name string and if available operator

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1817 name short string

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1818 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1819

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1820 GLOBAL T_CPHS_RET cphs_get_opn( CHAR *longname,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1821 UBYTE *max_longname,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1822 CHAR *shortname,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1823 UBYTE *max_shortname)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1824

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1825 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1826 UBYTE len, i;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1827 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1828 BOOL buffer_too_small = FALSE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1829

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1830 TRACE_FUNCTION("cphs_get_opn()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1831

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1832 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1833 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1834 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1835 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_OpNotAllow );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1836 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1837 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1838

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1839 /* Length of Long Operator Name */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1840 len = strlen((CHAR *)cphs_cached_params->opn_long);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1841 for(i=0; i<len; i++)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1842 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1843 if(cphs_cached_params->opn_long[i] EQ 0xFF)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1844 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1845 len = i;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1846 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1847 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1848 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1849

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1850 TRACE_EVENT_P1("opn_long length %d", len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1851

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1852 if( len > *max_longname )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1853 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1854 TRACE_EVENT_P1("buffer for long name is not big enough: needed: %d", len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1855 *max_longname = len;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1856 buffer_too_small = TRUE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1857 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1858 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1859 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1860 *max_longname = len;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1861 memcpy(longname, cphs_cached_params->opn_long, (int) len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1862 longname[len] = '\0';

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1863 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1864

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1865 /* Length of SHORT Operator Name */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1866 len = strlen((CHAR *)cphs_cached_params->opn_short);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1867 for(i=0; i<len; i++)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1868 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1869 if(cphs_cached_params->opn_short[i] EQ 0xFF)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1870 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1871 len = i;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1872 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1873 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1874 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1875

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1876 TRACE_EVENT_P1("opn_short length %d", len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1877

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1878 if( len > *max_shortname )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1879 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1880 TRACE_EVENT_P1("buffer for short name is not big enough: needed: %d", len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1881 *max_shortname = len;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1882 buffer_too_small = TRUE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1883 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1884 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1885 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1886 *max_shortname = len;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1887 memcpy(shortname, cphs_cached_params->opn_short, (int) len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1888 shortname[len] = '\0';

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1889 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1890

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1891 if(buffer_too_small)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1892 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1893 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1894 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1895 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1896 return(CPHS_OK);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1897 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1898

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1899

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1900 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1901 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1902 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1903 | STATE : code ROUTINE : cphs_get_cphs_info |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1904 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1905

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1906 PURPOSE : look up cphs info

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1907 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1908

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1909 GLOBAL T_CPHS_RET cphs_get_cphs_info( UBYTE *phase,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1910 USHORT *sst)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1911 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1912 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1913

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1914 TRACE_FUNCTION("cphs_get_cphs_info()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1915

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1916 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1917 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1918 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1919 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1920 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1921

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1922 *phase = cphs_cached_params->info.phase;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1923 *sst = cphs_cached_params->info.sst;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1924

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1925 return CPHS_OK;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1926 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1927

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1928 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1929 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1930 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1931 | STATE : code ROUTINE : cphs_parse_csp |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1932 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1933

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1934 PURPOSE : Look up CSP information

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1935 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1936 LOCAL T_CPHS_RET cphs_parse_csp ( UBYTE *cached_csp,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1937 CHAR *parsed_csp,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1938 UBYTE cached_csp_length,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1939 UBYTE *parsed_csp_length)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1940 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1941 UBYTE pos;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1942 T_CPHS_RET ret_val = CPHS_OK;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1943

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1944 TRACE_FUNCTION("cphs_parse_csp()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1945

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1946 /* Cached CSP not present return CPHS_FAIL */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1947 if (cached_csp EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1948 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1949 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1950 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1951

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1952 /* analyze max size of csp hex string */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1953 if(*parsed_csp_length < (2*cached_csp_length + 1))

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1954 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1955 TRACE_EVENT_P1("buffer for CSP is too small: needed : %d",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1956 cached_csp_length);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1957 *parsed_csp_length = (2*cached_csp_length + 1);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1958 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1959 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1960

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1961 /* convert to hex string */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1962 for(pos=0,*parsed_csp_length = 0; pos < cached_csp_length; pos++,*parsed_csp_length = pos*2)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1963 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1964 sprintf(parsed_csp + (*parsed_csp_length), "%02X", cached_csp[pos]);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1965 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1966

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1967 /* terminate string */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1968 parsed_csp[*parsed_csp_length] = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1969

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1970 /* set actual size of csp hex string */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1971 *parsed_csp_length++;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1972

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1973 return CPHS_OK;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1974 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1975

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1976 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1977 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1978 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1979 | STATE : code ROUTINE : cphs_get_csprof |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1980 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1981

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1982 PURPOSE : look up cphs info

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1983 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1984

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1985 GLOBAL T_CPHS_RET cphs_get_csprof( CHAR *csp,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1986 CHAR *csp2,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1987 UBYTE *max_csp_length,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1988 UBYTE *max_csp2_length)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1989 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1990 T_CPHS_RET ret_val = CPHS_OK;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1991

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1992 TRACE_FUNCTION("cphs_get_csprof()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1993

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1994 ret_val = cphs_parse_csp( cphs_cached_params->csp,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1995 csp,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1996 cphs_cached_params->csp_length,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1997 max_csp_length);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1998

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

1999 if (ret_val EQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2000 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2001 ret_val = cphs_parse_csp( cphs_cached_params->orange_csp2,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2002 csp2,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2003 cphs_cached_params->orange_csp2_length,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2004 max_csp2_length);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2005 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2006 return ret_val;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2007 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2008

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2009

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2010 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2011 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2012 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2013 | STATE : code ROUTINE : cphs_read_mb_number |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2014 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2015

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2016 PURPOSE : read mailbox number for given record id

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2017 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2018

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2019 GLOBAL T_CPHS_RET cphs_read_mb_number( UBYTE rec_id,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2020 T_CPHS_MB *mailbox_entry)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2021 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2022 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2023

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2024 TRACE_FUNCTION("cphs_read_mb_number()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2025

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2026 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2027 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2028 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2029 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_OpNotAllow);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2030 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2031 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2032

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2033 if(cphs_cached_params EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2034 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2035 TRACE_ERROR("cphs_cached_params EQ NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2036 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_Unknown);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2037 return CPHS_FAIL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2038 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2039

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2040 if ( (rec_id < 1) OR (rec_id > cphs_cached_params->max_mb_numbers) )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2041 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2042 TRACE_ERROR("invalid record id, return CPHS_FAIL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2043 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_InvIdx);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2044 return CPHS_FAIL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2045 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2046

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2047 if (cphs_cached_params->mb_numbers NEQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2048 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2049 memcpy(mailbox_entry,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2050 &cphs_cached_params->mb_numbers[rec_id-1],

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2051 sizeof(T_CPHS_MB));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2052 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2053 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2054 { /* requested mb number has not been read from SIM,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2055 return empty mb number */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2056 memset(mailbox_entry, 0, sizeof(T_CPHS_MB));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2057 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2058

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2059 return CPHS_OK;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2060 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2061

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2062 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2063 +----------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2064 | PROJECT : GSM-F&D (8411) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2065 | STATE : code ROUTINE : cphs_state_indication|

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2066 +----------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2067

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2068 PURPOSE : state the result to the user

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2069 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2070

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2071 GLOBAL SHORT cphs_state_indication ( UBYTE psaStatus, SHORT cmeError )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2072 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2073 UBYTE cmdBuf;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2074 UBYTE ownBuf;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2075 T_PHB_CMD_PRM * pPHBCmdPrm;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2076

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2077 TRACE_FUNCTION ("cphs_state_indication()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2078

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2079 cmdBuf = simEntStat.curCmd;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2080 ownBuf = simEntStat.entOwn;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2081

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2082 switch ( psaStatus )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2083 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2084 case ( CPHS_SIM_WRITE_OK ):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2085 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2086 R_AT (RAT_OK, ownBuf) (cmdBuf);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2087 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2088 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2089 case ( CPHS_SIM_WRITE_FAIL ):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2090 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2091 TRACE_EVENT("cphs_state_indication: SIM write failed");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2092 R_AT( RAT_CME, ownBuf)( cmdBuf, cmeError );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2093 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2094 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2095 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2096 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2097 TRACE_EVENT("FATAL ERROR in cmhCHPS_StatIndication");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2098 return -1;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2099 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2100 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2101

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2102 /* trigger RAT indications to the user */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2103 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2104 for( idx = 0; idx < CMD_SRC_MAX; idx++ )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2105 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2106 R_AT( RAT_PHB_STATUS, idx )( cmhStatus );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2107 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2108 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2109 simEntStat.curCmd = AT_CMD_NONE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2110 simEntStat.entOwn = simShrdPrm.owner = CMD_SRC_NONE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2111

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2112 return 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2113 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2114

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2115 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2116 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2117 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2118 | STATE : code ROUTINE : cphs_write_mb_number_cb |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2119 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2120

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2121 PURPOSE : write mailbox entry callback

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2122

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2123 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2124

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2125 GLOBAL void cphs_write_mb_number_cb( SHORT table_id )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2126 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2127

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2128 TRACE_FUNCTION("cphs_write_mb_number_cb()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2129

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2130 simShrdPrm.atb[table_id].ntryUsdFlg = FALSE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2131

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2132 if (simShrdPrm.atb[table_id].errCode NEQ SIM_NO_ERROR)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2133 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2134 TRACE_ERROR("cphs_write_mb_number_cb(): error for writing");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2135 cphs_state_indication( CPHS_SIM_WRITE_FAIL,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2136 (SHORT)cmhSIM_GetCmeFromSim( simShrdPrm.atb[table_id].errCode ));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2137 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2138 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2139 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2140 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2141 /* write to ME cache */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2142 write_mb_number(simShrdPrm.atb[table_id].recNr,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2143 exchData,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2144 cphs_cached_params->max_mb_entry_length);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2145 /* reset exchange data */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2146 memset(exchData, 0xFF, 100);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2147 cphs_state_indication ( CPHS_SIM_WRITE_OK, CME_ERR_NotPresent );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2148 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2149 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2150 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2151

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2152 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2153 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2154 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2155 | STATE : code ROUTINE : cphs_write_mb_number |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2156 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2157

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2158 PURPOSE : write mailbox number for given record id

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2159 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2160

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2161 GLOBAL T_CPHS_RET cphs_write_mb_number( UBYTE srcId,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2162 UBYTE rec_id,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2163 UBYTE *tag,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2164 UBYTE tag_len,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2165 UBYTE bcd_len,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2166 UBYTE *number,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2167 UBYTE ton_npi)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2168 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2169 UBYTE tmp_tag_len = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2170 UBYTE max_aplha_len = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2171 UBYTE max_entry_len = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2172

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2173 T_ACI_RETURN result;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2174

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2175 TRACE_FUNCTION("cphs_write_mb_number()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2176

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2177 /* test state of CPHS */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2178 if(cphs_cached_params EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2179 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2180 TRACE_ERROR("cphs_cached_params EQ NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2181 return CPHS_NOT_INIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2182 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2183

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2184 max_aplha_len = cphs_cached_params->max_mb_entry_length - CPHS_MIN_MB_LEN;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2185 max_entry_len = cphs_cached_params->max_mb_entry_length;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2186

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2187 /* test whether alpha tag is too long */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2188 if ( tag_len > max_aplha_len )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2189 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2190 return CPHS_FAIL;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2191 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2192

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2193 /* test if mb numbers are supported/initialized */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2194 if ((cphs_cached_params->mb_numbers NEQ NULL) &&

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2195 ( rec_id <= cphs_cached_params->max_mb_numbers ))

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2196 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2197

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2198 /* write mb number to SIM - prepare data */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2199 /* get length of alpha tag */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2200 tmp_tag_len = pb_get_entry_len( tag, max_aplha_len );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2201

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2202 /* reset exchData */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2203 memset(exchData, 0xFF, DEFAULT_MAXSIZE_OF_RECORD);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2204 if ((number NEQ NULL)||(tag NEQ NULL)) /* NULL causes delete of record */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2205 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2206 /* alpha tag */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2207 memcpy(exchData, tag, tmp_tag_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2208 /* length of bcd number content */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2209 exchData[max_aplha_len] = bcd_len+1;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2210 /* ton_npi */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2211 exchData[max_aplha_len+1] = ton_npi;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2212 /* BCD number */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2213 if (number NEQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2214 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2215 memcpy((char *)&exchData[max_aplha_len+2],

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2216 (char *)number, CPHS_MAX_MB_NUMBER_BYTES);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2217 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2218 /* Capability field (empty) */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2219 exchData[max_aplha_len+12] = NOT_PRESENT_8BIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2220 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2221 /* write to SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2222 result= cmhSIM_WriteRecordEF( srcId,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2223 AT_CMD_CPMBW,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2224 SIM_CPHS_MBXN,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2225 rec_id,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2226 max_entry_len,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2227 exchData,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2228 cphs_write_mb_number_cb );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2229

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2230 /* write to ME cache */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2231 if (result EQ AT_EXCT)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2232 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2233 write_mb_number(rec_id, exchData, max_entry_len);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2234 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2235 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2236 else /* no mb supported */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2237 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2238 return CPHS_NOT_INIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2239 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2240 return CPHS_EXEC;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2241 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2242

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2243

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2244 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2245 +----------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2246 | PROJECT : GSM-F&D (8411) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2247 | STATE : code ROUTINE : cphs_get_mb_parameter|

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2248 +----------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2249

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2250 PURPOSE : replies the CPHS mailbox parameters for test command

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2251 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2252

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2253 GLOBAL T_CPHS_RET cphs_get_mb_parameter (SHORT* firstIdx,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2254 SHORT* lastIdx,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2255 UBYTE* nlength,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2256 UBYTE* tlength )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2257 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2258

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2259 UBYTE max_entry_len = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2260 UBYTE max_entries = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2261

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2262 TRACE_FUNCTION ("cphs_get_mb_parameter()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2263

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2264 if(cphs_cached_params EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2265 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2266 TRACE_ERROR("cphs_cached_params EQ NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2267 return CPHS_NOT_INIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2268 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2269

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2270 max_entries = cphs_cached_params->max_mb_numbers;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2271 max_entry_len = cphs_cached_params->max_mb_entry_length;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2272

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2273 /* handle index */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2274 if ( max_entries > 0 )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2275 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2276 *firstIdx = (SHORT) CPHS_MIN_MB_ENTRIES;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2277 *lastIdx = (SHORT) max_entries;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2278 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2279 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2280 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2281 *lastIdx = *firstIdx = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2282 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2283 /* handle entry length */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2284 if ( max_entry_len >= CPHS_MIN_MB_LEN )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2285 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2286 *tlength = max_entry_len - CPHS_MIN_MB_LEN;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2287 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2288 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2289 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2290 *tlength = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2291 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2292

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2293 /* handle number length */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2294

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2295 *nlength = CPHS_MAX_MB_NUMBER_BYTES;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2296

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2297 return CPHS_OK;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2298 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2299

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2300

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2301 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2302 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2303 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2304 | STATE : code ROUTINE : cphs_get_fwd_flag |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2305 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2306

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2307 PURPOSE : returns setting of CFU flag for given line

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2308 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2309

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2310 #define SIM_FLAG_ON (0x0A)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2311 #define SIM_FLAG_OFF (0x05)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2312 #define SIM_FLAG_NONE (0x00)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2313

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2314 /* if nibble = 0 (1st nibble)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2315 #define GET_FLAG_VALUE(flag, nibble) ( (flag & (0xF0)) >> 4 )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2316 if nibble=1 (2nd nibble)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2317 #define GET_FLAG_VALUE(flag, nibble) (flag & 0x0F)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2318 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2319 #define GET_FLAG_VALUE(flag, nibble) ( (flag & (0x0F << (4 * (nibble ? 0 : 1)))) \

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2320 >> (4 * (nibble ? 0 : 1)) )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2321

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2322 LOCAL void get_relevant_flag_struct(UBYTE indicator, UBYTE **flag_table /*, UBYTE **temp_flag_table*/)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2323 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2324 UBYTE *intern_flag_table;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2325

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2326 switch(indicator)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2327 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2328 case(CPHS_SIM_CFU):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2329 intern_flag_table = cphs_cached_params->cfu_flags;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2330 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2331

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2332 case(CPHS_SIM_VWI):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2333 intern_flag_table = cphs_cached_params->vwi_flags;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2334 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2335

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2336 default: /* shall be eventually removed ! */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2337 TRACE_ERROR("tttt: Wrong indicator value !!!");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2338 return;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2339 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2340

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2341 if(flag_table NEQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2342 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2343 *flag_table = intern_flag_table;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2344 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2345 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2346

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2347 LOCAL void get_byte_index_and_nibble(T_CPHS_LINES line, UBYTE *byte_index, UBYTE *nibble)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2348 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2349 /* byte: nibble1/nibble2 (nibble1 has value 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2350 nibble2 has value 1) */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2351 /* first byte: line1/line2 (first byte has value byte_index 0)*/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2352 /* second byte: fax/data (second byte has value byte_index 1)*/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2353 switch(line)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2354 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2355 case(CPHS_LINE1):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2356 *byte_index = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2357 *nibble = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2358 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2359

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2360 case(CPHS_LINE2):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2361 *byte_index = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2362 *nibble = 1;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2363 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2364

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2365 case(CPHS_LINE_FAX):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2366 *byte_index = 1;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2367 *nibble = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2368 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2369

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2370 case(CPHS_LINE_DATA):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2371 *byte_index = 1;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2372 *nibble = 1;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2373 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2374 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2375 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2376

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2377 LOCAL T_CPHS_RET cphs_get_indicator_flag(UBYTE *flag_set, T_CPHS_LINES line, UBYTE indicator)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2378 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2379 UBYTE setting;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2380 UBYTE byte_index, nibble;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2381 UBYTE *flag_table;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2382

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2383 TRACE_FUNCTION("cphs_get_indicator_flag()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2384

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2385 if(!cphs_line_makes_sense(line))

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2386 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2387 TRACE_EVENT_P1("Queried line %d does not exist", line);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2388 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2389 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2390

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2391 get_byte_index_and_nibble(line, &byte_index, &nibble);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2392

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2393 get_relevant_flag_struct(indicator, &flag_table /*, NULL*/ );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2394

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2395 setting = GET_FLAG_VALUE(flag_table[byte_index], nibble);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2396

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2397 switch(setting)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2398 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2399 case(SIM_FLAG_ON):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2400 *flag_set = CPHS_FLAG_ACTIVATED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2401 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2402

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2403 case(SIM_FLAG_OFF):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2404 *flag_set = CPHS_FLAG_DEACTIVATED;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2405 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2406

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2407 case(SIM_FLAG_NONE):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2408 *flag_set = CPHS_FLAG_NOT_PRESENT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2409 break;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2410

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2411 default:

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2412 TRACE_EVENT_P1("cphs: get flag value unexpected: %02X", setting);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2413 *flag_set = CPHS_FLAG_ERROR;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2414 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2415 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2416

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2417 TRACE_EVENT_P3("Get Indicator Flag: line: %d, setting: %X, flag_set: %d", line, setting, *flag_set);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2418

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2419 return(CPHS_OK);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2420 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2421

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2422 GLOBAL T_CPHS_RET cphs_get_fwd_flag(UBYTE *cfu_set, T_CPHS_LINES line)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2423 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2424 UBYTE setting = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2425 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2426

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2427 TRACE_FUNCTION("cphs_get_fwd_flag()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2428

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2429 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2430 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2431 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2432 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2433 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2434

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2435 return(cphs_get_indicator_flag(cfu_set, line, CPHS_SIM_CFU));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2436 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2437

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2438

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2439 #define WRITE_FLAG_VALUE(flag, nibble, sim_state) \

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2440 (flag = (flag & (0x0F << (4 * nibble))) | \

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2441 (sim_state << (4 * (nibble ? 0 : 1))))

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2442 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2443 #define WRITE_FLAG_VALUE(cfu, 0, state) (cfu = (cfu & 0x0F) | (state << 4))

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2444 #define WRITE_FLAG_VALUE(cfu, 1, state) (cfu = (cfu & 0xF0) | state)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2445 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2446

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2447 LOCAL void cphs_write_indicator_flag(UBYTE flag_set,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2448 T_CPHS_LINES lines,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2449 UBYTE indicator)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2450 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2451 UBYTE setting;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2452 UBYTE byte_index, nibble, table_length, i, sim_flag_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2453 UBYTE *flag_table;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2454 T_CPHS_LINES tested_line;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2455 T_CPHS_LINES really_written_lines;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2456

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2457 TRACE_FUNCTION("cphs_write_indicator_flag()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2458

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2459 really_written_lines = CPHS_LINE_NULL; /* init */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2460

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2461 if(flag_set EQ CPHS_FLAG_ACTIVATED)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2462 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2463 sim_flag_status = SIM_FLAG_ON;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2464 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2465 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2466 sim_flag_status = SIM_FLAG_OFF;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2467

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2468 get_relevant_flag_struct(indicator, &flag_table);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2469

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2470 /* init temp flags */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2471 memcpy(cphs_internal_params->tmp_flag_set, flag_table, FLAG_TABLE_SIZE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2472

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2473 if(flag_table[1] EQ 0x00)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2474 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2475 /* this means the optional FAX and DATA part is not present: write only 1st byte ! */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2476 table_length = 1;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2477 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2478 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2479 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2480 table_length = FLAG_TABLE_SIZE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2481 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2482

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2483 for(i=0;i<8*sizeof(T_CPHS_LINES);i++)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2484 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2485 tested_line = CPHS_LINE1 << i;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2486

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2487 if(tested_line & lines AND

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2488 cphs_line_makes_sense(tested_line) )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2489 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2490 get_byte_index_and_nibble(tested_line, &byte_index, &nibble);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2491

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2492 setting = GET_FLAG_VALUE(flag_table[byte_index], nibble);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2493

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2494 /* Only fields with an expected value (A or 5) can be written... It is assumed

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2495 here that other values mean the corresponding Indicator class is not relevant.

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2496 Therefore it will be ignored */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2497 if(setting EQ SIM_FLAG_ON OR

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2498 setting EQ SIM_FLAG_OFF)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2499 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2500 WRITE_FLAG_VALUE(cphs_internal_params->tmp_flag_set[byte_index],

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2501 nibble, sim_flag_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2502 really_written_lines |= tested_line;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2503 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2504 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2505 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2506 TRACE_EVENT_P2("Unexpected value for this indicator: Writing ignored: line: %d, setting: %X",

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2507 tested_line, setting);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2508 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2509 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2510 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2511

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2512 /* This is what will be shown to the user when writing on SIM has been successful */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2513 cphs_internal_params->tmp_activate_state = flag_set;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2514 cphs_internal_params->tmp_lines = really_written_lines;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2515

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2516 cphs_sim_access_data( CPHS_SIM_WRITE_TRANSP_EF,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2517 indicator,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2518 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2519 cphs_internal_params->tmp_flag_set,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2520 table_length );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2521 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2522

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2523 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2524 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2525 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2526 | STATE : code ROUTINE : cphs_set_cfu_flag |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2527 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2528

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2529 PURPOSE : set/clear cfu flag for given lines

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2530 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2531

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2532 GLOBAL T_CPHS_RET cphs_set_cfu_flag(UBYTE cfu_set, T_CPHS_LINES lines)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2533 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2534 T_CPHS_RET ret_status;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2535

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2536 /* Check CPHS status */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2537 if((ret_status = cphs_check_status( )) NEQ CPHS_OK)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2538 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2539 TRACE_ERROR("cannot proceed SET of Diverted Call Flag: CPHS module is busy");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2540 return(ret_status);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2541 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2542

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2543 TRACE_FUNCTION("cphs_set_cfu_flag()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2544

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2545 /* write to SIM and in cached data */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2546 cphs_status = CPHS_WRITING_CFU;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2547

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2548 cphs_write_indicator_flag(cfu_set, lines, CPHS_SIM_CFU);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2549

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2550 return(CPHS_EXEC);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2551 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2552

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2553 GLOBAL BOOL cphs_line_makes_sense(T_CPHS_LINES line)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2554 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2555 switch(line)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2556 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2557 case(CPHS_LINE1):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2558 case(CPHS_LINE2):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2559 case(CPHS_LINE_DATA):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2560 case(CPHS_LINE_FAX):

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2561 return(TRUE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2562

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2563 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2564

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2565 return(FALSE);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2566 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2567

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2568 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2569 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2570 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2571 | STATE : code ROUTINE : cphs_write_csp_cb |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2572 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2573

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2574 PURPOSE : write CSP entry callback

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2575

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2576 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2577 GLOBAL void cphs_write_csp_cb(SHORT table_id)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2578 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2579 TRACE_FUNCTION("cphs_write_csp_cb()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2580

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2581 simShrdPrm.atb[table_id].ntryUsdFlg = FALSE;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2582

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2583 if (simShrdPrm.atb[table_id].errCode NEQ SIM_NO_ERROR)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2584 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2585 TRACE_ERROR("cphs_write_csp_cb(): error for writing");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2586 cphs_state_indication( CPHS_SIM_WRITE_FAIL,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2587 (SHORT)cmhSIM_GetCmeFromSim( simShrdPrm.atb[table_id].errCode ));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2588 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2589 else

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2590 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2591 /* write to ME cache */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2592 write_csp_ok(exchData,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2593 cphs_cached_params->csp_length);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2594 /* reset exchange data */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2595 memset(exchData, 0xFF, sizeof(exchData));

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2596 cphs_state_indication ( CPHS_SIM_WRITE_OK, CME_ERR_NotPresent );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2597 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2598 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2599 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2600 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2601 | PROJECT : GSM-PS (6147) MODULE : CPHS |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2602 | STATE : code ROUTINE : cphs_set_csp_value |

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2603 +--------------------------------------------------------------------+

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2604

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2605 PURPOSE : write customer service profile

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2606 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2607 GLOBAL T_CPHS_RET cphs_set_csp_value(UBYTE srcId,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2608 UBYTE *csp,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2609 UBYTE csp_len)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2610 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2611 T_ACI_RETURN result;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2612 USHORT i,j;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2613 UBYTE max_csp_len = 0;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2614 TRACE_FUNCTION("cphs_set_csp_value()");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2615

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2616 /* test state of CPHS */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2617 if(cphs_cached_params EQ NULL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2618 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2619 TRACE_ERROR("cphs_cached_params EQ NULL");

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2620 return CPHS_NOT_INIT;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2621 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2622

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2623 /* set exchData and max csp length*/

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2624 max_csp_len = cphs_cached_params->csp_length;

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2625 memset(exchData, 0xFF, DEFAULT_MAXSIZE_OF_RECORD);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2626 memcpy(exchData, cphs_cached_params->csp, max_csp_len );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2627

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2628 /*

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2629 only for valid service groups, associated services are written to SIM

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2630 */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2631 if( csp NEQ NULL )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2632 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2633 for( i=0; i < csp_len; i+=2 )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2634 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2635 for( j=0; j < max_csp_len; j+=2 )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2636 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2637 if ( csp[i] EQ exchData[j] )

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2638 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2639 exchData[j+1] = csp[i+1];

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2640 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2641 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2642 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2643 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2644

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2645 /* write to SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2646 result = cmhSIM_WriteTranspEF(srcId,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2647 AT_CMD_CPINF,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2648 SIM_CPHS_CSP,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2649 0,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2650 max_csp_len,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2651 exchData,

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2652 cphs_write_csp_cb );

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2653

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2654 /* If error occured while writing to SIM */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2655 if (result EQ AT_FAIL)

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2656 {

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2657 return(CPHS_FAIL);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2658 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2659 return(CPHS_EXEC);

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2660 }

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2661

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2662 #endif /* CPHS_C */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2663 #endif /* FF_CPHS */

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2664

93999a60b835 src/aci2, src/condat2: import of g23m/condat source pieces from TCS211

Mychaela Falconia <falcon@freecalypso.org>

parents:

diff changeset

2665

FreeCalypso > hg > fc-magnetite

annotate src/aci2/aci/cphs.c @ 164:e4ae8dfb13e9