freecalypso-sw: gsm-fw/g23m-gsm/sim/sim

author	Michael Spacefalcon <msokolov@ivan.Harhan.ORG>
date	Sun, 28 Sep 2014 23:20:04 +0000
parents
children	ec171ca4afb4

rev	line source
673 2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	2 +-----------------------------------------------------------------------------
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	3 \| Project : GSM-F&D (8411)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	4 \| Modul : SIM_FKT
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	5 +-----------------------------------------------------------------------------
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	6 \| Copyright 2002 Texas Instruments Berlin, AG
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	7 \| All rights reserved.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	8 \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	9 \| This file is confidential and a trade secret of Texas
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	10 \| Instruments Berlin, AG
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	11 \| The receipt of or possession of this file does not convey
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	12 \| any rights to reproduce or disclose its contents or to
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	13 \| manufacture, use, or sell anything it may describe, in
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	14 \| whole, or in part, without the specific written consent of
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	15 \| Texas Instruments Berlin, AG.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	16 +-----------------------------------------------------------------------------
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	17 \| Purpose : This modul defines the wrapping functions for the
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	18 \| SIM application.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	19 +-----------------------------------------------------------------------------
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	20 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	21
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	22 #ifndef SIM_FKT_C
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	23 #define SIM_FKT_C
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	24
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	25 #define ENTITY_SIM
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	26
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	27 /==== INCLUDES ===================================================/
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	28
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	29 #include <string.h>
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	30 #include "typedefs.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	31 #include "pconst.cdg"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	32 #include "message.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	33 #include "ccdapi.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	34 #include "vsi.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	35 #include "custom.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	36 #include "gsm.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	37 #include "cnf_sim.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	38 #include "mon_sim.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	39 #include "prim.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	40 #include "pei.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	41 #include "tok.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	42 #include "sim.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	43 #include "sim_em.h"
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	44
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	45 /==== EXPORT =====================================================/
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	46 #ifdef _SIMULATION_
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	47 LOCAL USHORT first_time_into_fkt_select = TRUE;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	48 LOCAL USHORT file_id;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	49 #endif
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	50 GLOBAL USHORT stk_l_cmd = 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	51
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	52
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	53 /==== PRIVAT =====================================================/
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	54
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	55 /==== VARIABLES ==================================================/
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	56
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	57 /==== FUNCTIONS ===================================================/
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	58
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	59 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	60 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	61 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	62 \| STATE : code ROUTINE : FKT_check_pin_count \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	63 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	64
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	65 PURPOSE : PIN/PUK count is checked for secret code initialisation.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	66 count is set to zero, if not initialised, otherwise the
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	67 initialisation flag (most significant bit) is reset.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	68 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	69
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	70 GLOBAL UBYTE FKT_check_pin_count (UBYTE count)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	71 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	72 if ((count & 0x80) EQ 0)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	73 return 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	74
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	75 return count & 0x0F;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	76 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	77
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	78 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	79 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	80 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	81 \| STATE : code ROUTINE : FKT_convert_error \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	82 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	83
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	84 PURPOSE : Converts sw1 and sw2 to an unique error code for the
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	85 SIM application.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	86
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	87 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	88
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	89 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	90 * PIN/PUK is wrong, remaining attempts
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	91 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	92 const static USHORT sim_inv_chv_A [6] =
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	93 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	94 /* last requested PIN no error code */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	95 /* none */ SIM_CAUSE_OTHER_ERROR,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	96 /* PIN 1 */ SIM_CAUSE_PIN1_EXPECT,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	97 /* PIN 2 */ SIM_CAUSE_PIN2_EXPECT,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	98 /* PUK 1 */ SIM_CAUSE_PUK1_EXPECT,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	99 /* PUK 2 */ SIM_CAUSE_PUK2_EXPECT,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	100 /* NEVER */ SIM_CAUSE_ACCESS_PROHIBIT
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	101 };
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	102
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	103
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	104 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	105 * PIN/PUK is wrong, no remaining attempts
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	106 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	107 const static USHORT sim_inv_chv_B [6] =
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	108 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	109 /* last requested PIN no error code */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	110 /* none */ SIM_CAUSE_OTHER_ERROR,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	111 /* PIN 1 */ SIM_CAUSE_PIN1_BLOCKED,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	112 /* PIN 2 */ SIM_CAUSE_PIN2_BLOCKED,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	113 /* PUK 1 */ SIM_CAUSE_PUK1_BLOCKED,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	114 /* PUK 2 */ SIM_CAUSE_PUK2_BLOCKED,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	115 /* NEVER */ SIM_CAUSE_OTHER_ERROR
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	116 };
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	117
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	118 GLOBAL USHORT FKT_convert_error (USHORT sw1sw2, USHORT size)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	119 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	120 TRACE_FUNCTION ("FKT_convert_error()");
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	121
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	122 sim_data.sw1 = (UBYTE)(sw1sw2 >> 8);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	123 sim_data.sw2 = (UBYTE)sw1sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	124
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	125 TRACE_EVENT_P2 ("SW1=%02X SW2=%02X", sim_data.sw1, sim_data.sw2);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	126
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	127 switch (sim_data.sw1)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	128 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	129 case 0x00:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	130 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	131 * SIM driver error
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	132 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	133 if (SIM_IS_FLAG_CLEARED(SIM_INSERT))
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	134 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	135 return SIM_CAUSE_CARD_REMOVED;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	136 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	137 if (sim_data.sw2 EQ 14)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	138 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	139 SIM_SET_FLAG(DRV_FAILED_RETRY);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	140 return SIM_CAUSE_DRV_TEMPFAIL;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	141 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	142 return CAUSE_MAKE(DEFBY_CONDAT, ORIGSIDE_MS, SIM_ORIGINATING_ENTITY, sim_data.sw2);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	143 #if defined SIM_TOOLKIT
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	144 case 0x9E:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	145 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	146 * use SW2 as length indicator for
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	147 * the following get response
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	148 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	149 if (sim_data.sim_phase >= 3) /* Phase 2+ or higher */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	150 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	151 if (sim_data.stk_profile[0] & SAT_TP1_9E_XX)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	152 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	153 sim_data.sim_data_len = (sim_data.sw2 EQ 0)? 0x100: (USHORT)sim_data.sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	154 return SIM_CAUSE_DNL_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	155 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	156 else
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	157 return SIM_CAUSE_SAT_BUSY;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	158 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	159 else
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	160 return SIM_CAUSE_OTHER_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	161 case 0x93:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	162 if (sim_data.sim_phase >= 3) /* Phase 2+ or higher */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	163 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	164 return SIM_CAUSE_SAT_BUSY;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	165 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	166 else
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	167 return SIM_CAUSE_OTHER_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	168 case 0x91:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	169 if (sim_data.sim_phase >= 3) /* Phase 2+ or higher */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	170 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	171 sim_data.proactive_sim_data_len = (sim_data.sw2 EQ 0)? 0x100: (SHORT)sim_data.sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	172 return SIM_NO_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	173 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	174 else
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	175 return SIM_CAUSE_OTHER_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	176 #endif
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	177 case 0x92:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	178 if (sim_data.sw2 > 0xF)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	179 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	180 #ifdef REL99
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	181 if (sim_data.sw2 EQ SW2_MEMORY_PROBLEM)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	182 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	183 return SIM_CAUSE_MEM_PROBLEM;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	184 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	185 #endif /* end of ifdef REL99 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	186 return SIM_CAUSE_OTHER_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	187 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	188 /* no break (otherwise the command was successful) */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	189 case 0x90:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	190 if( (size >= 0) AND (size <= 0x100) )
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	191 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	192 sim_data.sim_data_len = size;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	193 TRACE_EVENT_P1 ("sim_data.sim_data_len updated size =%X ", size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	194 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	195 return SIM_NO_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	196 case 0x9F:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	197 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	198 * use SW2 as length indicator for
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	199 * the following get response
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	200 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	201 sim_data.sim_data_len = (sim_data.sw2 EQ 0)? 0x100: (USHORT)sim_data.sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	202 return SIM_NO_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	203
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	204 case 0x94:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	205 switch (sim_data.sw2)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	206 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	207 case 0:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	208 return SIM_CAUSE_NO_SELECT;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	209 case 2:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	210 return SIM_CAUSE_ADDR_WRONG;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	211 case 4:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	212 return SIM_CAUSE_UNKN_FILE_ID;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	213 case 8:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	214 return SIM_CAUSE_CMD_INCONSIST;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	215 default:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	216 break;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	217 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	218 break;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	219
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	220 case 0x98:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	221 TRACE_EVENT_P1 ("LRP = %d", (int)sim_data.last_requested_pin_no);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	222
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	223 switch (sim_data.sw2)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	224 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	225 case 2:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	226 return SIM_CAUSE_CHV_NOTSET;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	227 case 8:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	228 return SIM_CAUSE_CHV_VALIDATED;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	229 case 0x10:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	230 return SIM_CAUSE_EF_INVALID; /* contradiction cases */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	231 case 4:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	232 return sim_inv_chv_A [sim_data.last_requested_pin_no];
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	233 case 0x40:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	234 return sim_inv_chv_B [sim_data.last_requested_pin_no];
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	235 case 0x50:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	236 return SIM_CAUSE_MAX_INCREASE;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	237 default:
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	238 break;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	239 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	240 break;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	241 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	242
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	243 return SIM_CAUSE_OTHER_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	244 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	245
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	246 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	247 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	248 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	249 \| STATE : code ROUTINE : FKT_ChangeCHV \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	250 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	251
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	252 PURPOSE : Wrapping function for the SIM driver call SIM_ChangeCHV.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	253
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	254 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	255
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	256 GLOBAL USHORT FKT_ChangeCHV (UBYTE * old_pin,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	257 UBYTE * new_pin,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	258 UBYTE pin_id)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	259 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	260 USHORT size = 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	261 USHORT sw1sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	262 UBYTE response[4];
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	263
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	264 TRACE_FUNCTION ("FKT_ChangeCHV()");
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	265
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	266 sw1sw2 = SIM_ChangeCHV ((UBYTE *)response,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	267 (UBYTE *)old_pin,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	268 (UBYTE *)new_pin,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	269 (UBYTE)pin_id,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	270 &size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	271
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	272 return FKT_convert_error (sw1sw2, size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	273 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	274
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	275 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	276 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	277 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	278 \| STATE : code ROUTINE : FKT_DisableCHV \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	279 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	280
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	281 PURPOSE : Wrapping function for the SIM driver call SIM_DisableCHV.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	282
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	283 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	284
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	285 GLOBAL USHORT FKT_DisableCHV (UBYTE * pin)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	286 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	287 USHORT size = 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	288 USHORT sw1sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	289 UBYTE response[4];
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	290
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	291 TRACE_FUNCTION ("FKT_DisableCHV()");
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	292
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	293 sw1sw2 = SIM_DisableCHV ((UBYTE *)response,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	294 (UBYTE *)pin,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	295 &size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	296
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	297 return FKT_convert_error (sw1sw2, size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	298 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	299
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	300 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	301 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	302 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	303 \| STATE : code ROUTINE : FKT_EnableCHV \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	304 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	305
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	306 PURPOSE : Wrapping function for the SIM driver call SIM_EnableCHV.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	307
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	308 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	309
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	310 GLOBAL USHORT FKT_EnableCHV (UBYTE * pin)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	311 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	312 USHORT size = 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	313 USHORT sw1sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	314 UBYTE response[4];
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	315
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	316 TRACE_FUNCTION ("FKT_EnableCHV()");
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	317
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	318 sw1sw2 = SIM_EnableCHV ((UBYTE *)response,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	319 (UBYTE *)pin,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	320 &size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	321
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	322 return FKT_convert_error (sw1sw2, size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	323 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	324
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	325 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	326 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	327 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	328 \| STATE : code ROUTINE : FKT_GetResponse \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	329 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	330
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	331 PURPOSE : Wrapping function for the SIM driver call SIM_GetResponse.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	332
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	333 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	334 GLOBAL USHORT FKT_GetResponse (UBYTE * data,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	335 USHORT len)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	336 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	337 USHORT size = 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	338 USHORT sw1sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	339
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	340 TRACE_FUNCTION ("FKT_GetResponse()");
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	341
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	342 sw1sw2 = SIM_GetResponse ((UBYTE *)data,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	343 len,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	344 &size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	345 return FKT_convert_error (sw1sw2, len);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	346 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	347
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	348 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	349 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	350 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	351 \| STATE : code ROUTINE : FKT_Increase \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	352 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	353
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	354 PURPOSE : Wrapping function for the SIM driver call SIM_Increase.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	355
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	356 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	357
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	358 GLOBAL USHORT FKT_Increase (UBYTE * data)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	359 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	360 USHORT sw1sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	361 USHORT size = 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	362 UBYTE response[4];
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	363
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	364 TRACE_FUNCTION ("FKT_Increase()");
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	365 sw1sw2 = SIM_Increase ((UBYTE *)response,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	366 (UBYTE *)data,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	367 &size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	368
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	369 return FKT_convert_error (sw1sw2, size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	370 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	371
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	372
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	373 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	374 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	375 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	376 \| STATE : code ROUTINE : FKT_Invalidate \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	377 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	378
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	379 PURPOSE : Wrapping function for the SIM driver call SIM_Invalidate.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	380
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	381 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	382
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	383 GLOBAL USHORT FKT_Invalidate (void)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	384 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	385 USHORT size = 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	386 USHORT sw1sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	387 UBYTE response[4];
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	388
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	389 TRACE_FUNCTION ("FKT_Invalidate()");
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	390
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	391 sw1sw2 = SIM_Invalidate ((UBYTE *)response,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	392 &size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	393
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	394 if (sw1sw2 EQ 0x9810) /* already invalidated */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	395 return SIM_NO_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	396
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	397 return FKT_convert_error (sw1sw2, size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	398 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	399
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	400
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	401 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	402 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	403 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	404 \| STATE : code ROUTINE : FKT_ReadBinary \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	405 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	406
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	407 PURPOSE : Wrapping function for the SIM driver call SIM_ReadBinary.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	408
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	409 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	410
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	411 GLOBAL USHORT FKT_ReadBinary (UBYTE * data,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	412 USHORT offset,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	413 USHORT length)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	414 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	415 USHORT sw1sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	416 USHORT size = 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	417
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	418 TRACE_FUNCTION ("FKT_ReadBinary()");
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	419
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	420 sw1sw2= SIM_ReadBinary ((UBYTE *)data,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	421 offset,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	422 length,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	423 &size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	424
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	425 return FKT_convert_error (sw1sw2, size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	426 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	427
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	428
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	429 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	430 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	431 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	432 \| STATE : code ROUTINE : FKT_ReadRecord \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	433 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	434
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	435 PURPOSE : Wrapping function for the SIM driver call SIM_ReadRecord.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	436
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	437 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	438
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	439 GLOBAL USHORT FKT_ReadRecord (UBYTE * data,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	440 UBYTE mode,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	441 USHORT record,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	442 USHORT length)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	443 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	444 USHORT sw1sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	445 USHORT size = 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	446
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	447 #if !defined NTRACE
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	448 char buf[48];
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	449 sprintf (buf, "FKT_ReadRecord(): Nr. %hu", record);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	450 TRACE_FUNCTION (buf);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	451 #endif
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	452
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	453 sw1sw2 = SIM_ReadRecord ((UBYTE *)data,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	454 (UBYTE)mode,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	455 (UBYTE)record,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	456 length,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	457 &size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	458
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	459 return FKT_convert_error (sw1sw2, size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	460 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	461
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	462
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	463 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	464 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	465 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	466 \| STATE : code ROUTINE : FKT_Rehabilitate \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	467 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	468
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	469 PURPOSE : Wrapping function for the SIM driver call SIM_Rehabilitate.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	470
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	471 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	472
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	473 GLOBAL USHORT FKT_Rehabilitate (void)
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	474 {
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	475 USHORT size = 0;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	476 USHORT sw1sw2;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	477 UBYTE response[4];
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	478
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	479 TRACE_FUNCTION ("FKT_Rehabilitate()");
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	480
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	481 sw1sw2 = SIM_Rehabilitate ((UBYTE *)response,
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	482 &size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	483
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	484 if (sw1sw2 EQ 0x9810) /* already rehabilitated */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	485 return SIM_NO_ERROR;
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	486
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	487 return FKT_convert_error (sw1sw2, size);
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	488 }
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	489
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	490
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	491 /*
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	492 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	493 \| PROJECT : GSM-PS (6302) MODULE : SIM_FKT \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	494 \| STATE : code ROUTINE : FKT_Status \|
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	495 +--------------------------------------------------------------------+
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	496
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	497 PURPOSE : Wrapping function for the SIM driver call SIM_Status.
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	498
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	499 */
2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	500

673

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

3 | Project : GSM-F&D (8411)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

4 | Modul : SIM_FKT

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

8 |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

10 | Instruments Berlin, AG

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

15 | Texas Instruments Berlin, AG.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

17 | Purpose : This modul defines the wrapping functions for the

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

18 | SIM application.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

20 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

21

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

22 #ifndef SIM_FKT_C

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

23 #define SIM_FKT_C

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

24

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

25 #define ENTITY_SIM

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

26

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

28

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

29 #include <string.h>

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

30 #include "typedefs.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

31 #include "pconst.cdg"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

32 #include "message.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

33 #include "ccdapi.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

34 #include "vsi.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

35 #include "custom.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

36 #include "gsm.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

37 #include "cnf_sim.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

38 #include "mon_sim.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

39 #include "prim.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

40 #include "pei.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

41 #include "tok.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

42 #include "sim.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

43 #include "sim_em.h"

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

44

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

45 /*==== EXPORT =====================================================*/

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

46 #ifdef _SIMULATION_

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

47 LOCAL USHORT first_time_into_fkt_select = TRUE;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

48 LOCAL USHORT file_id;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

49 #endif

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

50 GLOBAL USHORT stk_l_cmd = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

51

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

52

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

53 /*==== PRIVAT =====================================================*/

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

54

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

55 /*==== VARIABLES ==================================================*/

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

56

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

57 /*==== FUNCTIONS ===================================================*/

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

58

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

59 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

60 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

61 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

62 | STATE : code ROUTINE : FKT_check_pin_count |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

63 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

64

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

65 PURPOSE : PIN/PUK count is checked for secret code initialisation.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

66 count is set to zero, if not initialised, otherwise the

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

67 initialisation flag (most significant bit) is reset.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

68 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

69

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

70 GLOBAL UBYTE FKT_check_pin_count (UBYTE count)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

71 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

72 if ((count & 0x80) EQ 0)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

73 return 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

74

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

75 return count & 0x0F;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

76 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

77

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

78 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

79 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

80 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

81 | STATE : code ROUTINE : FKT_convert_error |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

82 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

83

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

84 PURPOSE : Converts sw1 and sw2 to an unique error code for the

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

85 SIM application.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

86

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

87 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

88

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

89 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

90 * PIN/PUK is wrong, remaining attempts

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

91 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

92 const static USHORT sim_inv_chv_A [6] =

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

93 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

94 /* last requested PIN no error code */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

95 /* none */ SIM_CAUSE_OTHER_ERROR,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

96 /* PIN 1 */ SIM_CAUSE_PIN1_EXPECT,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

97 /* PIN 2 */ SIM_CAUSE_PIN2_EXPECT,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

98 /* PUK 1 */ SIM_CAUSE_PUK1_EXPECT,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

99 /* PUK 2 */ SIM_CAUSE_PUK2_EXPECT,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

100 /* NEVER */ SIM_CAUSE_ACCESS_PROHIBIT

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

101 };

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

102

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

103

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

104 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

105 * PIN/PUK is wrong, no remaining attempts

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

106 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

107 const static USHORT sim_inv_chv_B [6] =

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

108 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

109 /* last requested PIN no error code */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

110 /* none */ SIM_CAUSE_OTHER_ERROR,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

111 /* PIN 1 */ SIM_CAUSE_PIN1_BLOCKED,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

112 /* PIN 2 */ SIM_CAUSE_PIN2_BLOCKED,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

113 /* PUK 1 */ SIM_CAUSE_PUK1_BLOCKED,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

114 /* PUK 2 */ SIM_CAUSE_PUK2_BLOCKED,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

115 /* NEVER */ SIM_CAUSE_OTHER_ERROR

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

116 };

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

117

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

118 GLOBAL USHORT FKT_convert_error (USHORT sw1sw2, USHORT size)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

119 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

120 TRACE_FUNCTION ("FKT_convert_error()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

121

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

122 sim_data.sw1 = (UBYTE)(sw1sw2 >> 8);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

123 sim_data.sw2 = (UBYTE)sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

124

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

125 TRACE_EVENT_P2 ("SW1=%02X SW2=%02X", sim_data.sw1, sim_data.sw2);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

126

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

127 switch (sim_data.sw1)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

128 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

129 case 0x00:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

130 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

131 * SIM driver error

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

132 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

133 if (SIM_IS_FLAG_CLEARED(SIM_INSERT))

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

134 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

135 return SIM_CAUSE_CARD_REMOVED;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

136 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

137 if (sim_data.sw2 EQ 14)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

138 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

139 SIM_SET_FLAG(DRV_FAILED_RETRY);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

140 return SIM_CAUSE_DRV_TEMPFAIL;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

141 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

142 return CAUSE_MAKE(DEFBY_CONDAT, ORIGSIDE_MS, SIM_ORIGINATING_ENTITY, sim_data.sw2);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

143 #if defined SIM_TOOLKIT

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

144 case 0x9E:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

145 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

146 * use SW2 as length indicator for

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

147 * the following get response

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

148 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

149 if (sim_data.sim_phase >= 3) /* Phase 2+ or higher */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

150 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

151 if (sim_data.stk_profile[0] & SAT_TP1_9E_XX)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

152 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

153 sim_data.sim_data_len = (sim_data.sw2 EQ 0)? 0x100: (USHORT)sim_data.sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

154 return SIM_CAUSE_DNL_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

155 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

156 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

157 return SIM_CAUSE_SAT_BUSY;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

158 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

159 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

160 return SIM_CAUSE_OTHER_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

161 case 0x93:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

162 if (sim_data.sim_phase >= 3) /* Phase 2+ or higher */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

163 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

164 return SIM_CAUSE_SAT_BUSY;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

165 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

166 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

167 return SIM_CAUSE_OTHER_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

168 case 0x91:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

169 if (sim_data.sim_phase >= 3) /* Phase 2+ or higher */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

170 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

171 sim_data.proactive_sim_data_len = (sim_data.sw2 EQ 0)? 0x100: (SHORT)sim_data.sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

172 return SIM_NO_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

173 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

174 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

175 return SIM_CAUSE_OTHER_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

176 #endif

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

177 case 0x92:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

178 if (sim_data.sw2 > 0xF)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

179 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

180 #ifdef REL99

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

181 if (sim_data.sw2 EQ SW2_MEMORY_PROBLEM)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

182 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

183 return SIM_CAUSE_MEM_PROBLEM;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

184 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

185 #endif /* end of ifdef REL99 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

186 return SIM_CAUSE_OTHER_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

187 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

188 /* no break (otherwise the command was successful) */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

189 case 0x90:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

190 if( (size >= 0) AND (size <= 0x100) )

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

191 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

192 sim_data.sim_data_len = size;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

193 TRACE_EVENT_P1 ("sim_data.sim_data_len updated size =%X ", size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

194 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

195 return SIM_NO_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

196 case 0x9F:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

197 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

198 * use SW2 as length indicator for

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

199 * the following get response

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

200 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

201 sim_data.sim_data_len = (sim_data.sw2 EQ 0)? 0x100: (USHORT)sim_data.sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

202 return SIM_NO_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

203

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

204 case 0x94:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

205 switch (sim_data.sw2)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

206 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

207 case 0:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

208 return SIM_CAUSE_NO_SELECT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

209 case 2:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

210 return SIM_CAUSE_ADDR_WRONG;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

211 case 4:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

212 return SIM_CAUSE_UNKN_FILE_ID;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

213 case 8:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

214 return SIM_CAUSE_CMD_INCONSIST;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

215 default:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

216 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

217 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

218 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

219

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

220 case 0x98:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

221 TRACE_EVENT_P1 ("LRP = %d", (int)sim_data.last_requested_pin_no);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

222

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

223 switch (sim_data.sw2)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

224 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

225 case 2:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

226 return SIM_CAUSE_CHV_NOTSET;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

227 case 8:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

228 return SIM_CAUSE_CHV_VALIDATED;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

229 case 0x10:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

230 return SIM_CAUSE_EF_INVALID; /* contradiction cases */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

231 case 4:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

232 return sim_inv_chv_A [sim_data.last_requested_pin_no];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

233 case 0x40:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

234 return sim_inv_chv_B [sim_data.last_requested_pin_no];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

235 case 0x50:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

236 return SIM_CAUSE_MAX_INCREASE;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

237 default:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

238 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

239 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

240 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

241 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

242

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

243 return SIM_CAUSE_OTHER_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

244 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

245

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

246 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

247 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

248 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

249 | STATE : code ROUTINE : FKT_ChangeCHV |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

250 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

251

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

252 PURPOSE : Wrapping function for the SIM driver call SIM_ChangeCHV.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

253

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

254 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

255

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

256 GLOBAL USHORT FKT_ChangeCHV (UBYTE * old_pin,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

257 UBYTE * new_pin,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

258 UBYTE pin_id)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

259 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

260 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

261 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

262 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

263

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

264 TRACE_FUNCTION ("FKT_ChangeCHV()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

265

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

266 sw1sw2 = SIM_ChangeCHV ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

267 (UBYTE *)old_pin,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

268 (UBYTE *)new_pin,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

269 (UBYTE)pin_id,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

270 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

271

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

272 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

273 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

274

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

275 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

276 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

277 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

278 | STATE : code ROUTINE : FKT_DisableCHV |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

279 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

280

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

281 PURPOSE : Wrapping function for the SIM driver call SIM_DisableCHV.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

282

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

283 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

284

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

285 GLOBAL USHORT FKT_DisableCHV (UBYTE * pin)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

286 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

287 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

288 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

289 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

290

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

291 TRACE_FUNCTION ("FKT_DisableCHV()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

292

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

293 sw1sw2 = SIM_DisableCHV ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

294 (UBYTE *)pin,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

295 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

296

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

297 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

298 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

299

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

300 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

301 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

302 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

303 | STATE : code ROUTINE : FKT_EnableCHV |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

305

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

306 PURPOSE : Wrapping function for the SIM driver call SIM_EnableCHV.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

307

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

308 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

309

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

310 GLOBAL USHORT FKT_EnableCHV (UBYTE * pin)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

311 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

312 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

313 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

314 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

315

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

316 TRACE_FUNCTION ("FKT_EnableCHV()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

317

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

318 sw1sw2 = SIM_EnableCHV ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

319 (UBYTE *)pin,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

320 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

321

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

322 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

323 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

324

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

325 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

326 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

327 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

328 | STATE : code ROUTINE : FKT_GetResponse |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

329 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

330

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

331 PURPOSE : Wrapping function for the SIM driver call SIM_GetResponse.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

332

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

333 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

334 GLOBAL USHORT FKT_GetResponse (UBYTE * data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

335 USHORT len)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

336 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

337 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

338 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

339

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

340 TRACE_FUNCTION ("FKT_GetResponse()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

341

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

342 sw1sw2 = SIM_GetResponse ((UBYTE *)data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

343 len,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

344 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

345 return FKT_convert_error (sw1sw2, len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

346 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

347

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

348 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

350 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

351 | STATE : code ROUTINE : FKT_Increase |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

353

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

354 PURPOSE : Wrapping function for the SIM driver call SIM_Increase.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

355

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

356 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

357

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

358 GLOBAL USHORT FKT_Increase (UBYTE * data)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

359 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

360 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

361 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

362 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

363

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

364 TRACE_FUNCTION ("FKT_Increase()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

365 sw1sw2 = SIM_Increase ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

366 (UBYTE *)data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

367 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

368

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

369 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

370 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

371

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

372

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

373 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

374 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

375 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

376 | STATE : code ROUTINE : FKT_Invalidate |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

377 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

378

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

379 PURPOSE : Wrapping function for the SIM driver call SIM_Invalidate.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

380

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

381 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

382

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

383 GLOBAL USHORT FKT_Invalidate (void)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

384 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

385 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

386 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

387 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

388

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

389 TRACE_FUNCTION ("FKT_Invalidate()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

390

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

391 sw1sw2 = SIM_Invalidate ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

392 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

393

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

394 if (sw1sw2 EQ 0x9810) /* already invalidated */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

395 return SIM_NO_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

396

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

397 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

398 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

399

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

400

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

401 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

402 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

403 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

404 | STATE : code ROUTINE : FKT_ReadBinary |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

405 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

406

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

407 PURPOSE : Wrapping function for the SIM driver call SIM_ReadBinary.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

408

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

409 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

410

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

411 GLOBAL USHORT FKT_ReadBinary (UBYTE * data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

412 USHORT offset,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

413 USHORT length)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

414 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

415 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

416 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

417

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

418 TRACE_FUNCTION ("FKT_ReadBinary()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

419

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

420 sw1sw2= SIM_ReadBinary ((UBYTE *)data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

421 offset,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

422 length,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

423 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

424

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

425 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

426 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

427

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

428

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

429 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

430 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

431 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

432 | STATE : code ROUTINE : FKT_ReadRecord |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

433 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

434

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

435 PURPOSE : Wrapping function for the SIM driver call SIM_ReadRecord.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

436

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

437 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

438

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

439 GLOBAL USHORT FKT_ReadRecord (UBYTE * data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

440 UBYTE mode,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

441 USHORT record,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

442 USHORT length)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

443 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

444 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

445 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

446

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

447 #if !defined NTRACE

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

448 char buf[48];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

449 sprintf (buf, "FKT_ReadRecord(): Nr. %hu", record);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

450 TRACE_FUNCTION (buf);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

451 #endif

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

452

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

453 sw1sw2 = SIM_ReadRecord ((UBYTE *)data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

454 (UBYTE)mode,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

455 (UBYTE)record,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

456 length,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

457 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

458

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

459 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

460 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

461

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

462

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

463 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

464 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

465 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

466 | STATE : code ROUTINE : FKT_Rehabilitate |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

467 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

468

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

469 PURPOSE : Wrapping function for the SIM driver call SIM_Rehabilitate.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

470

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

471 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

472

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

473 GLOBAL USHORT FKT_Rehabilitate (void)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

474 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

475 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

476 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

477 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

478

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

479 TRACE_FUNCTION ("FKT_Rehabilitate()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

480

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

481 sw1sw2 = SIM_Rehabilitate ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

482 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

483

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

484 if (sw1sw2 EQ 0x9810) /* already rehabilitated */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

485 return SIM_NO_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

486

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

487 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

488 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

489

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

490

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

491 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

493 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

494 | STATE : code ROUTINE : FKT_Status |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

496

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

497 PURPOSE : Wrapping function for the SIM driver call SIM_Status.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

498

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

499 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

500

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

501 GLOBAL USHORT FKT_Status (UBYTE * pin_cnt,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

502 UBYTE * pin2_cnt,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

503 UBYTE * puk_cnt,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

504 UBYTE * puk2_cnt)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

505 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

506 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

507 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

508

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

509 USHORT cause;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

510 USHORT fileid;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

511 union

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

512 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

513 T_DIR_STATUS status;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

514 UBYTE response [40];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

515 } dir;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

516

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

517 TRACE_FUNCTION ("FKT_Status()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

518

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

519 memset (dir.response, 0, sizeof(dir.response));

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

520

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

521 sw1sw2 = SIM_Status_Extended (dir.response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

522 sim_data.dir_status_len, &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

523

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

524 cause = FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

525

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

526 *pin_cnt = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

527 *puk_cnt = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

528 *pin2_cnt = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

529 *puk2_cnt = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

530

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

531 if (cause EQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

532 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

533 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

534 * Check file id on active call: if different from last directory

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

535 * indicate failure during SIM Presence Detection (27.20).

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

536 * A selection of a non-existent DF (possible with SIM_ACCESS_REQ)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

537 * leads to the loss of the current DF: this confuses the SIM

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

538 * Presence Detection, therefore the validity of the actual DF

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

539 * stored in 'sim_data.act_directory' must be considered.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

540 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

541 fileid = (dir.status.fileid[0] << 8) | dir.status.fileid[1];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

542

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

543 if (SIM_IS_FLAG_SET (CALL_ACTIVE) AND /* call active */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

544 sim_data.act_directory NEQ NOT_PRESENT_16BIT /* actual DF known? */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

545 AND fileid NEQ sim_data.act_directory) /* compare DF */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

546 return SIM_CAUSE_CARD_REMOVED;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

547 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

548 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

549 if (SIM_TI_DRV_X_BYTES > 0) /* discard SW1, SW2 from response! */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

550 memset (&dir.response[sim_data.dir_status_len], 0, SIM_TI_DRV_X_BYTES);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

551 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

552 * Directory status is available

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

553 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

554 *pin_cnt = FKT_check_pin_count (dir.status.pinstatus);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

555 *puk_cnt = FKT_check_pin_count (dir.status.unbstatus);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

556 *pin2_cnt = FKT_check_pin_count (dir.status.pin2status);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

557 *puk2_cnt = FKT_check_pin_count (dir.status.unb2status);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

558 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

559 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

560 return cause;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

561 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

562

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

563 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

564 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

565 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

566 | STATE : code ROUTINE : FKT_RunGSMAlgo |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

567 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

568

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

569 PURPOSE : Wrapping function for the SIM driver call SIM_RunGSMAlgo.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

570

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

571 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

572 GLOBAL USHORT FKT_RunGSMAlgo (UBYTE * rand, UBYTE * data, USHORT len)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

573 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

574 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

575 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

576 USHORT error;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

577 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

578

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

579 TRACE_FUNCTION ("FKT_RunGSMAlgo()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

580

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

581 sw1sw2 = SIM_RunGSMAlgo ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

582 (UBYTE *)rand,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

583 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

584

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

585 error = FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

586

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

587 if (error EQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

588 error = FKT_GetResponse (data, len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

589

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

590 return error;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

591 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

592

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

593 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

594 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

595 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

596 | STATE : code ROUTINE : FKT_Select |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

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

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

598

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

599 PURPOSE : Wrapping function for the SIM driver call SIM_Select.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

600

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

601 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

602 LOCAL USHORT fkt_select_one (USHORT id, UBYTE * data, USHORT len)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

603 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

604

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

605 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

606 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

607 USHORT error;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

608 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

609

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

610 sw1sw2 = SIM_Select (id,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

611 (UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

612 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

613

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

614

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

615 error = FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

616

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

617 if (error EQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

618 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

619 if( (data NEQ NULL )

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

620 AND (len NEQ 0 )

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

621 #ifdef _SIMULATION_

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

622 AND (id EQ file_id)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

623 #endif

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

624 )

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

625 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

626 #ifdef _SIMULATION_

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

627 len = (sim_data.sim_data_len < len)?

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

628 sim_data.sim_data_len: len;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

629 first_time_into_fkt_select = TRUE;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

630 #endif

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

631

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

632 error = FKT_GetResponse (data, sim_data.sim_data_len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

633 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

634 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

635

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

636 return error;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

637

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

638 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

639

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

640 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

641 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

642 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

643 | STATE : code ROUTINE : sim_select_df |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

644 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

645

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

646 PURPOSE : Function to select the directory given the path.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

647

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

648 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

649 LOCAL USHORT sim_select_df(U16 dir_level,UBYTE *data,USHORT len)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

650 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

651 USHORT result = SIM_NO_ERROR;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

652

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

653 result = fkt_select_one (dir_level, data, len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

654 if (result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

655 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

656 sim_data.act_directory = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

657 sim_data.act_field = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

658 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

659 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

660 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

661 sim_data.act_directory = dir_level;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

662 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

663 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

664 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

665

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

666 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

667 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

668 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

669 | STATE : code ROUTINE : FKT_Select |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

670 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

671

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

672 PURPOSE : Wrapping function for the SIM driver call SIM_Select.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

673

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

674 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

675 GLOBAL USHORT FKT_Select (USHORT id,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

676 BOOL path_info_present, T_path_info * path_info_ptr,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

677 UBYTE * data, USHORT len)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

678 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

679 USHORT result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

680 USHORT directory = (SIM_IS_FLAG_SET (GSM_DATAFIELD))?

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

681 SIM_DF_GSM: SIM_DF_1800; /* default parent directory */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

682

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

683 #if !defined NTRACE

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

684 char buf[32];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

685

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

686 sprintf (buf, "FKT_Select(): id = %04X", id);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

687 TRACE_FUNCTION (buf);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

688 #endif

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

689

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

690 #ifdef _SIMULATION_

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

691 if( (first_time_into_fkt_select EQ TRUE ) AND

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

692 (data NEQ NULL) AND (len NEQ 0) )

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

693 file_id = id;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

694 #endif

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

695

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

696

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

697 switch (id & 0xFF00) /* selecting DF deselects EF */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

698 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

699 case 0x3F00:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

700 case 0x7F00:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

701 case 0x5F00:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

702 sim_data.act_field = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

703 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

704 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

705

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

706 if( path_info_present NEQ FALSE )

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

707 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

708 if((sim_data.act_directory & 0xFF00) NEQ 0x5F00 AND

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

709 sim_data.act_directory NEQ NOT_PRESENT_16BIT)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

710 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

711 /* Currently selected df is MF or a first level directory */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

712 if(sim_data.act_directory NEQ path_info_ptr->df_level1)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

713 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

714 result = sim_select_df(path_info_ptr->df_level1,data,len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

715 if(result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

716 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

717 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

718 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

719 /* Currently selected df is a second level directory */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

720 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

721 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

722 result = sim_select_df(SIM_MF,data,len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

723 if(result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

724 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

725 result = sim_select_df(path_info_ptr->df_level1,data,len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

726 if(result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

727 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

728 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

729 if(path_info_ptr->v_df_level2)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

730 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

731 result = sim_select_df(path_info_ptr->df_level2,data,len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

732 if(result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

733 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

734 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

735 result = fkt_select_one (id, data, len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

736 if (result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

737 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

738

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

739 sim_data.act_field = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

740 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

741 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

742 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

743 sim_data.act_field = id;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

744 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

745 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

746 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

747 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

748 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

749 switch (id)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

750 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

751 case SIM_MF:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

752 result = fkt_select_one (SIM_MF, data, len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

753 if (result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

754 sim_data.act_directory = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

755 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

756 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

757 sim_data.dir_status_len = sim_data.sim_data_len;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

758 sim_data.act_directory = id;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

759 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

760 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

761

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

762 default:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

763 /* All the standard defined EFs would be handled before coming to this

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

764 * point. Complete path information should be given for non-standard 2nd level EFs

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

765 * and they also would be handled before coming to this point.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

766 * This statement will be hit for non-standard files

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

767 * without path information. Hence returning error */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

768 return SIM_CAUSE_UNKN_FILE_ID;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

769 break; /* any other elementary file */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

770

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

771 /* continue here in case of any first level directory */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

772 case SIM_DF_GSM:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

773 case SIM_DF_1800:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

774 case SIM_DF_TELECOM:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

775 case SIM_DF_VI:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

776 case SIM_DF_ORANGE:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

777 if (sim_data.act_directory EQ id)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

778 return SIM_NO_ERROR; /* already selected */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

779 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

780 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

781 /* If current directory has not been selected or it is a

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

782 2nd level and under another 1st level DF */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

783 if (((sim_data.act_directory & 0xFF00) EQ 0x5F00 AND

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

784 ! SIM_IS_DF_LEVEL2_UNDER_DF_LEVEL1(sim_data.act_directory,id))

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

785 OR sim_data.act_directory EQ NOT_PRESENT_16BIT)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

786 { /* MF has to be selected first */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

787 result = sim_select_df(SIM_MF,data,len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

788 if(result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

789 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

790 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

791 result = fkt_select_one (id, data, len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

792 if (result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

793 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

794 sim_data.act_directory = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

795 sim_data.act_field = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

796 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

797 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

798 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

799 sim_data.dir_status_len = sim_data.sim_data_len;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

800 sim_data.act_directory = id;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

801 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

802 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

803 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

804 case SIM_DF_GRAPHICS:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

805 directory = SIM_DF_TELECOM; /* parent directory */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

806 /* no break */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

807 /*lint -fallthrough*/

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

808 case SIM_DF_SOLSA:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

809 case SIM_DF_MEXE:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

810 if (sim_data.act_directory EQ id)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

811 return SIM_NO_ERROR; /* already selected */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

812

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

813 if (sim_data.act_directory NEQ directory)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

814 { /* not the parent directory */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

815 /* If current directory is MF or first level OR if the 2nd level

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

816 directory is under another 1st level df, select the parent directory */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

817 if((sim_data.act_directory & 0xFF00) NEQ 0x5F00 ||

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

818 (!SIM_IS_DF_LEVEL2_UNDER_DF_LEVEL1(sim_data.act_directory,directory)) )

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

819 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

820 result = FKT_Select (directory, FALSE, NULL, data, len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

821 if (result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

822 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

823 sim_data.act_directory = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

824 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

825 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

826 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

827 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

828 result = fkt_select_one (id, data, len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

829 if (result NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

830 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

831 sim_data.act_directory = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

832 sim_data.act_field = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

833 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

834 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

835 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

836 sim_data.dir_status_len = sim_data.sim_data_len;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

837 sim_data.act_directory = id;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

838 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

839 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

840

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

841 case SIM_ICCID:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

842 case SIM_ELP:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

843 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

844 * Access to Root Directory

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

845 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

846 directory = SIM_MF;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

847 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

848

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

849 case SIM_ADN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

850 case SIM_FDN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

851 case SIM_SMS:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

852 case SIM_CCP:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

853 case SIM_MSISDN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

854 case SIM_SMSP:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

855 case SIM_SMSS:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

856 case SIM_LND:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

857 case SIM_SMSR:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

858 case SIM_SDN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

859 case SIM_EXT1:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

860 case SIM_EXT2:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

861 case SIM_EXT3:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

862 case SIM_BDN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

863 case SIM_EXT4:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

864 /* VO temp PATCH: Needed for reading CPHS info num from old SIMs */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

865 case SIM_CPHS_INFN2:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

866 /* VO temp PATCH end */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

867 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

868 * Access to Telecom Directory

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

869 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

870 directory = SIM_DF_TELECOM;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

871 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

872

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

873 case SIM_LP:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

874 case SIM_IMSI:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

875 case SIM_KC:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

876 case SIM_PLMNSEL:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

877 case SIM_HPLMN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

878 case SIM_ACMMAX:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

879 case SIM_SST:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

880 case SIM_ACM:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

881 case SIM_GID1:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

882 case SIM_GID2:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

883 case SIM_PUCT:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

884 case SIM_CBMI:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

885 case SIM_SPN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

886 case SIM_CBMID:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

887 case SIM_BCCH:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

888 case SIM_ACC:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

889 case SIM_FPLMN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

890 case SIM_LOCI:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

891 case SIM_AD:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

892 case SIM_PHASE:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

893 case SIM_VGCS:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

894 case SIM_VGCSS:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

895 case SIM_VBS:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

896 case SIM_VBSS:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

897 case SIM_EMLPP:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

898 case SIM_AAEM:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

899 case SIM_ECC:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

900 case SIM_CBMIR:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

901 case SIM_DCK:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

902 case SIM_CNL:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

903 case SIM_NIA:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

904 case SIM_KCGPRS:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

905 case SIM_LOCGPRS:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

906 case SIM_SUME:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

907 case SIM_CPHS_VMW:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

908 case SIM_CPHS_SST:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

909 case SIM_CPHS_CFF:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

910 case SIM_CPHS_ONSTR:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

911 case SIM_CPHS_CSP:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

912 case SIM_CPHS_CINF:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

913 case SIM_CPHS_MBXN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

914 case SIM_CPHS_ONSHF:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

915 case SIM_CPHS_INFN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

916

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

917 #ifdef REL99

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

918 case SIM_UCPS_ACTEC:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

919 case SIM_OCPS_ACTEC:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

920 case SIM_HPLMN_ACT:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

921 case SIM_CPBCCH:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

922 case SIM_INV_SCAN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

923 case SIM_RPLMN_ACT:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

924 #endif /* REL99 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

925 case SIM_PNN:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

926 case SIM_OPL:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

927

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

928 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

929 * Access to GSM

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

930 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

931 directory = (SIM_IS_FLAG_SET (GSM_DATAFIELD))?

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

932 SIM_DF_GSM: SIM_DF_1800;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

933 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

934

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

935 #ifndef REL99

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

936 case SIM_VI_HZ_PARAM:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

937 case SIM_VI_HZ_CACHE_1:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

938 case SIM_VI_HZ_CACHE_2:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

939 case SIM_VI_HZ_CACHE_3:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

940 case SIM_VI_HZ_CACHE_4:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

941 directory = SIM_DF_VI;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

942 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

943 #endif /* ifndef REL99 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

944

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

945 case SIM_MEXE_ST:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

946 case SIM_ORPK:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

947 case SIM_ARPK:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

948 case SIM_TPRPK:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

949 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

950 * Access to MExE Directory

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

951 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

952 directory = SIM_DF_MEXE;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

953 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

954 case SIM_IMG:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

955 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

956 * Access to Icon Directory

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

957 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

958 directory = SIM_DF_GRAPHICS;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

959 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

960

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

961 case SIM_ORANGE_DYN2_FLAG:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

962 case SIM_ORANGE_CSP2:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

963 case SIM_ORANGE_ACM2:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

964 case SIM_ORANGE_DYN_FLAGS:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

965 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

966 * Access to Orange Directory

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

967 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

968 directory = SIM_DF_ORANGE;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

969 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

970

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

971 case SIM_SAI:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

972 case SIM_SLL:

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

973 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

974 * Access to SoLSA Directory

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

975 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

976 directory = SIM_DF_SOLSA;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

977 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

978 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

979 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

980

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

981 if (sim_data.act_directory NEQ directory)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

982 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

983 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

984 * select directory

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

985 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

986 #ifdef _SIMULATION_

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

987

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

988 if( (data NEQ NULL) AND (len NEQ 0) )

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

989 first_time_into_fkt_select = FALSE;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

990 #endif

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

991 result = FKT_Select (directory, FALSE, NULL, data, len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

992 if (result NEQ SIM_NO_ERROR) /* directory selection fails */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

993 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

994 sim_data.act_directory = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

995 sim_data.act_field = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

996 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

997 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

998 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

999

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1000 if (sim_data.act_field NEQ id)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1001 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1002 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1003 * secondly select elementary field

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1004 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1005 result = fkt_select_one (id, data, len);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1006 if (result NEQ SIM_NO_ERROR) /* EF selection fails */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1007 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1008 sim_data.act_field = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1009 #ifdef __INVALID /* more sophisticated SELECT error handling */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1010

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1011 sw1 = (UBYTE)(SIM_Status_Extended ((UBYTE *)response, 6, &size) >> 8);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1012

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1013 if (sw1 NEQ 0x90 AND sw1 NEQ 0x91)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1014 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1015 * SIM Status request failed

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1016 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1017 sim_data.act_directory = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1018 else if (((response[4] << 8) | response[5])

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1019 NEQ sim_data.act_directory)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1020 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1021 * SIM Presence Detection indicates invalid SIM

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1022 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1023 sim_data.act_directory = NOT_PRESENT_16BIT;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1024 #endif

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1025 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1026 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1027 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1028 sim_data.act_directory = directory;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1029 sim_data.act_field = id;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1030 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1031 return result;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1032 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1033 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1034 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1035 * field is already selected

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1036 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1037 return SIM_NO_ERR_FILE_ALREADY_SELECTED;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1038 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1039

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1040

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1041

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1042 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1043 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1044 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1045 | STATE : code ROUTINE : FKT_UnblockCHV |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1046 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1047

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1048 PURPOSE : Wrapping function for the SIM driver call SIM_UnblockCHV.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1049

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1050 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1051

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1052 GLOBAL USHORT FKT_UnblockCHV (UBYTE * unblockCHV,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1053 UBYTE * new_CHV,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1054 UBYTE chvType)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1055 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1056 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1057 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1058 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1059

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1060 TRACE_FUNCTION ("FKT_UnblockCHV()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1061

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1062 sw1sw2 = SIM_UnblockCHV ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1063 (UBYTE *)unblockCHV,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1064 (UBYTE *)new_CHV,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1065 (UBYTE)chvType,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1066 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1067

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1068 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1069 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1070

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1071

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1072 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1073 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1074 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1075 | STATE : code ROUTINE : FKT_UpdateBinary |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1076 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1077

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1078 PURPOSE : Wrapping function for the SIM driver call SIM_UpdateBinary.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1079

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1080 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1081

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1082 GLOBAL USHORT FKT_UpdateBinary (UBYTE * data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1083 USHORT length,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1084 USHORT offset)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1085 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1086 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1087 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1088 UBYTE response [4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1089

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1090 TRACE_FUNCTION ("FKT_UpdateBinary()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1091

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1092 sw1sw2 = SIM_UpdateBinary ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1093 (UBYTE *)data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1094 offset,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1095 length,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1096 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1097

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1098 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1099 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1100

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1101

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1102 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1103 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1104 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1105 | STATE : code ROUTINE : FKT_UpdateRecord |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1106 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1107

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1108 PURPOSE : Wrapping function for the SIM driver call SIM_UpdateRecord.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1109

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1110 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1111

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1112 GLOBAL USHORT FKT_UpdateRecord (UBYTE * data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1113 USHORT length,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1114 UBYTE mode,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1115 USHORT record)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1116 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1117 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1118 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1119 UBYTE response [4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1120

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1121 #if !defined NTRACE

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1122 char buf[48];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1123 sprintf (buf, "FKT_UpdateRecord(): Nr. %hu", record);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1124 TRACE_FUNCTION (buf);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1125 #endif

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1126

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1127 sw1sw2 = SIM_UpdateRecord ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1128 (UBYTE *)data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1129 (UBYTE)mode,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1130 (UBYTE)record,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1131 length,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1132 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1133

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1134 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1135 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1136

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1137

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1138

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1139 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1140 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1141 | PROJECT : GSM-PS (6302) MODULE : SIM_FKT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1142 | STATE : code ROUTINE : FKT_VerifyCHV |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1143 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1144

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1145 PURPOSE : Wrapping function for the SIM driver call SIM_VerifyCHV.

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1146

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1147 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1148

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1149 GLOBAL USHORT FKT_VerifyCHV (UBYTE * pin,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1150 UBYTE pin_id)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1151 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1152 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1153 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1154 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1155

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1156 TRACE_FUNCTION ("FKT_VerifyCHV()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1157

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1158 sw1sw2 = SIM_VerifyCHV ((UBYTE *)response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1159 (UBYTE *)pin,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1160 (UBYTE)pin_id,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1161 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1162

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1163 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1164 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1165

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1166 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1167 +********************************************************************+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1168 | Moved from sim_stk.c - for CQ 34109 under feature flag SIM_TOOLKIT |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1169 +********************************************************************+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1170 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1171

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1172 #ifdef SIM_TOOLKIT

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1173

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1174 static const UBYTE timer_env[] = {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1175 STK_TIMER_EXPIRATION_TAG,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1176 STK_DEVICE_IDENTITY_LEN+STK_TIMER_ID_LEN+STK_TIMER_VALUE_LEN+6,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1177 STK_DEVICE_IDENTITY_TAG|STK_COMPREHENSION_REQUIRED, STK_DEVICE_IDENTITY_LEN, 0x82, 0x81,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1178 STK_TIMER_ID_TAG|STK_COMPREHENSION_REQUIRED, STK_TIMER_ID_LEN, 0,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1179 STK_TIMER_VALUE_TAG|STK_COMPREHENSION_REQUIRED, STK_TIMER_VALUE_LEN, 0, 0, 0

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1180 };

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1181

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1182 UBYTE pending_timers[9] = {0,0,0,0,0,0,0,0,0};

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1183 UBYTE next_pos_to_fill = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1184 UBYTE next_pos_to_send = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1185

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1186 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1187 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1188 | PROJECT : GSM-PS (8419) MODULE : SIM_STK |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1189 | STATE : code ROUTINE : FKT_TerminalResponse |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1190 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1191

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1192 PURPOSE : Wrapping function for the SIM driver call SIM_TerminalResponse

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1193

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1194 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1195

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1196 GLOBAL USHORT FKT_TerminalResponse (UBYTE * data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1197 USHORT length)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1198 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1199 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1200 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1201 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1202 UBYTE env[sizeof(timer_env)];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1203 USHORT index;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1204 UBYTE dummy[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1205 USHORT error;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1206 USHORT i;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1207

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1208 TRACE_FUNCTION ("FKT_TerminalResponse()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1209

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1210 sw1sw2 = SIM_TerminalResponse (response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1211 data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1212 length,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1213 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1214 sim_data.term_resp_sent = TRUE;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1215

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1216 SIM_EM_TERMINAL_RESPONSE;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1217 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1218 * if SIM response is OK, try resending pending timer expiry envelopes (send updated envelopes)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1219 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1220 if( 0x9000 == sw1sw2 )

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1221 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1222 for(i=0;i<8;i++)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1223 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1224 if (next_pos_to_fill != next_pos_to_send)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1225 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1226 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1227 * some timer expiry envelopes are pending

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1228 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1229 index = pending_timers[next_pos_to_send];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1230 memcpy (env, timer_env, sizeof(timer_env));

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1231 env[8] = (UBYTE)(index + 1); /* Timer number range is 1..8 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1232 env[11] = sim_data.timer[index].hour;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1233 env[12] = sim_data.timer[index].minute;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1234 env[13] = sim_data.timer[index].second;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1235 error = FKT_Envelope (dummy, env, sizeof(timer_env),0);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1236 if(8 == next_pos_to_send)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1237 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1238 next_pos_to_send = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1239 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1240 else

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1241 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1242 next_pos_to_send++;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1243 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1244 if (error NEQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1245 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1246 break;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1247 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1248 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1249 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1250 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1251

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1252 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1253 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1254

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1255

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1256 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1257 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1258 | PROJECT : GSM-PS (8419) MODULE : SIM_STK |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1259 | STATE : code ROUTINE : FKT_Envelope |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1260 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1261

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1262 PURPOSE : Wrapping function for the SIM driver call SIM_Envelope

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1263

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1264 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1265

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1266 GLOBAL USHORT FKT_Envelope (UBYTE * data_out, UBYTE * data_in,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1267 USHORT in_length, USHORT out_length)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1268 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1269

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1270 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1271 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1272 USHORT error;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1273

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1274

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1275 TRACE_FUNCTION ("FKT_Envelope()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1276

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1277 sw1sw2 = SIM_Envelope (data_out,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1278 data_in,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1279 in_length,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1280 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1281

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1282 SIM_EM_ENVELOPE;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1283

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1284 error = FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1285

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1286 if(sw1sw2 EQ 0x9000)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1287 sim_data.sim_data_len = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1288

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1289 if (error EQ SIM_NO_ERROR)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1290 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1291 if (data_out AND out_length)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1292 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1293 if (sim_data.sim_data_len > 0)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1294 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1295 stk_l_cmd = sim_data.sim_data_len << 3;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1296 out_length = (USHORT) (stk_l_cmd >> 3);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1297 error = FKT_GetResponse (data_out, out_length);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1298 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1299 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1300 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1301

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1302 return error;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1303

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1304 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1305

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1306 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1307 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1308 | PROJECT : GSM-PS (8419) MODULE : SIM_STK |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1309 | STATE : code ROUTINE : FKT_TerminalProfile |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1310 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1311

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1312 PURPOSE : Wrapping function for the SIM driver call SIM_TerminalProfile

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1313

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1314 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1315

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1316 GLOBAL USHORT FKT_TerminalProfile (UBYTE * data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1317 USHORT length)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1318 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1319 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1320 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1321 UBYTE response[4];

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1322

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1323 TRACE_FUNCTION ("FKT_TerminalProfile()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1324

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1325 sw1sw2 = SIM_TerminalProfile (response,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1326 data,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1327 length,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1328 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1329

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1330 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1331

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1332 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1333

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1334

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1335 /*

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1336 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1337 | PROJECT : GSM-PS (8419) MODULE : SIM_STK |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1338 | STATE : code ROUTINE : FKT_Fetch |

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1339 +--------------------------------------------------------------------+

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1340

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1341 PURPOSE : Wrapping function for the SIM driver call SIM_Fetch

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1342

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1343 */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1344

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1345 GLOBAL USHORT FKT_Fetch (UBYTE * cmd,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1346 USHORT length)

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1347 {

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1348 USHORT size = 0;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1349 USHORT sw1sw2;

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1350

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1351 TRACE_FUNCTION ("FKT_Fetch()");

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1352

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1353 sw1sw2 = SIM_Fetch (cmd,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1354 length,

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1355 &size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1356

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1357 return FKT_convert_error (sw1sw2, size);

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1358

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1359 }

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1360

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1361 #endif /* SIM_TOOLKIT */

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1362

2f7df7a314f8 gsm-fw/g23m-gsm subtree: initial import from LoCosto source

Michael Spacefalcon <msokolov@ivan.Harhan.ORG>

parents:

diff changeset

1363 #endif

FreeCalypso > hg > freecalypso-sw

annotate gsm-fw/g23m-gsm/sim/sim_fkt.c @ 673:2f7df7a314f8