FreeCalypso > hg > fc-magnetite
annotate src/aci2/aci/phb_aci.c @ 125:d5bbfb9649d5
src/aci2/mfw: file renames to make filename case consistent
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Fri, 07 Oct 2016 05:33:56 +0000 | 
| parents | 93999a60b835 | 
| children | 
| rev | line source | 
|---|---|
| 
3
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
3 | Project : MMI-Framework (8417) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
4 | Modul : PHB | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
5 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
6 | Copyright 2002 Texas Instruments Berlin, AG | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
7 | All rights reserved. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
8 | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
9 | This file is confidential and a trade secret of Texas | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
10 | Instruments Berlin, AG | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
11 | The receipt of or possession of this file does not convey | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
12 | any rights to reproduce or disclose its contents or to | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
13 | manufacture, use, or sell anything it may describe, in | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
14 | whole, or in part, without the specific written consent of | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
15 | Texas Instruments Berlin, AG. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
16 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
17 | Purpose : This modul contains the functions to establish the phone book. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
18 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
19 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
20 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
21 #ifdef TI_PS_FFS_PHB | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
22 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
23 #include "aci_all.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
24 #include "aci_cmh.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
25 #include "aci_mem.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
26 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
27 #include "phb_aci.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
28 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
29 #ifdef _SIMULATION_ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
30 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
31 * Unfortunately we have a double definition of some preprocessor definitions | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
32 * within windows.h and within the protocol stack, so we undefine here. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
33 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
34 #undef PARITY_NONE | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
35 #undef PARITY_ODD | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
36 #undef PARITY_EVEN | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
37 #undef DRV_OK | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
38 #include "ffs_pc_api.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
39 #undef PARITY_NONE | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
40 #undef PARITY_ODD | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
41 #undef PARITY_EVEN | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
42 #undef DRV_OK | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
43 #else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
44 #include "ffs/ffs.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
45 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
46 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
47 #ifdef SIM_TOOLKIT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
48 #include "psa.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
49 #include "psa_sim.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
50 #include "psa_cc.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
51 #include "psa_sat.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
52 #endif /* #ifdef SIM_TOOLKIT */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
53 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
54 #include "cmh.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
55 #include "cmh_phb.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
56 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
57 #ifdef DTI | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
58 #include "dti_conn_mng.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
59 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
60 #include "cmh_sim.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
61 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
62 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
63 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
64 * Constants and enumerations | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
65 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
66 //#define NR_EF_ICI 20 /* LRN, LMN */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
67 //#define SIZE_EF_ICI (28+16) /* alpha id 16 bytes, 31.102 clause 4.2.33 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
68 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
69 #define NR_EF_OCI 10 /* Arbitrary, LDN */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
70 #define SIZE_EF_OCI (27+16) /* alpha id 16 bytes, 31.102 clause 4.2.34 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
71 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
72 #define NR_EF_EXT5 10 /* Arbitrary */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
73 #define SIZE_EF_EXT5 13 /* 31.102 clause 4.2.37 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
74 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
75 #define NR_EF_LRN 10 /* Arbitrary, LRN */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
76 #define SIZE_EF_LRN SIZE_EF_OCI | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
77 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
78 #define NR_EF_LMN 10 /* Arbitrary, LMN */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
79 #define SIZE_EF_LMN SIZE_EF_OCI | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
80 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
81 #define NR_EF_EXT_LRN 10 /* Arbitrary */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
82 #define SIZE_EF_EXT_LRN SIZE_EF_EXT5 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
83 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
84 #define NR_EF_EXT_LMN 10 /* Arbitrary */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
85 #define SIZE_EF_EXT_LMN SIZE_EF_EXT5 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
86 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
87 #define PHB_MAX_QUEUE 4 /* Queued LDN entries */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
88 #define SIM_MAX_RECORD_SIZE 256 /* Maximum size of a SIM record */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
89 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
90 #define PHB_STATE_NULL 0 /* NULL state before reading phonebook */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
91 #define PHB_STATE_IDLE 1 /* IDLE state, phonebook has been read */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
92 #define PHB_STATE_VERIFY 2 /* Verify SIM (Initialization, SAT) */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
93 #define PHB_STATE_READ 3 /* Reading from SIM (Initialization, SAT) */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
94 #define PHB_STATE_WRITE 4 /* Write/Delete single record to SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
95 #define PHB_STATE_DELETE_BOOK 5 /* Delete a whole SIM phonebook */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
96 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
97 #define SET_PHB_STATE(n) pba_data.state = n; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
98 #define GET_PHB_STATE() pba_data.state | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
99 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
100 typedef enum | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
101 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
102 INVALID_EXT = -1, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
103 EXT1, /* ADN, LDN phonebook Extention */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
104 EXT2, /* FDN phonebook Extention */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
105 EXT3, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
106 EXT4, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
107 EXT5, /* Release 1999+ for EF_ICI, EF_OCI */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
108 EXT_LRN, /* Extension for LRN */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
109 EXT_LMN, /* Extension for LMN */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
110 MAX_PHB_EXT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
111 } T_EXT_TYPE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
112 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
113 typedef struct | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
114 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
115 USHORT index; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
116 T_PHB_RECORD entry; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
117 } T_PHB_QUEUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
118 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
119 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
120 * Type definitions | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
121 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
122 typedef struct | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
123 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
124 /* Fixed Dialling Numbers mode */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
125 T_PHB_FDN_MODE fdn_mode; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
126 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
127 /* Fixed Dialling Number class type */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
128 T_ACI_CLASS fdn_classtype; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
129 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
130 /* T_PHB_STATE of the phonebook */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
131 T_PHB_STAT phb_stat; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
132 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
133 /* Current state of the phonebook PHB_STATE_XXX */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
134 UBYTE state; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
135 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
136 /* SIM data */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
137 UBYTE *data; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
138 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
139 /* SIM service table */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
140 UBYTE sim_service_table[MAX_SRV_TBL]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
141 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
142 /* Database has to be recreated (IMSI changed or DB unclean) */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
143 BOOL db_recreate; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
144 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
145 /* Paused elementary file if reading extension record, otherwise 0 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
146 USHORT paused_ef; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
147 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
148 /* Paused record number if reading extension record, otherwise 0 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
149 UBYTE paused_no; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
150 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
151 /* Delete all: Book to delete, Read: Current book reading */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
152 T_PHB_TYPE current_book; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
153 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
154 /* Delete all: current record */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
155 UBYTE del_record; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
156 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
157 /* Book created */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
158 BOOL book_created[MAX_PHONEBOOK]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
159 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
160 /* Extension created */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
161 BOOL ext_created[MAX_PHB_EXT]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
162 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
163 /* We are reading the 1st ext record only to get the number of records */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
164 BOOL ext_dummy_read; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
165 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
166 /* Read flags for SIM phonebooks. Set to TRUE when reading has started */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
167 BOOL book_read[MAX_PHONEBOOK]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
168 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
169 /* Maximum number of phonebook records */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
170 UBYTE phb_record_max[MAX_PHONEBOOK]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
171 /* Maximum number of extension records */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
172 UBYTE ext_record_max[MAX_PHB_EXT]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
173 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
174 /* Record sizes of phonebook records */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
175 UBYTE phb_record_len[MAX_PHONEBOOK]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
176 /* Record sizes of extension records */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
177 UBYTE ext_record_len[MAX_PHB_EXT]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
178 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
179 /* Queued LDN entries during startup */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
180 UBYTE c_queued; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
181 T_PHB_QUEUE *queued[PHB_MAX_QUEUE]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
182 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
183 /* Records to be synchronized to the SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
184 T_DB_CHANGED records_changed; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
185 } T_PHB_ACI_DATA; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
186 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
187 /* We pack all internal data into one data structure */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
188 LOCAL T_PHB_ACI_DATA pba_data; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
189 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
190 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
191 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
192 * Prototypes for local functions | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
193 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
194 LOCAL UBYTE pb_get_max_num_len (T_PHB_TYPE type); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
195 LOCAL BOOL pb_sim_service (UBYTE nr); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
196 LOCAL BOOL pb_read_sim_record (USHORT data_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
197 UBYTE rcd_num, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
198 UBYTE len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
199 LOCAL BOOL pb_read_sim (USHORT data_id, UBYTE len, UBYTE max_length); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
200 LOCAL void pb_read_next_sim_book (void); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
201 LOCAL void pb_read_sim_record_cb (SHORT table_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
202 LOCAL void pb_read_sim_cb (SHORT table_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
203 LOCAL void pb_sat_update_reset (USHORT ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
204 LOCAL T_PHB_RETURN pb_sync_next_sim_record (BOOL first); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
205 LOCAL T_PHB_RETURN pb_write_sim_record (USHORT ef, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
206 UBYTE phy_recno, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
207 UBYTE entry_size, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
208 const UBYTE *buffer); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
209 LOCAL void pb_write_sim_record_cb (SHORT table_id); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
210 T_PHB_TYPE pb_get_phb_type_from_ef (USHORT ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
211 T_EXT_TYPE pb_get_ext_type_from_ef (USHORT ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
212 LOCAL void pb_status_ind (T_PHB_STAT phb_stat, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
213 SHORT cmeError); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
214 LOCAL T_PHB_RETURN pb_write_queue (const T_PHB_RECORD *entry); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
215 LOCAL void pb_clear_queue (void); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
216 LOCAL T_PHB_RETURN pb_read_queue (void); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
217 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
218 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
219 * Functions - Interface functions to external modules | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
220 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
221 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
222 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
223 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
224 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
225 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
226 | STATE : code ROUTINE : pb_init | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
227 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
228 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
229 PURPOSE : Power-on initialization of the phonebook module. This function | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
230 is called at a point in time by pei_init() when it cannot be | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
231 expected that the protocol stack has been booted up completely, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
232 so it is undesirable to do anything here which might rely on | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
233 a module still not started up like the PCM or the FFS. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
234 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
235 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
236 GLOBAL void pb_init (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
237 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
238 TRACE_FUNCTION ("pb_init()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
239 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
240 memset (&pba_data, 0, sizeof (T_PHB_ACI_DATA)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
241 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
242 pba_data.fdn_mode = NO_OPERATION; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
243 pba_data.fdn_classtype = CLASS_VceDatFaxSms; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
244 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
245 pb_sim_init(); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
246 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
247 #ifdef SIM_TOOLKIT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
248 simShrdPrm.fuRef= - 1; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
249 psaSAT_FURegister (pb_update); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
250 #endif /* #ifdef SIM_TOOLKIT */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
251 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
252 SET_PHB_STATE (PHB_STATE_NULL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
253 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
254 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
255 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
256 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
257 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
258 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
259 | STATE : code ROUTINE : pb_exit_phb | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
260 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
261 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
262 PURPOSE : This function synchronizes, if necessary, all unwritten data, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
263 shuts down the SIM phonebook layer and deallocates all | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
264 resources. The SIM itself is not deactivated here. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
265 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
266 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
267 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
268 LOCAL void pb_exit_phb (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
269 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
270 TRACE_FUNCTION ("pb_exit_phb()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
271 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
272 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
273 * Flush everything which has not yet been written. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
274 * Note: It's a good idea if everything is written immediately | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
275 * so that we don't need to flush anything here. Competitor phones | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
276 * do the job in this way, this has the advantage that even after | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
277 * a phone crash immediately after dialling a number or missing | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
278 * a call nothing is lost. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
279 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
280 (void)pb_sim_flush_data (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
281 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
282 /* Shutdown the lower layers */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
283 pb_sim_exit (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
284 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
285 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
286 * Free all allocated resources | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
287 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
288 if (pba_data.data NEQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
289 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
290 ACI_MFREE (pba_data.data); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
291 pba_data.data = NULL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
292 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
293 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
294 pb_clear_queue (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
295 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
296 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
297 * Set phonebook to no operation | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
298 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
299 pba_data.fdn_mode = NO_OPERATION; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
300 pba_data.phb_stat = PHB_UNKNOWN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
301 SET_PHB_STATE (PHB_STATE_NULL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
302 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
303 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
304 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
305 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
306 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
307 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
308 | STATE : code ROUTINE : pb_exit | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
309 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
310 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
311 PURPOSE : Shutdown phonebook and the SIM itself also. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
312 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
313 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
314 GLOBAL void pb_exit (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
315 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
316 TRACE_FUNCTION ("pb_exit()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
317 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
318 /* Shutdown SIM phonebook */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
319 pb_exit_phb (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
320 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
321 /* Shutdown the SIM itself */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
322 simShrdPrm.synCs = SYNC_DEACTIVATE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
323 psaSIM_SyncSIM(); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
324 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
325 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
326 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
327 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
328 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
329 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
330 | STATE : code ROUTINE : pb_reset | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
331 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
332 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
333 PURPOSE : Resets the phonebook, basically pb_exit() / pb_init(). | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
334 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
335 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
336 GLOBAL void pb_reset (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
337 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
338 TRACE_FUNCTION ("pb_reset()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
339 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
340 if (GET_PHB_STATE() EQ PHB_STATE_NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
341 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
342 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
343 pb_exit_phb(); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
344 pb_init(); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
345 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
346 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
347 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
348 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
349 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
350 | STATE : code ROUTINE : pb_set_sim_ecc | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
351 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
352 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
353 PURPOSE : This function set's the emergency call numbers. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
354 This can only happen at startup time when the SIM when | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
355 a SIM_ACTIVATE_CNF / SIM_ACTIVATE_IND is received. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
356 At this point in time the entering of PIN may be outstanding, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
357 the only information we may have gotten are the emergency call | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
358 numbers. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
359 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
360 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
361 GLOBAL void pb_set_sim_ecc (USHORT cause, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
362 UBYTE ecc_len, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
363 const UBYTE *sim_ecc) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
364 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
365 TRACE_FUNCTION ("pb_set_sim_ecc()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
366 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
367 if (pba_data.fdn_mode NEQ NO_OPERATION) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
368 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
369 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
370 * Setting of the emergency call numbers after having gotten the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
371 * IMSI of the SIM is ignored. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
372 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
373 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
374 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
375 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
376 if ((cause EQ SIM_CAUSE_OTHER_ERROR) OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
377 (cause EQ SIM_CAUSE_CARD_REMOVED) OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
378 (cause >= SIM_CAUSE_PARAM_WRONG AND cause <= SIM_CAUSE_DRV_TEMPFAIL)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
379 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
380 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
381 * Some error from the SIM. Indicate a fallback to the PCM/FFS. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
382 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
383 (void)pb_sim_set_ecc (0, NULL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
384 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
385 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
386 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
387 (void)pb_sim_set_ecc (ecc_len, sim_ecc); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
388 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
389 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
390 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
391 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
392 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
393 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
394 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
395 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
396 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
397 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
398 | STATE : code ROUTINE : pb_inserted_sim | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
399 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
400 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
401 PURPOSE : This function is called when the PIN has been entered and we have | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
402 the IMSI and full access on the SIM phonebook. Reading/Verifying | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
403 of phonebook data is not started at this point except for the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
404 ECC phonebook. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
405 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
406 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
407 GLOBAL void pb_inserted_sim (UBYTE c_sim_serv, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
408 UBYTE *sim_serv, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
409 const T_imsi_field *imsi_field, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
410 UBYTE adn_bdn_fdn_func, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
411 UBYTE phase) // For further study | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
412 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
413 T_FFS_SIZE ffs_size; /* FFS result code */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
414 T_ACI_CLASS classFDN; /* FDN class */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
415 UBYTE ub_class = (UBYTE)CLASS_None; /* T_ACI_CLASS */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
416 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
417 TRACE_FUNCTION ("pb_inserted_sim()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
418 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
419 /* Store SIM service table */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
420 if (c_sim_serv > MAX_SRV_TBL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
421 c_sim_serv = MAX_SRV_TBL; /* Garbage protection */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
422 memcpy (pba_data.sim_service_table, sim_serv, c_sim_serv); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
423 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
424 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
425 * Open SIM phonebook. Remember whether the database has to be recreated | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
426 * for some reason (SIM changed, database unclean). | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
427 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
428 if (pb_sim_open (imsi_field, &pba_data.db_recreate) NEQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
429 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
430 /* We're here in really big trouble and can do nothing about it */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
431 TRACE_ERROR ("Fatal: pb_sim_open() NEQ PHB_OK"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
432 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
433 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
434 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
435 * Update ECC phonebook | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
436 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
437 pba_data.book_read[ECC] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
438 if (!pb_read_sim (SIM_ECC, NOT_PRESENT_8BIT, (UBYTE)SIM_MAX_RECORD_SIZE)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
439 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
440 /* Unexpected problem. Live with previously read values */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
441 TRACE_ERROR ("Unexpected: No free SIM slot"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
442 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
443 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
444 switch (adn_bdn_fdn_func) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
445 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
446 case SIM_ADN_ENABLED: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
447 case SIM_ADN_BDN_ENABLED: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
448 pba_data.fdn_mode = FDN_DISABLE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
449 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
450 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
451 case SIM_FDN_ENABLED: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
452 case SIM_FDN_BDN_ENABLED: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
453 pba_data.fdn_mode = FDN_ENABLE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
454 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
455 /* read last fdn_classtype from FFS */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
456 ffs_size = ffs_file_read ("/mmi/fdnClassType", &ub_class, sizeof(ub_class)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
457 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
458 if (ffs_size EQ sizeof(ub_class)) /* successful read */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
459 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
460 classFDN = (T_ACI_CLASS)ub_class; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
461 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
462 /* only these two classes are currently supported */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
463 if (classFDN EQ CLASS_VceDatFax OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
464 classFDN EQ CLASS_VceDatFaxSms) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
465 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
466 pba_data.fdn_classtype = classFDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
467 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
468 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
469 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
470 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
471 default: /* SIM_NO_OPERATION or trash */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
472 pba_data.fdn_mode = NO_OPERATION; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
473 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
474 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
475 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
476 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
477 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
478 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
479 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
480 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
481 | STATE : code ROUTINE : pb_start_build | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
482 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
483 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
484 PURPOSE : This function is called when the flash phonebook has to be | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
485 read/verified from/against the phonebook stored on the SIM card. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
486 This is triggered by the reception of the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
487 MNSMS_REPORT_IND (SMS_STATE_READY) primitive. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
488 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
489 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
490 GLOBAL void pb_start_build (BOOL unchanged) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
491 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
492 TRACE_FUNCTION ("pb_start_build()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
493 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
494 if (pba_data.db_recreate) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
495 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
496 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
497 * Indicate a busy phonebook. We have to re-read all from scratch | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
498 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
499 pb_status_ind (PHB_BUSY, CME_ERR_NotPresent); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
500 SET_PHB_STATE (PHB_STATE_READ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
501 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
502 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
503 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
504 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
505 * SIM (IMSI) not changed and database clean, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
506 * allow reading from the SIM phonebook by the MMI. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
507 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
508 pb_status_ind (PHB_READY, CME_ERR_NotPresent); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
509 SET_PHB_STATE (PHB_STATE_VERIFY); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
510 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
511 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
512 pba_data.ext_dummy_read = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
513 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
514 #ifdef _SIMULATION_ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
515 TRACE_EVENT_P1 ("SRV_ADN: %s", pb_sim_service (SRV_ADN) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
516 TRACE_EVENT_P1 ("SRV_FDN: %s", pb_sim_service (SRV_FDN) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
517 TRACE_EVENT_P1 ("SRV_CCP: %s", pb_sim_service (SRV_CCP) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
518 TRACE_EVENT_P1 ("SRV_MSISDN: %s",pb_sim_service (SRV_MSISDN) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
519 TRACE_EVENT_P1 ("SRV_EXT1: %s", pb_sim_service (SRV_EXT1) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
520 TRACE_EVENT_P1 ("SRV_EXT2: %s", pb_sim_service (SRV_EXT2) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
521 TRACE_EVENT_P1 ("SRV_LDN: %s", pb_sim_service (SRV_LDN) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
522 TRACE_EVENT_P1 ("SRV_SDN: %s", pb_sim_service (SRV_SDN) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
523 TRACE_EVENT_P1 ("SRV_EXT3: %s", pb_sim_service (SRV_EXT3) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
524 TRACE_EVENT_P1 ("SRV_BDN: %s", pb_sim_service (SRV_BDN) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
525 TRACE_EVENT_P1 ("SRV_EXT4: %s", pb_sim_service (SRV_EXT4) ? "YES" : "NO"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
526 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
527 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
528 pb_read_next_sim_book(); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
529 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
530 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
531 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
532 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
533 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
534 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
535 | STATE : code ROUTINE : pb_update | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
536 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
537 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
538 PURPOSE : This function is called when the SIM wants to inform the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
539 phonebook that some elementary files have been changed. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
540 Returns TRUE if no files aere changed affecting the phonebook, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
541 otherwise FALSE. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
542 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
543 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
544 GLOBAL BOOL pb_update (int ref, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
545 T_SIM_FILE_UPDATE_IND *fu) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
546 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
547 unsigned i; /* Index variable */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
548 T_PHB_TYPE phb_type; /* Phonebook type */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
549 T_EXT_TYPE ext_type; /* Extension type */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
550 USHORT ef; /* Elementary file number */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
551 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
552 TRACE_FUNCTION ("pb_update()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
553 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
554 simShrdPrm.fuRef = -1; /* Assume phonebook is not affected */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
555 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
556 for (i = 0; i < fu->val_nr; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
557 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
558 ef = fu->file_id[i]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
559 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
560 if (ef EQ SIM_SST) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
561 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
562 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
563 * When SIM service table is changed, then all SIM phonebooks | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
564 * will be updated. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
565 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
566 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
567 /* Mark all phonebooks as unread */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
568 pb_sat_update_reset (SIM_ECC); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
569 pb_sat_update_reset (SIM_ADN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
570 pb_sat_update_reset (SIM_FDN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
571 pb_sat_update_reset (SIM_BDN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
572 #ifdef SIM_LND_SUPPORT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
573 pb_sat_update_reset (SIM_LND); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
574 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
575 pb_sat_update_reset (SIM_MSISDN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
576 pb_sat_update_reset (SIM_SDN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
577 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
578 /* Mark all extensions as unread */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
579 pb_sat_update_reset (EXT1); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
580 pb_sat_update_reset (EXT2); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
581 pb_sat_update_reset (EXT3); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
582 pb_sat_update_reset (EXT4); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
583 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
584 if (!pb_read_sim (SIM_SST, NOT_PRESENT_8BIT, (UBYTE)SIM_MAX_RECORD_SIZE)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
585 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
586 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
587 * We could not get an empty slot and are in trouble now as there is | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
588 * no good error handling possible here. On the other hand, it is | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
589 * not expected ever that an error occurs here. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
590 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
591 TRACE_ERROR ("Internal problem getting a SIM slot"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
592 return TRUE; /* No update in progress */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
593 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
594 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
595 simShrdPrm.fuRef = ref; /* Something to do */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
596 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
597 SET_PHB_STATE (PHB_STATE_READ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
598 return FALSE; /* Update in progress */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
599 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
600 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
601 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
602 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
603 * At least the SIM service table has not been changed, check now for | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
604 * single phonebooks and extension records. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
605 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
606 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
607 for (i = 0; i < fu->val_nr; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
608 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
609 ef = fu->file_id[i]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
610 phb_type = pb_get_phb_type_from_ef (ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
611 ext_type = pb_get_ext_type_from_ef (ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
612 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
613 if (phb_type NEQ INVALID_PHB) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
614 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
615 /* Phonebook affected by change */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
616 simShrdPrm.fuRef = ref; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
617 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
618 /* Reset respective field */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
619 pb_sat_update_reset (ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
620 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
621 switch (phb_type) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
622 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
623 case ADN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
624 pb_sat_update_reset (SIM_FDN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
625 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
626 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
627 case FDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
628 pb_sat_update_reset (SIM_ADN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
629 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
630 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
631 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
632 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
633 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
634 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
635 else if (ext_type NEQ INVALID_EXT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
636 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
637 /* Phonebook affected by change */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
638 simShrdPrm.fuRef = ref; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
639 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
640 /* Reset respective field */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
641 pb_sat_update_reset (ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
642 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
643 /* Mark also the appropriate book itself as unread */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
644 switch (ext_type) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
645 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
646 case EXT1: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
647 pb_sat_update_reset (SIM_ADN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
648 pb_sat_update_reset (SIM_MSISDN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
649 #ifdef SIM_LND_SUPPORT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
650 pb_sat_update_reset (SIM_LND); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
651 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
652 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
653 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
654 case EXT2: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
655 pb_sat_update_reset (SIM_FDN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
656 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
657 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
658 case EXT3: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
659 pb_sat_update_reset (SIM_SDN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
660 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
661 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
662 case EXT4: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
663 pb_sat_update_reset (SIM_EXT4); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
664 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
665 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
666 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
667 TRACE_ERROR ("Unexpected default"); /* Everything caught */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
668 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
669 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
670 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
671 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
672 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
673 if (simShrdPrm.fuRef NEQ -1) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
674 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
675 pb_start_build (FALSE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
676 return FALSE; /* FALSE means update in progress */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
677 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
678 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
679 return TRUE; /* TRUE means nothing to do */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
680 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
681 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
682 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
683 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
684 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
685 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
686 | STATE : code ROUTINE : pb_flush_data | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
687 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
688 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
689 PURPOSE : This function is called when someone wants to flush some pending | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
690 data to persistent memory. Probably a bad concept, it's always | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
691 better to flush always internally if some operation is finished | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
692 and to synchronize also to the SIM immediately. This has the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
693 advantage that even after a crash nothing is lost. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
694 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
695 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
696 T_PHB_RETURN pb_flush_data (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
697 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
698 TRACE_FUNCTION ("pb_flush_data()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
699 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
700 /* This function is empty, and this should remain this way if possible */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
701 return PHB_OK; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
702 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
703 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
704 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
705 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
706 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
707 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
708 | STATE : code ROUTINE : pb_add_record | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
709 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
710 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
711 PURPOSE : This function adds or replaces a phonebook entry. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
712 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
713 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
714 GLOBAL T_PHB_RETURN pb_add_record (T_PHB_TYPE type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
715 USHORT phy_recno, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
716 const T_PHB_RECORD *entry) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
717 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
718 T_PHB_RETURN phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
719 T_DB_CHANGED dummy_changed; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
720 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
721 TRACE_FUNCTION ("pb_add_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
722 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
723 #ifdef _SIMULATION_ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
724 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
725 char name [PHB_MAX_TAG_LEN + 1]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
726 char number[MAX_PHB_NUM_LEN]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
727 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
728 memset (name, 0, PHB_MAX_TAG_LEN + 1); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
729 memcpy (name, entry->tag, entry->tag_len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
730 cmhPHB_getAdrStr (number, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
731 MAX_PHB_NUM_LEN - 1, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
732 entry->number, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
733 entry->len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
734 if ((UBYTE)(name[0]) >= 0x80) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
735 strcpy (name, "<Some UCS2 coding>"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
736 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
737 TRACE_EVENT_P4 ("Adding number %s with name '%s' to book %d record %d", | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
738 number, name, type, phy_recno); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
739 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
740 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
741 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
742 /* Fix phy_recno parameter for circular books */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
743 if ((type EQ LDN) OR (type EQ LMN) OR (type EQ LRN)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
744 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
745 if (phy_recno EQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
746 phy_recno = 1; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
747 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
748 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
749 switch (GET_PHB_STATE()) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
750 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
751 case PHB_STATE_IDLE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
752 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
753 /* Add the data in the database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
754 phb_result = pb_sim_add_record (type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
755 phy_recno, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
756 entry, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
757 &pba_data.records_changed); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
758 if (phb_result NEQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
759 return phb_result; /* Record could not be added to the database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
760 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
761 if (pba_data.records_changed.entries NEQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
762 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
763 SET_PHB_STATE (PHB_STATE_WRITE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
764 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
765 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
766 /* Start synchronizing record(s) to the SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
767 return pb_sync_next_sim_record (TRUE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
768 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
769 case PHB_STATE_VERIFY: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
770 case PHB_STATE_READ: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
771 if ((type EQ LRN) OR (type EQ LMN)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
772 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
773 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
774 * In Release 1998- there is no counterpart on the SIM here, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
775 * we can write immediately as we don't have to synch to the SIM. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
776 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
777 return (pb_sim_add_record (type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
778 phy_recno, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
779 entry, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
780 &dummy_changed)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
781 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
782 else if (type EQ LDN) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
783 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
784 /* We have to queue the LDN entry and will write later */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
785 return pb_write_queue (entry); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
786 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
787 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
788 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
789 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
790 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
791 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
792 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
793 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
794 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
795 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
796 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
797 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
798 | STATE : code ROUTINE : pb_del_record | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
799 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
800 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
801 PURPOSE : This function deletes a phonebook entry. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
802 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
803 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
804 GLOBAL T_PHB_RETURN pb_del_record (T_PHB_TYPE type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
805 USHORT phy_recno) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
806 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
807 T_PHB_RETURN phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
808 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
809 TRACE_FUNCTION ("pb_del_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
810 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
811 if (GET_PHB_STATE() NEQ PHB_STATE_IDLE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
812 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
813 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
814 /* Delete the data in the database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
815 phb_result = pb_sim_del_record (type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
816 phy_recno, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
817 &pba_data.records_changed); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
818 if (phb_result NEQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
819 return phb_result; /* Record could not be deleted from the database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
820 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
821 if (pba_data.records_changed.entries NEQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
822 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
823 SET_PHB_STATE (PHB_STATE_WRITE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
824 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
825 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
826 /* Start synchronizing record(s) to the SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
827 return pb_sync_next_sim_record (TRUE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
828 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
829 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
830 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
831 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
832 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
833 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
834 | STATE : code ROUTINE : pb_check_fdn | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
835 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
836 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
837 PURPOSE : This function checks whether a phone number is in FDN phonebook. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
838 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
839 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
840 #define RETURN(x) { retVal = x; goto cleanup_exit; } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
841 /*lint -e{801} Use of goto*/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
842 GLOBAL T_PHB_RETURN pb_check_fdn (UBYTE toa, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
843 const UBYTE *number) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
844 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
845 T_PHB_RETURN retVal; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
846 T_PHB_RECORD *phb_record; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
847 size_t cmp_len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
848 CHAR cur_number[MAX_PHB_NUM_LEN]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
849 USHORT phy_recno; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
850 SHORT max_rcd; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
851 SHORT dummy_used_rcd; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
852 UBYTE dummy_tag_len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
853 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
854 ACI_MALLOC (phb_record, sizeof (T_PHB_RECORD)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
855 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
856 TRACE_FUNCTION ("pb_check_fdn()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
857 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
858 retVal = pb_sim_read_sizes (FDN, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
859 &max_rcd, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
860 &dummy_used_rcd, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
861 &dummy_tag_len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
862 if (retVal NEQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
863 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
864 TRACE_ERROR ("Unexpected return from pb_sim_read_sizes()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
865 RETURN (retVal) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
866 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
867 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
868 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
869 * Do a linear search through all the records applying the number comparision | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
870 * rules which make us pass 51.010 test case 27.18.1.1.4.2. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
871 * Those rules are different from those which are to be applied if a matching | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
872 * record has to be found for an incoming call, therefore we cannot use | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
873 * pb_sim_search_number() here. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
874 * As normally FDN phonebooks have not more than 10 entries (max_rcd) a | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
875 * simple linear search will fulfill here all timing requirements. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
876 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
877 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
878 for (phy_recno = 1; phy_recno <= max_rcd; phy_recno++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
879 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
880 retVal = pb_sim_read_record (FDN, phy_recno, phb_record); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
881 if (retVal EQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
882 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
883 cmhPHB_getAdrStr (cur_number, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
884 MAX_PHB_NUM_LEN - 1, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
885 phb_record->number, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
886 phb_record->len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
887 cmp_len = strlen (cur_number); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
888 if (strncmp ((char *)number, cur_number, cmp_len) EQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
889 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
890 /* Number matches. ACI-SPR-11927: check type of address */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
891 if ((toa EQ 0) OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
892 (toa EQ phb_record->ton_npi) OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
893 (phb_record->ton_npi EQ 0xFF)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
894 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
895 RETURN (PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
896 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
897 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
898 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
899 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
900 RETURN (PHB_FAIL) /* Not found */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
901 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
902 cleanup_exit: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
903 ACI_MFREE (phb_record); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
904 return retVal; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
905 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
906 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
907 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
908 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
909 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
910 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
911 | STATE : code ROUTINE : pb_switch_adn_fdn | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
912 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
913 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
914 PURPOSE : This function switches FDN and ADN phonebooks (sAT_PlusCLCK()). | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
915 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
916 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
917 GLOBAL T_PHB_RETURN pb_switch_adn_fdn (T_PHB_FDN_MODE mode, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
918 T_ACI_CLASS classFDN) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
919 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
920 TRACE_FUNCTION ("pb_switch_adn_fdn()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
921 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
922 if (GET_PHB_STATE() NEQ PHB_STATE_IDLE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
923 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
924 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
925 /* Check parameters */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
926 switch (mode) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
927 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
928 case FDN_DISABLE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
929 case FDN_ENABLE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
930 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
931 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
932 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
933 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
934 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
935 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
936 if (classFDN NEQ pba_data.fdn_classtype) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
937 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
938 UBYTE ub_class; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
939 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
940 ub_class = (UBYTE)classFDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
941 pba_data.fdn_classtype = classFDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
942 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
943 #ifndef _SIMULATION_ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
944 if (ffs_fwrite("/mmi/fdnClassType", &classFDN, sizeof(ub_class)) < 1) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
945 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
946 TRACE_ERROR ("sAT_PlusCLCK: failed to write /mmi/fdnClassType"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
947 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
948 #endif /* #ifndef _SIMULATION_ */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
949 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
950 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
951 #if 1 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
952 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
953 pba_data.fdn_mode = mode; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
954 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
955 /* Remove ADN from database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
956 (void)pb_sim_remove_ef (SIM_ADN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
957 pba_data.book_created[ADN] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
958 pba_data.book_read[ADN] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
959 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
960 /* Remove FDN from database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
961 (void)pb_sim_remove_ef (SIM_FDN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
962 pba_data.book_created[FDN] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
963 pba_data.book_read[FDN] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
964 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
965 /* Remove EXT2 from database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
966 (void)pb_sim_remove_ef (SIM_EXT2); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
967 pba_data.ext_created[EXT2] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
968 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
969 /* Force cmhPHB_StatIndication (PHB_BUSY, CME_ERR_NotPresent) */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
970 pba_data.db_recreate = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
971 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
972 SET_PHB_STATE (PHB_STATE_READ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
973 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
974 /* Start reading changed books */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
975 pb_start_build (FALSE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
976 #else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
977 // This optimization does not comply with current test cases, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
978 // not understood perfectly whether the test cases can be | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
979 // changed, so kept old behaviour. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
980 if (pba_data.fdn_mode NEQ mode) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
981 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
982 pba_data.fdn_mode = mode; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
983 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
984 if (mode EQ FDN_ENABLE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
985 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
986 /* Remove ADN from database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
987 (void)pb_sim_remove_ef (SIM_ADN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
988 pba_data.book_created[ADN] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
989 pba_data.book_read[ADN] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
990 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
991 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
992 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
993 /* Remove FDN from database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
994 (void)pb_sim_remove_ef (SIM_FDN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
995 pba_data.book_created[FDN] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
996 pba_data.book_read[FDN] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
997 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
998 /* Remove EXT2 from database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
999 (void)pb_sim_remove_ef (SIM_EXT2); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1000 pba_data.ext_created[EXT2] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1001 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1002 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1003 /* Force cmhPHB_StatIndication (PHB_BUSY, CME_ERR_NotPresent) */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1004 pba_data.db_recreate = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1005 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1006 SET_PHB_STATE (PHB_STATE_READ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1007 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1008 /* Start reading changed books */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1009 pb_start_build (FALSE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1010 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1011 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1012 return PHB_OK; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1013 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1014 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1015 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1016 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1017 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1018 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1019 | STATE : code ROUTINE : pb_del_book | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1020 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1021 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1022 PURPOSE : This function deletes a whole SIM phonebook | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1023 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1024 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1025 GLOBAL T_PHB_RETURN pb_del_book (T_PHB_TYPE book) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1026 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1027 T_PHB_RETURN phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1028 UBYTE max_record; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1029 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1030 TRACE_FUNCTION ("pb_del_book()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1031 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1032 if (GET_PHB_STATE() NEQ PHB_STATE_IDLE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1033 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1034 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1035 /* Remember book to delete, initialize record to delete */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1036 pba_data.current_book = book; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1037 pba_data.del_record = 1; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1038 max_record = pba_data.phb_record_max[pba_data.current_book]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1039 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1040 do | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1041 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1042 /* Delete the record in the database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1043 phb_result = pb_sim_del_record (pba_data.current_book, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1044 pba_data.del_record, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1045 &pba_data.records_changed); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1046 if (phb_result NEQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1047 return phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1048 pba_data.del_record++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1049 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1050 while ((pba_data.del_record <= max_record) AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1051 (pba_data.records_changed.entries EQ 0)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1052 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1053 if (pba_data.records_changed.entries NEQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1054 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1055 /* Synchronize to SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1056 SET_PHB_STATE (PHB_STATE_DELETE_BOOK); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1057 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1058 /* Start synchronizing record(s) to the SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1059 return pb_sync_next_sim_record (TRUE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1060 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1061 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1062 return PHB_OK; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1063 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1064 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1065 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1066 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1067 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1068 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1069 | STATE : code ROUTINE : pb_get_fdn_classtype | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1070 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1071 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1072 PURPOSE : This function gets the FDN class type | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1073 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1074 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1075 GLOBAL T_ACI_CLASS pb_get_fdn_classtype (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1076 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1077 TRACE_FUNCTION ("pb_get_fdn_classtype()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1078 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1079 return pba_data.fdn_classtype; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1080 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1081 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1082 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1083 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1084 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1085 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1086 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1087 | STATE : code ROUTINE : pb_get_fdn_mode | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1088 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1089 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1090 PURPOSE : This function gets the FDN mode | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1091 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1092 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1093 GLOBAL T_PHB_FDN_MODE pb_get_fdn_mode (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1094 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1095 TRACE_FUNCTION ("pb_get_fdn_mode()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1096 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1097 return pba_data.fdn_mode; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1098 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1099 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1100 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1101 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1102 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1103 * Wrapper functions. Wrapper functions don't define own functionality | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1104 * except of routing to a different block which is the SIM part of | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1105 * the phonebook here. For a description of these functions have | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1106 * a look into the SIM part of the phonebook. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1107 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1108 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1109 GLOBAL T_PHB_RETURN pb_read_record (T_PHB_TYPE type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1110 SHORT phy_recno, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1111 T_PHB_RECORD *entry) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1112 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1113 T_PHB_RETURN phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1114 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1115 TRACE_FUNCTION ("pb_read_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1116 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1117 if (phy_recno EQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1118 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1119 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1120 switch (GET_PHB_STATE()) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1121 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1122 case PHB_STATE_VERIFY: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1123 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1124 * For LDN records, first have a look into the queue | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1125 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1126 if ((type EQ LDN) AND (phy_recno - 1 < pba_data.c_queued)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1127 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1128 /* Entry freshly dialled and still in the queue */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1129 *entry = pba_data.queued[phy_recno - 1]->entry; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1130 return PHB_OK; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1131 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1132 phb_result = pb_sim_read_record (type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1133 (USHORT)(phy_recno - pba_data.c_queued), | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1134 entry); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1135 TRACE_EVENT_P3 ("type = %d, phy_recno = %d, phb_result = %d", | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1136 type, phy_recno, phb_result); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1137 return phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1138 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1139 case PHB_STATE_READ: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1140 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1141 * For LDN records, first have a look into the queue | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1142 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1143 if ((type EQ LDN) AND (phy_recno - 1 < pba_data.c_queued)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1144 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1145 /* Entry freshly dialled and still in the queue */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1146 *entry = pba_data.queued[phy_recno - 1]->entry; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1147 return PHB_OK; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1148 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1149 return PHB_FAIL; /* We already know the SIM was changed */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1150 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1151 case PHB_STATE_IDLE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1152 phb_result = pb_sim_read_record (type, phy_recno, entry); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1153 TRACE_EVENT_P3 ("type = %d, phy_recno = %d, phb_result = %d", | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1154 type, phy_recno, phb_result); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1155 return phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1156 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1157 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1158 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1159 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1160 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1161 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1162 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1163 GLOBAL T_PHB_RETURN pb_read_alpha_record (T_PHB_TYPE type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1164 SHORT order_num, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1165 T_PHB_RECORD *entry) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1166 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1167 TRACE_FUNCTION ("pb_read_alpha_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1168 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1169 switch (GET_PHB_STATE()) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1170 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1171 case PHB_STATE_IDLE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1172 case PHB_STATE_VERIFY: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1173 return pb_sim_read_alpha_record (type, order_num, entry); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1174 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1175 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1176 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1177 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1178 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1179 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1180 GLOBAL T_PHB_RETURN pb_read_number_record (T_PHB_TYPE type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1181 SHORT order_num, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1182 T_PHB_RECORD *entry) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1183 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1184 TRACE_FUNCTION ("pb_read_number_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1185 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1186 switch (GET_PHB_STATE()) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1187 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1188 case PHB_STATE_IDLE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1189 case PHB_STATE_VERIFY: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1190 return pb_sim_read_number_record (type, order_num, entry); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1191 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1192 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1193 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1194 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1195 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1196 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1197 GLOBAL T_PHB_RETURN pb_search_name (T_PHB_TYPE type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1198 T_PHB_MATCH match, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1199 const T_ACI_PB_TEXT *search_tag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1200 SHORT *order_num) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1201 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1202 T_PHB_RETURN phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1203 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1204 TRACE_FUNCTION ("pb_search_name()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1205 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1206 switch (GET_PHB_STATE()) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1207 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1208 case PHB_STATE_IDLE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1209 case PHB_STATE_VERIFY: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1210 TRACE_EVENT_P1 ("order_num = %d", *order_num); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1211 phb_result = pb_sim_search_name (type, match, search_tag, order_num); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1212 if (phb_result EQ PHB_OK) // #HM# Remove before production | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1213 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1214 TRACE_EVENT ("Entry found"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1215 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1216 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1217 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1218 TRACE_EVENT ("Entry not found"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1219 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1220 return phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1221 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1222 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1223 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1224 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1225 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1226 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1227 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1228 GLOBAL T_PHB_RETURN pb_search_number (T_PHB_TYPE type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1229 const UBYTE *number, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1230 SHORT *order_num) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1231 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1232 TRACE_FUNCTION ("pb_search_number()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1233 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1234 switch (GET_PHB_STATE()) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1235 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1236 case PHB_STATE_IDLE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1237 case PHB_STATE_VERIFY: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1238 return pb_sim_search_number (type, number, order_num); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1239 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1240 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1241 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1242 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1243 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1244 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1245 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1246 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1247 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1248 | STATE : code ROUTINE : pb_get_max_num_len | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1249 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1250 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1251 PURPOSE : This function gets the maximum length of a number within a | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1252 given phonebook. The length depends on the given phonebook and | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1253 the availability of extension records (SIM service table). | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1254 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1255 Question: From an architectural point of view, belongs this into | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1256 the ACI part of the phonebook or more into the SIM part of the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1257 phonebook? SIM part until now has no information about SIM service | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1258 table. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1259 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1260 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1261 LOCAL UBYTE pb_get_max_num_len (T_PHB_TYPE type) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1262 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1263 TRACE_FUNCTION ("pb_get_max_num_len()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1264 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1265 switch (type) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1266 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1267 case ECC: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1268 return 3; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1269 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1270 case ADN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1271 case UPN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1272 case ADN_ME: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1273 if (pb_sim_service (SRV_EXT1)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1274 return 2 * PHB_PACKED_NUM_LEN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1275 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1276 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1277 case FDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1278 if (pb_sim_service (SRV_EXT2)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1279 return 2 * PHB_PACKED_NUM_LEN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1280 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1281 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1282 case SDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1283 if (pb_sim_service (SRV_EXT3)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1284 return 2 * PHB_PACKED_NUM_LEN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1285 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1286 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1287 case BDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1288 if (pb_sim_service (SRV_EXT4)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1289 return 2 * PHB_PACKED_NUM_LEN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1290 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1291 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1292 case LDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1293 case LRN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1294 case LMN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1295 case ME: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1296 return 2 * PHB_PACKED_NUM_LEN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1297 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1298 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1299 TRACE_ERROR ("Invalid phonebook type"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1300 return 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1301 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1302 return 20; /* Default according to 11.11 if no EXT records and not ECC */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1303 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1304 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1305 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1306 GLOBAL T_PHB_RETURN pb_read_sizes (T_PHB_TYPE type, /* IN */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1307 SHORT *max_rcd, /* OUT */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1308 SHORT *used_rcd, /* OUT */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1309 UBYTE *num_len, /* OUT */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1310 UBYTE *tag_len) /* OUT */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1311 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1312 T_PHB_RETURN phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1313 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1314 TRACE_FUNCTION ("pb_read_sizes()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1315 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1316 switch (GET_PHB_STATE()) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1317 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1318 case PHB_STATE_IDLE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1319 case PHB_STATE_VERIFY: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1320 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1321 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1322 * For a valid phonebook type, set all parameters to zero instead of | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1323 * reporting an error. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1324 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1325 switch (type) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1326 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1327 case ECC: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1328 case ADN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1329 case FDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1330 case BDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1331 case LDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1332 case LRN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1333 case SDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1334 case LMN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1335 case UPN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1336 /*case ME: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1337 case ADN_ME:*/ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1338 *num_len = pb_get_max_num_len (type); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1339 phb_result = pb_sim_read_sizes (type, max_rcd, used_rcd, tag_len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1340 if (phb_result NEQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1341 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1342 *max_rcd = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1343 *used_rcd = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1344 *num_len = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1345 *tag_len = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1346 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1347 return PHB_OK; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1348 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1349 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1350 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1351 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1352 return PHB_FAIL; /* Invalid phonebook */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1353 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1354 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1355 return PHB_FAIL; /* Invalid state */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1356 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1357 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1358 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1359 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1360 GLOBAL int pb_get_entry_len (const UBYTE *pb_tag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1361 UBYTE max_pb_len) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1362 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1363 TRACE_FUNCTION ("pb_get_entry_len()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1364 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1365 return pb_sim_get_entry_len (pb_tag, max_pb_len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1366 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1367 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1368 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1369 GLOBAL int pb_find_free_record (T_PHB_TYPE type) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1370 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1371 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1372 * This function finds the number of the first free record in | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1373 * a given phonebook. This is new functionality as from S621. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1374 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1375 TRACE_FUNCTION ("pb_find_free_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1376 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1377 switch (GET_PHB_STATE()) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1378 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1379 case PHB_STATE_IDLE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1380 case PHB_STATE_VERIFY: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1381 return pb_sim_find_free_record (type); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1382 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1383 return PHB_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1384 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1385 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1386 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1387 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1388 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1389 * Internal functions, not part of the interface | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1390 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1391 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1392 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1393 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1394 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1395 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1396 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1397 | STATE : code ROUTINE : pb_sim_service | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1398 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1399 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1400 PURPOSE : This function checks whether a given service is | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1401 "allocated and activated" on the SIM, if so TRUE is returned, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1402 otherwise the function returns FALSE. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1403 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1404 No, using psaSIM_ChkSIMSrvSup() is not a good alternative here | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1405 as we may have to handle the situation where the SIM service | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1406 table itself has been changed, in this case we are not signalled | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1407 by the ACI when we have again a valid SIM service table, therefore | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1408 this function exist here within the phonebook. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1409 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1410 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1411 LOCAL BOOL pb_sim_service (UBYTE nr) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1412 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1413 UBYTE byte_offset; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1414 UBYTE bit_offset; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1415 UBYTE service; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1416 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1417 TRACE_FUNCTION ("pb_sim_service()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1418 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1419 if (nr > MAX_SRV_TBL * 4) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1420 return FALSE; /* Table overflow */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1421 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1422 byte_offset = (nr - 1) / 4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1423 bit_offset = ((nr - 1) & 0x03) * 2; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1424 service = (pba_data.sim_service_table[byte_offset] >> bit_offset) & 0x03; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1425 return (service EQ ALLOCATED_AND_ACTIVATED); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1426 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1427 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1428 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1429 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1430 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1431 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1432 | STATE : code ROUTINE : pb_read_sim_record | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1433 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1434 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1435 PURPOSE : This function sends a SIM_READ_RECORD_REQ to the SIM card. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1436 On success this function returns TRUE, otherwise FALSE. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1437 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1438 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1439 LOCAL BOOL pb_read_sim_record (USHORT data_id, UBYTE rcd_num, UBYTE len) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1440 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1441 SHORT table_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1442 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1443 TRACE_FUNCTION ("pb_read_sim_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1444 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1445 table_id = psaSIM_atbNewEntry(); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1446 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1447 if (table_id NEQ NO_ENTRY) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1448 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1449 /* Allocate room for the SIM data */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1450 if (pba_data.data EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1451 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1452 ACI_MALLOC (pba_data.data, SIM_MAX_RECORD_SIZE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1453 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1454 simShrdPrm.atb[table_id].ntryUsdFlg = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1455 simShrdPrm.atb[table_id].accType = ACT_RD_REC; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1456 simShrdPrm.atb[table_id].reqDataFld = data_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1457 simShrdPrm.atb[table_id].recNr = rcd_num; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1458 if (rcd_num EQ 1) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1459 simShrdPrm.atb[table_id].dataLen = NOT_PRESENT_8BIT; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1460 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1461 simShrdPrm.atb[table_id].dataLen = len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1462 simShrdPrm.atb[table_id].exchData = pba_data.data; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1463 simShrdPrm.atb[table_id].rplyCB = pb_read_sim_record_cb; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1464 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1465 simShrdPrm.aId = table_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1466 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1467 if (psaSIM_AccessSIMData() < 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1468 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1469 TRACE_EVENT("FATAL ERROR"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1470 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1471 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1472 return TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1473 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1474 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1475 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1476 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1477 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1478 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1479 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1480 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1481 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1482 | STATE : code ROUTINE : pb_read_sim | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1483 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1484 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1485 PURPOSE : This function sends a SIM_READ_REQ to the SIM card. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1486 On success this function returns TRUE, otherwise FALSE. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1487 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1488 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1489 LOCAL BOOL pb_read_sim (USHORT data_id, UBYTE len, UBYTE max_length) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1490 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1491 SHORT table_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1492 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1493 TRACE_FUNCTION ("pb_read_sim()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1494 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1495 table_id = psaSIM_atbNewEntry(); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1496 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1497 if (table_id NEQ NO_ENTRY) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1498 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1499 /* Allocate room for the SIM data */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1500 if (pba_data.data EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1501 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1502 ACI_MALLOC (pba_data.data, SIM_MAX_RECORD_SIZE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1503 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1504 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1505 simShrdPrm.atb[table_id].ntryUsdFlg = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1506 simShrdPrm.atb[table_id].accType = ACT_RD_DAT; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1507 simShrdPrm.atb[table_id].reqDataFld = data_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1508 simShrdPrm.atb[table_id].dataOff = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1509 simShrdPrm.atb[table_id].dataLen = len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1510 simShrdPrm.atb[table_id].recMax = max_length; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1511 simShrdPrm.atb[table_id].exchData = NULL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1512 simShrdPrm.atb[table_id].rplyCB = pb_read_sim_cb; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1513 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1514 simShrdPrm.aId = table_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1515 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1516 if (psaSIM_AccessSIMData() < 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1517 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1518 TRACE_EVENT("FATAL ERROR"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1519 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1520 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1521 return TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1522 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1523 return FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1524 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1525 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1526 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1527 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1528 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1529 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1530 | STATE : code ROUTINE : pb_read_next_sim_book | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1531 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1532 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1533 PURPOSE : This function starts reading the phonebooks based on the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1534 information whether the phonebook is activated and allocated | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1535 and still has to be read at all. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1536 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1537 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1538 LOCAL void pb_read_next_sim_book (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1539 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1540 TRACE_FUNCTION("pb_read_next_sim_book()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1541 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1542 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1543 * The next three phonebooks ADN, MSISDN and LND share EXT1 records | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1544 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1545 if ((pba_data.fdn_mode NEQ FDN_ENABLE) AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1546 pb_sim_service (SRV_ADN) AND !pba_data.book_read[ADN]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1547 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1548 /* Read ADN from SIM card */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1549 pba_data.current_book = ADN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1550 pba_data.book_read[ADN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1551 pb_read_sim_record (SIM_ADN, 1, NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1552 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1553 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1554 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1555 if (pb_sim_service (SRV_MSISDN) AND !pba_data.book_read[UPN]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1556 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1557 /* Read MSISDN from SIM card */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1558 pba_data.current_book = UPN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1559 pba_data.book_read[UPN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1560 pb_read_sim_record (SIM_MSISDN, 1, NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1561 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1562 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1563 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1564 #ifdef SIM_LND_SUPPORT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1565 if (pb_sim_service (SRV_LDN) AND !pba_data.book_read[LDN]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1566 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1567 /* Read LND from SIM card */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1568 pba_data.current_book = LDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1569 pba_data.book_read[LDN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1570 pb_read_sim_record (SIM_LND, 1, NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1571 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1572 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1573 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1574 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1575 #ifdef SIM_LND_SUPPORT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1576 if (!pb_sim_service (SRV_LDN) AND !pba_data.book_read[LDN]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1577 #else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1578 if (!pba_data.book_read[LDN]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1579 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1580 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1581 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1582 * SIM card without LDN service. Create SIM_ICI and SIM_OCI here. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1583 * Don't create obsolete SIM_LND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1584 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1585 pba_data.book_read[LDN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1586 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1587 /* Create now also some helper elementary files as of R99+ */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1588 //(void)pb_sim_create_ef (SIM_ICI, SIZE_EF_ICI, NR_EF_ICI); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1589 (void)pb_sim_create_ef (FFS_LRN, SIZE_EF_LRN, NR_EF_LRN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1590 (void)pb_sim_create_ef (FFS_EXT_LRN, SIZE_EF_EXT_LRN, NR_EF_EXT_LRN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1591 (void)pb_sim_create_ef (FFS_LMN, SIZE_EF_LMN, NR_EF_LMN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1592 (void)pb_sim_create_ef (FFS_EXT_LMN, SIZE_EF_EXT_LMN, NR_EF_EXT_LMN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1593 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1594 (void)pb_sim_create_ef (SIM_OCI, SIZE_EF_OCI, NR_EF_OCI); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1595 (void)pb_sim_create_ef (SIM_EXT5, SIZE_EF_EXT5, NR_EF_EXT5); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1596 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1597 pba_data.phb_record_max[LDN] = NR_EF_OCI; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1598 pba_data.phb_record_len[LDN] = SIZE_EF_OCI; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1599 pba_data.book_created[LDN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1600 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1601 //pba_data.phb_record_max[LRN] = NR_EF_ICI; /* Shared! */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1602 //pba_data.phb_record_len[LRN] = SIZE_EF_ICI; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1603 pba_data.phb_record_max[LRN] = NR_EF_LRN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1604 pba_data.phb_record_len[LRN] = SIZE_EF_LRN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1605 pba_data.book_created[LRN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1606 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1607 //pba_data.phb_record_max[LMN] = NR_EF_ICI; /* Shared! */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1608 //pba_data.phb_record_len[LMN] = SIZE_EF_ICI; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1609 pba_data.phb_record_max[LMN] = NR_EF_LMN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1610 pba_data.phb_record_len[LMN] = SIZE_EF_LMN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1611 pba_data.book_created[LMN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1612 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1613 pba_data.ext_record_max[EXT5] = NR_EF_EXT5; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1614 pba_data.ext_record_max[EXT_LRN] = NR_EF_EXT_LRN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1615 pba_data.ext_record_max[EXT_LMN] = NR_EF_EXT_LMN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1616 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1617 pba_data.ext_record_max[EXT5] = SIZE_EF_EXT5; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1618 pba_data.ext_record_max[EXT_LRN] = SIZE_EF_EXT_LRN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1619 pba_data.ext_record_max[EXT_LMN] = SIZE_EF_EXT_LMN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1620 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1621 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1622 #ifdef SIM_LND_SUPPORT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1623 if (pba_data.book_read[ADN] OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1624 pba_data.book_read[UPN] OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1625 pba_data.book_read[LDN]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1626 #else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1627 if (pba_data.book_read[ADN] OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1628 pba_data.book_read[UPN]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1629 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1630 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1631 /* At least one of the books referencing EXT1 has been read */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1632 if (!pba_data.ext_created[EXT1] AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1633 pb_sim_service (SRV_EXT1)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1634 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1635 /* Reading to get the number of records only */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1636 pba_data.ext_dummy_read = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1637 pb_read_sim_record (SIM_EXT1, 1, NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1638 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1639 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1640 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1641 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1642 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1643 * FDN phonebook only to be read if ADN is blocked | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1644 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1645 if ((pba_data.fdn_mode EQ FDN_ENABLE) AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1646 pb_sim_service (SRV_FDN) AND !pba_data.book_read[FDN]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1647 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1648 /* Read FDN from SIM card */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1649 pba_data.current_book = FDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1650 pba_data.book_read[FDN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1651 pb_read_sim_record (SIM_FDN, 1, NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1652 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1653 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1654 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1655 if (pba_data.book_read[FDN] AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1656 !pba_data.ext_created[EXT2] AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1657 pb_sim_service (SRV_EXT2)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1658 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1659 /* Reading to get the number of records only */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1660 pba_data.ext_dummy_read = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1661 pb_read_sim_record (SIM_EXT2, 1, NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1662 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1663 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1664 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1665 if (pb_sim_service (SRV_BDN) AND !pba_data.book_read[BDN]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1666 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1667 /* Read BDN from SIM card */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1668 pba_data.current_book = BDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1669 pba_data.book_read[BDN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1670 pb_read_sim_record (SIM_BDN, 1, NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1671 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1672 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1673 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1674 if (pba_data.book_read[BDN] AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1675 !pba_data.ext_created[EXT4] AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1676 pb_sim_service (SRV_EXT4)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1677 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1678 /* Reading to get the number of records only */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1679 pba_data.ext_dummy_read = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1680 pb_read_sim_record (SIM_EXT4, 1, NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1681 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1682 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1683 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1684 if (pb_sim_service (SRV_SDN) AND !pba_data.book_read[SDN]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1685 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1686 /* Read SDN from SIM card */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1687 pba_data.current_book = SDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1688 pba_data.book_read[SDN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1689 pb_read_sim_record (SIM_SDN, 1, NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1690 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1691 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1692 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1693 if (pba_data.book_read[SDN] AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1694 !pba_data.ext_created[EXT3] AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1695 pb_sim_service (SRV_EXT3)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1696 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1697 /* Reading to get the number of records only */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1698 pba_data.ext_dummy_read = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1699 pb_read_sim_record (SIM_EXT3, 1, NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1700 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1701 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1702 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1703 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1704 * For the phonebook entries which reside on SIM but don't have | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1705 * timestamps some checks could be done here. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1706 * For example, we could read based on EF_LDN, subsequently we | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1707 * could read the informations solely stored in the flash and | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1708 * then we could decide whether we through away the last dialled | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1709 * numbers or don't. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1710 * Probably this is overkill, old Nokia 5110 and more recent Nokia 6330i | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1711 * simply does not support EF_LND at all but stores the last dialled | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1712 * numbers in the flash. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1713 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1714 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1715 #ifdef SIM_TOOLKIT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1716 if (simShrdPrm.fuRef >= 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1717 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1718 psaSAT_FUConfirm (simShrdPrm.fuRef, SIM_FU_SUCC_ADD); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1719 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1720 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1721 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1722 /* Free SIM exchange data */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1723 if (pba_data.data NEQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1724 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1725 ACI_MFREE (pba_data.data); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1726 pba_data.data = NULL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1727 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1728 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1729 SET_PHB_STATE (PHB_STATE_IDLE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1730 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1731 if (pb_read_queue() EQ PHB_EXCT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1732 return; /* Queued LDN entry is written */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1733 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1734 /* Finished reading phonebooks. Flush data. */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1735 (void)pb_sim_flush_data (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1736 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1737 /* Inform ACI that we're ready */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1738 pb_status_ind (PHB_READY, CME_ERR_NotPresent); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1739 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1740 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1741 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1742 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1743 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1744 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1745 | STATE : code ROUTINE : pb_read_sim_record_cb | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1746 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1747 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1748 PURPOSE : This function is the callback when a SIM record has been read | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1749 (SIM_READ_RECORD_CNF). | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1750 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1751 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1752 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1753 LOCAL void pb_read_sim_record_cb (SHORT table_id) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1754 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1755 T_PHB_RETURN phb_result; /* Phonebook result code */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1756 T_PHB_TYPE phb_type; /* Phonebook type */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1757 T_EXT_TYPE ext_type; /* Extension record type */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1758 T_PHB_TYPE next_phb_type; /* Phonebook type of record to read */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1759 T_EXT_TYPE next_ext_type; /* Extension record type of record to read */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1760 USHORT reqDataFld; /* requested datafield identifier */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1761 UBYTE recNr; /* record number */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1762 UBYTE dataLen; /* Length of data */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1763 UBYTE recMax; /* Maximum number of records */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1764 USHORT errCode; /* Error code from the SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1765 USHORT ext_record_ef; /* Extension record elementary file id */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1766 UBYTE ext_record_no; /* Extension record number */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1767 BOOL changed; /* Record changed by pb_sim_write_ef() */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1768 BOOL write_record; /* Write the record */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1769 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1770 TRACE_FUNCTION ("pb_read_sim_record_cb()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1771 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1772 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1773 * Currently we have a limitation of 254 records in the code. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1774 * This is because there is a note in 11.11 version 8.3.0 clause 6.4.2 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1775 * that there is a limit of 254 records for linear fixed. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1776 * Same for USIM looking into 31.102 Annex G. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1777 * However this constraint is not valid for cyclic, and also this | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1778 * note has not been present in 11.11 version 7.4.0 clause 6.2.4, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1779 * there is a limit of 255 records mentioned. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1780 * Not supporting the 255th record is a minor issue for now. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1781 * To avoid crashing, we have to limit here for now to 254. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1782 * This is not a theoretical issue only as there exists SIMs | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1783 * which have 255 ADN entries. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1784 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1785 if (simShrdPrm.atb[table_id].recMax EQ 255) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1786 simShrdPrm.atb[table_id].recMax = 254; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1787 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1788 /* Get the important information from the read record from T_SIM_ACC_PRM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1789 reqDataFld = simShrdPrm.atb[table_id].reqDataFld; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1790 recNr = simShrdPrm.atb[table_id].recNr; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1791 dataLen = simShrdPrm.atb[table_id].dataLen; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1792 recMax = simShrdPrm.atb[table_id].recMax; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1793 errCode = simShrdPrm.atb[table_id].errCode; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1794 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1795 phb_type = pb_get_phb_type_from_ef (reqDataFld); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1796 ext_type = pb_get_ext_type_from_ef (reqDataFld); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1797 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1798 if (phb_type EQ INVALID_PHB AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1799 ext_type EQ INVALID_EXT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1800 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1801 TRACE_ERROR ("Invalid reqDataFld!"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1802 simShrdPrm.atb[table_id].ntryUsdFlg = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1803 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1804 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1805 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1806 /* We assume we write the record until we have certain errors */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1807 write_record = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1808 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1809 if (errCode NEQ SIM_NO_ERROR) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1810 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1811 TRACE_EVENT_P1 ("SIM indicated problem code %04x", errCode); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1812 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1813 * At least use cleanly deleted data instead of trash. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1814 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1815 memset (pba_data.data, 0xff, SIM_MAX_RECORD_SIZE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1816 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1817 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1818 if (ext_type NEQ INVALID_EXT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1819 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1820 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1821 * Got an extension record. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1822 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1823 if (!pba_data.ext_created[ext_type]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1824 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1825 if (errCode NEQ SIM_NO_ERROR) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1826 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1827 /* We won't create a field on invalid data and won't write */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1828 write_record = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1829 pba_data.ext_dummy_read = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1830 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1831 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1832 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1833 pba_data.ext_record_max[ext_type] = recMax; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1834 pba_data.ext_record_len[ext_type] = dataLen; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1835 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1836 /* Shadow field for extension record not yet created */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1837 (void)pb_sim_create_ef (reqDataFld, dataLen, recMax); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1838 pba_data.ext_created[ext_type] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1839 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1840 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1841 if (pba_data.ext_dummy_read) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1842 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1843 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1844 * We are reading the first extension record which is assumed | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1845 * to be not used just to get the number of respective extension | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1846 * records. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1847 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1848 write_record = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1849 pba_data.ext_dummy_read = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1850 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1851 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1852 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1853 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1854 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1855 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1856 * Got a normal phonebook record | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1857 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1858 if (!pba_data.book_created[phb_type]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1859 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1860 if (errCode NEQ SIM_NO_ERROR) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1861 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1862 /* We won't create a field on invalid data */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1863 write_record = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1864 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1865 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1866 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1867 pba_data.phb_record_max[phb_type] = recMax; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1868 pba_data.phb_record_len[phb_type] = dataLen; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1869 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1870 /* Shadow field for normal phonebook record not yet created */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1871 (void)pb_sim_create_ef (reqDataFld, dataLen, recMax); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1872 pba_data.book_created[phb_type] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1873 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1874 #ifdef SIM_LND_SUPPORT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1875 if (phb_type EQ LDN) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1876 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1877 /* Create now also some helper elementary files as of R99+ */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1878 (void)pb_sim_create_ef (SIM_OCI, (USHORT)(dataLen + 14), recMax); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1879 pba_data.phb_record_max[LDN] = recMax; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1880 pba_data.phb_record_len[LDN] = dataLen; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1881 pba_data.book_created[LDN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1882 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1883 (void)pb_sim_create_ef (SIM_ICI, (USHORT)(dataLen + 14), recMax); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1884 pba_data.phb_record_max[LRN] = recMax; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1885 pba_data.phb_record_len[LRN] = dataLen; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1886 pba_data.book_created[LRN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1887 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1888 pba_data.phb_record_max[LMN] = recMax; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1889 pba_data.phb_record_len[LMN] = dataLen; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1890 pba_data.book_created[LMN] = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1891 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1892 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1893 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1894 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1895 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1896 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1897 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1898 * Write raw record. The SIM layer is aware about the data structures | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1899 * and gives us the information whether we have to read an/another | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1900 * extension record now or whether we can continue reading normal | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1901 * phonebook entries. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1902 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1903 if (write_record) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1904 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1905 phb_result = pb_sim_write_ef(reqDataFld, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1906 recNr, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1907 dataLen, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1908 pba_data.data, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1909 &changed, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1910 &ext_record_ef, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1911 &ext_record_no); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1912 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1913 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1914 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1915 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1916 * New field, record was trash, don't write it, continue reading | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1917 * phonebook entries. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1918 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1919 TRACE_EVENT ("Record not written (trash/dummy ext)"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1920 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1921 phb_result = PHB_OK; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1922 changed = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1923 ext_record_ef = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1924 ext_record_no = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1925 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1926 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1927 /* Mark SIM table as free now */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1928 simShrdPrm.atb[table_id].ntryUsdFlg = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1929 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1930 if ((GET_PHB_STATE() EQ PHB_STATE_VERIFY) AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1931 (phb_result EQ PHB_OK) AND changed) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1932 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1933 /* We have a change detected. Prevent further reading until all read */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1934 SET_PHB_STATE (PHB_STATE_READ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1935 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1936 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1937 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1938 * Here an optimization is possible. This is, if an extension record | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1939 * and already has been read we could skip reading the extension record | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1940 * here. The optimization is not worth the effort, so we simply don't do | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1941 * it. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1942 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1943 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1944 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1945 * Do some protection against garbage | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1946 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1947 if (ext_record_ef NEQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1948 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1949 /* Current record references an extension record */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1950 next_ext_type = pb_get_ext_type_from_ef (ext_record_ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1951 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1952 if ((next_ext_type EQ INVALID_EXT) OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1953 (ext_record_no < 1) OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1954 (ext_record_no > 245)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1955 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1956 TRACE_ERROR ("pb_sim_write_ef() for ext delivered garbage EXT record"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1957 ext_record_ef = 0; /* Try to proceed without this garbage */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1958 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1959 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1960 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1961 if (ext_record_ef NEQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1962 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1963 /* Current record references an extension record */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1964 next_ext_type = pb_get_ext_type_from_ef (ext_record_ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1965 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1966 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1967 * We have to read an extension record. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1968 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1969 if (ext_type NEQ INVALID_EXT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1970 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1971 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1972 * It's the first extension record. Remember the paused phonebook. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1973 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1974 TRACE_EVENT_P4 ("PHB EF %04x record %d references EXT EF %04x record %d", | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1975 reqDataFld, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1976 recNr, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1977 ext_record_ef, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1978 ext_record_ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1979 pba_data.paused_ef = reqDataFld; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1980 pba_data.paused_no = recNr; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1981 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1982 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1983 /* Read the extension record. */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1984 if (pba_data.ext_created[next_ext_type]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1985 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1986 (void)pb_read_sim_record (ext_record_ef, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1987 ext_record_no, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1988 pba_data.ext_record_len[next_ext_type]); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1989 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1990 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1991 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1992 (void)pb_read_sim_record (ext_record_ef, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1993 ext_record_no, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1994 NOT_PRESENT_8BIT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1995 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1996 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1997 else if (ext_type NEQ INVALID_EXT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1998 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1999 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2000 * The record read was the last extension record in the chain. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2001 * Come back reading normal phonebook entries. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2002 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2003 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2004 next_phb_type = pb_get_phb_type_from_ef (pba_data.paused_ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2005 //////(void)pb_sim_build_index (next_phb_type); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2006 if (pba_data.paused_no < pba_data.phb_record_max[next_phb_type]) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2007 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2008 /* Continue reading the current phonebook */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2009 (void)pb_read_sim_record (pba_data.paused_ef, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2010 (UBYTE)(pba_data.paused_no + 1), | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2011 pba_data.phb_record_len[next_phb_type]); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2012 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2013 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2014 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2015 ////// Update index - for now here | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2016 (void)pb_sim_build_index (phb_type); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2017 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2018 /* Next book */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2019 pb_read_next_sim_book (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2020 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2021 pba_data.paused_ef = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2022 pba_data.paused_no = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2023 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2024 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2025 else if (simShrdPrm.atb[table_id].recNr < simShrdPrm.atb[table_id].recMax) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2026 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2027 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2028 * Normal phonebook record read, no extension referenced and not | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2029 * finished. Continue reading the current phonebook | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2030 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2031 //////(void)pb_sim_build_index (phb_type); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2032 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2033 (void)pb_read_sim_record (simShrdPrm.atb[table_id].reqDataFld, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2034 (UBYTE)(simShrdPrm.atb[table_id].recNr + 1), | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2035 simShrdPrm.atb[table_id].dataLen); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2036 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2037 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2038 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2039 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2040 * Normal phonebook record read, no extension referenced and finished | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2041 * reading this book. Continue reading the next book. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2042 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2043 (void)pb_sim_build_index (phb_type); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2044 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2045 /* Next book */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2046 pb_read_next_sim_book (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2047 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2048 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2049 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2050 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2051 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2052 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2053 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2054 | STATE : code ROUTINE : pb_sat_update_reset | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2055 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2056 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2057 PURPOSE : This function marks the given elementary file as unread. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2058 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2059 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2060 LOCAL void pb_sat_update_reset (USHORT ef) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2061 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2062 T_PHB_TYPE phb_type; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2063 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2064 TRACE_FUNCTION ("pb_sat_update_reset()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2065 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2066 phb_type = pb_get_phb_type_from_ef (ef); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2067 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2068 if (phb_type NEQ INVALID_PHB) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2069 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2070 /* Mark book as unread */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2071 pba_data.book_read[phb_type] = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2072 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2073 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2074 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2075 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2076 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2077 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2078 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2079 | STATE : code ROUTINE : pb_read_sim_cb | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2080 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2081 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2082 PURPOSE : This function is the callback when a SIM elementary file has | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2083 been read (SIM_READ_CNF). | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2084 There are two fields which can have been read here, those are | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2085 the emergency call numbers and the SIM service table. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2086 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2087 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2088 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2089 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2090 LOCAL void pb_read_sim_cb (SHORT table_id) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2091 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2092 TRACE_FUNCTION ("pb_read_sim_cb()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2093 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2094 switch (simShrdPrm.atb[table_id].reqDataFld) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2095 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2096 case SIM_ECC: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2097 if (simShrdPrm.atb[table_id].errCode EQ SIM_NO_ERROR) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2098 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2099 (void)pb_sim_set_ecc (simShrdPrm.atb[table_id].dataLen, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2100 simShrdPrm.atb[table_id].exchData); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2101 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2102 #ifdef SIM_TOOLKIT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2103 if (simShrdPrm.fuRef >= 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2104 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2105 psaSAT_FUConfirm (simShrdPrm.fuRef, SIM_FU_SUCCESS); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2106 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2107 #endif /* #ifdef SIM_TOOLKIT */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2108 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2109 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2110 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2111 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2112 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2113 * Some error from the SIM. Indicate a fallback to the PCM/FFS. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2114 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2115 (void)pb_sim_set_ecc (0, NULL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2116 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2117 #ifdef SIM_TOOLKIT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2118 if (simShrdPrm.fuRef >= 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2119 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2120 psaSAT_FUConfirm (simShrdPrm.fuRef, SIM_FU_ERROR); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2121 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2122 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2123 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2124 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2125 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2126 if (pba_data.data NEQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2127 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2128 ACI_MFREE (pba_data.data); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2129 pba_data.data = NULL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2130 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2131 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2132 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2133 case SIM_SST: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2134 if (simShrdPrm.atb[table_id].errCode EQ SIM_NO_ERROR) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2135 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2136 /* copy SIM service table */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2137 memset(pba_data.sim_service_table, 0, MAX_SRV_TBL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2138 memcpy(pba_data.sim_service_table, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2139 simShrdPrm.atb[table_id].exchData, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2140 MINIMUM(MAX_SRV_TBL, simShrdPrm.atb[table_id].dataLen)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2141 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2142 /* start reading SIM phonebook */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2143 simShrdPrm.atb[table_id].ntryUsdFlg = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2144 pb_start_build (FALSE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2145 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2146 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2147 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2148 TRACE_ERROR ("Cannot read SIM service table, using old table"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2149 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2150 #ifdef SIM_TOOLKIT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2151 if (simShrdPrm.fuRef >= 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2152 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2153 psaSAT_FUConfirm (simShrdPrm.fuRef, SIM_FU_ERROR); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2154 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2155 #endif | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2156 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2157 /* start reading SIM phonebook (fallback action, best effort) */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2158 simShrdPrm.atb[table_id].ntryUsdFlg = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2159 pb_start_build (FALSE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2160 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2161 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2162 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2163 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2164 TRACE_ERROR ("Unexpected SIM_READ_CNF"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2165 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2166 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2167 simShrdPrm.atb[table_id].ntryUsdFlg = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2168 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2169 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2170 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2171 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2172 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2173 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2174 | STATE : code ROUTINE : pb_is_sim_field | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2175 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2176 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2177 PURPOSE : This function determines wheter an elementary file has to | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2178 be synchronized to the SIM or only exists locally in the FFS. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2179 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2180 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2181 LOCAL BOOL pb_is_sim_field (USHORT ef) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2182 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2183 TRACE_FUNCTION ("pb_is_sim_field()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2184 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2185 switch (ef) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2186 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2187 //case SIM_ICI: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2188 case FFS_LRN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2189 case FFS_LMN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2190 case FFS_EXT_LRN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2191 case FFS_EXT_LMN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2192 case SIM_OCI: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2193 case SIM_EXT5: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2194 return FALSE; /* Only in FFS */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2195 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2196 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2197 return TRUE; /* Counterpart in SIM exists */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2198 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2199 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2200 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2201 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2202 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2203 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2204 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2205 | STATE : code ROUTINE : pb_sync_next_sim_record | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2206 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2207 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2208 PURPOSE : This function synchronizes a changed record to the SIM. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2209 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2210 The first parameter is given to determine whether it's the first | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2211 record to be synchronized, in this case ACI has to be informed. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2212 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2213 If there was no record to synchronize, PHB_OK is returned. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2214 If there is a record to synchronize, PHB_EXCT is returned. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2215 If there was an internal failure we get PHB_FAIL | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2216 (which is unexpected). | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2217 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2218 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2219 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2220 LOCAL T_PHB_RETURN pb_sync_next_sim_record (BOOL first) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2221 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2222 T_PHB_RETURN phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2223 USHORT field_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2224 USHORT record; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2225 USHORT entry_size; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2226 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2227 TRACE_FUNCTION ("pb_sync_next_sim_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2228 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2229 do | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2230 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2231 if (pba_data.records_changed.entries EQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2232 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2233 SET_PHB_STATE (PHB_STATE_IDLE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2234 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2235 if (pb_read_queue() EQ PHB_EXCT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2236 return PHB_EXCT; /* Queued LDN entry is written */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2237 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2238 /* Inform SIM layer we're done synchronizing */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2239 (void)pb_sim_flush_data (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2240 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2241 /* Inform ACI that we're ready */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2242 pb_status_ind (PHB_READY, CME_ERR_NotPresent); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2243 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2244 return PHB_OK; /* No record to synchronize to the SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2245 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2246 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2247 /* Get the next record from the list */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2248 pba_data.records_changed.entries--; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2249 field_id = pba_data.records_changed.field_id[0]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2250 record = pba_data.records_changed.record[0]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2251 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2252 /* Remove the record from the list */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2253 memmove (&pba_data.records_changed.field_id[0], | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2254 &pba_data.records_changed.field_id[1], | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2255 sizeof (USHORT) * (DB_MAX_AFFECTED - 1)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2256 memmove (&pba_data.records_changed.record[0], | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2257 &pba_data.records_changed.record[1], | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2258 sizeof (USHORT) * (DB_MAX_AFFECTED - 1)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2259 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2260 while (!pb_is_sim_field(field_id)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2261 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2262 TRACE_EVENT_P3 ("Synch ef %04X record %d, still %d entries to do", | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2263 field_id, record, pba_data.records_changed.entries); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2264 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2265 /* Allocate room for the SIM data */ // #HM# Check for free | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2266 if (pba_data.data EQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2267 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2268 ACI_MALLOC (pba_data.data, SIM_MAX_RECORD_SIZE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2269 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2270 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2271 /* Fetch record in raw form from the database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2272 phb_result = pb_sim_read_ef (field_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2273 record, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2274 &entry_size, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2275 pba_data.data); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2276 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2277 if (phb_result EQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2278 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2279 /* And write it to the SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2280 phb_result = pb_write_sim_record (field_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2281 (UBYTE)record, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2282 (UBYTE)entry_size, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2283 pba_data.data); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2284 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2285 if (phb_result NEQ PHB_EXCT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2286 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2287 /* Inform ACI that we've had a problem */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2288 pb_status_ind ( PHB_WRITE_FAIL, CME_ERR_NotPresent ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2289 return phb_result; /* Some unexpected internal failure */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2290 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2291 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2292 if (first) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2293 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2294 /* Inform ACI that we're busy synchronizing SIM entries */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2295 pb_status_ind ( PHB_BUSY, CME_ERR_NotPresent ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2296 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2297 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2298 return PHB_EXCT; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2299 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2300 return phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2301 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2302 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2303 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2304 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2305 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2306 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2307 | STATE : code ROUTINE : pb_write_sim_record | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2308 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2309 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2310 PURPOSE : This function writes a SIM record to the SIM. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2311 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2312 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2313 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2314 LOCAL T_PHB_RETURN pb_write_sim_record (USHORT ef, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2315 UBYTE phy_recno, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2316 UBYTE entry_size, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2317 const UBYTE *buffer) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2318 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2319 SHORT table_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2320 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2321 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2322 TRACE_FUNCTION("pb_write_sim_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2323 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2324 table_id = psaSIM_atbNewEntry(); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2325 if (table_id EQ NO_ENTRY) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2326 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2327 TRACE_ERROR ("pb_write_sim_record(): no more table entries"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2328 return (PHB_FAIL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2329 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2330 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2331 simShrdPrm.atb[table_id].ntryUsdFlg = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2332 simShrdPrm.atb[table_id].accType = ACT_WR_REC; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2333 simShrdPrm.atb[table_id].reqDataFld = ef; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2334 simShrdPrm.atb[table_id].recNr = phy_recno; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2335 simShrdPrm.atb[table_id].dataLen = entry_size; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2336 simShrdPrm.atb[table_id].exchData = (UBYTE *)buffer; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2337 simShrdPrm.atb[table_id].rplyCB = pb_write_sim_record_cb; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2338 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2339 simShrdPrm.aId = table_id; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2340 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2341 if (psaSIM_AccessSIMData() < 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2342 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2343 TRACE_EVENT("pb_write_sim_record(): psaSIM_AccessSIMData() failed"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2344 return (PHB_FAIL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2345 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2346 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2347 return (PHB_EXCT); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2348 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2349 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2350 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2351 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2352 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2353 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2354 | STATE : code ROUTINE : pb_write_sim_record_cb | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2355 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2356 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2357 PURPOSE : This function is the callback when a SIM record has been | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2358 written to the SIM. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2359 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2360 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2361 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2362 LOCAL void pb_write_sim_record_cb (SHORT table_id) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2363 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2364 UBYTE max_record; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2365 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2366 TRACE_FUNCTION("pb_write_sim_record_cb()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2367 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2368 simShrdPrm.atb[table_id].ntryUsdFlg = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2369 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2370 if (simShrdPrm.atb[table_id].errCode NEQ SIM_NO_ERROR) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2371 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2372 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2373 * Data in the database and on the SIM probably now differ, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2374 * we can do not much about this. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2375 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2376 TRACE_ERROR("pb_write_cb(): error for writing"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2377 pb_status_ind (PHB_WRITE_FAIL, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2378 (SHORT)cmhSIM_GetCmeFromSim (simShrdPrm.atb[table_id].errCode)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2379 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2380 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2381 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2382 switch (GET_PHB_STATE()) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2383 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2384 case PHB_STATE_WRITE: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2385 /* Synchronize next SIM record */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2386 switch (pb_sync_next_sim_record (FALSE)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2387 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2388 case PHB_OK: /* All done */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2389 /* Inform the ACI that we're done */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2390 pb_status_ind (PHB_READY, CME_ERR_NotPresent); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2391 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2392 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2393 case PHB_EXCT: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2394 break; /* Next record => SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2395 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2396 case PHB_FAIL: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2397 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2398 TRACE_ERROR ("Unexpected phb_result"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2399 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2400 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2401 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2402 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2403 case PHB_STATE_DELETE_BOOK: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2404 /* Synchronize next SIM record */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2405 switch (pb_sync_next_sim_record (FALSE)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2406 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2407 case PHB_OK: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2408 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2409 * Record synched. Delete next record of phonebook, if available | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2410 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2411 max_record = pba_data.phb_record_max[pba_data.current_book]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2412 while ((pba_data.del_record <= max_record) AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2413 (pba_data.records_changed.entries EQ 0)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2414 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2415 /* Delete the record in the database */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2416 if (pb_sim_del_record (pba_data.current_book, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2417 pba_data.del_record, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2418 &pba_data.records_changed) NEQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2419 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2420 TRACE_ERROR ("Unexpected problem from pb_sim_del_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2421 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2422 /* Inform SIM layer we're done synchronizing. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2423 * Should we indicate also there was a problem? */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2424 (void)pb_sim_flush_data (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2425 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2426 pb_status_ind (PHB_WRITE_FAIL, CME_ERR_NotPresent); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2427 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2428 SET_PHB_STATE (PHB_STATE_IDLE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2429 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2430 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2431 pba_data.del_record++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2432 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2433 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2434 if (pba_data.records_changed.entries NEQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2435 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2436 /* Synchronizing record(s) to the SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2437 if (pb_sync_next_sim_record (FALSE) NEQ PHB_EXCT) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2438 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2439 TRACE_ERROR ("Unexpected problem from pb_sync_next_sim_record()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2440 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2441 /* Inform SIM layer we're done synchronizing. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2442 * Should we indicate also there was a problem? */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2443 (void)pb_sim_flush_data (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2444 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2445 pb_status_ind (PHB_WRITE_FAIL, CME_ERR_NotPresent); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2446 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2447 SET_PHB_STATE (PHB_STATE_IDLE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2448 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2449 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2450 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2451 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2452 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2453 * We're through | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2454 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2455 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2456 (void)pb_sim_flush_data (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2457 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2458 /* Inform the ACI that we're done */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2459 pb_status_ind (PHB_READY, CME_ERR_NotPresent); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2460 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2461 SET_PHB_STATE (PHB_STATE_IDLE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2462 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2463 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2464 case PHB_EXCT: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2465 break; /* Next record => SIM */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2466 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2467 case PHB_FAIL: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2468 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2469 TRACE_ERROR ("Unexpected problem synching SIM"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2470 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2471 (void)pb_sim_flush_data (); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2472 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2473 pb_status_ind (PHB_WRITE_FAIL, CME_ERR_NotPresent); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2474 /* Inform SIM layer we're done synchronizing. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2475 * Should we indicate also there was a problem? */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2476 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2477 SET_PHB_STATE (PHB_STATE_IDLE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2478 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2479 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2480 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2481 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2482 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2483 TRACE_ERROR ("Unexpected default"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2484 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2485 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2486 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2487 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2488 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2489 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2490 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2491 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2492 | STATE : code ROUTINE : pb_get_phb_type_from_ef | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2493 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2494 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2495 PURPOSE : This function converts a SIM elementary file number to the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2496 appropriate constant of type T_PHB_TYPE, if applicable. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2497 Non applicable => INVALID_PHB | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2498 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2499 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2500 T_PHB_TYPE pb_get_phb_type_from_ef (USHORT ef) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2501 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2502 TRACE_FUNCTION ("pb_get_phb_type_from_ef()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2503 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2504 switch (ef) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2505 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2506 case SIM_ECC: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2507 return ECC; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2508 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2509 case SIM_ADN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2510 return ADN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2511 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2512 case SIM_FDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2513 return FDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2514 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2515 case SIM_BDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2516 return BDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2517 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2518 case SIM_LND: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2519 return LDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2520 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2521 case SIM_MSISDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2522 return UPN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2523 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2524 case SIM_SDN: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2525 return SDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2526 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2527 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2528 return INVALID_PHB; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2529 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2530 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2531 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2532 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2533 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2534 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2535 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2536 | STATE : code ROUTINE : pb_get_ext_type_from_ef | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2537 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2538 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2539 PURPOSE : This function converts a SIM elementary file number to the | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2540 appropriate constant of T_PHB_EXT_TYPE, if applicable. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2541 Non applicable => INVALID_EXT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2542 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2543 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2544 T_EXT_TYPE pb_get_ext_type_from_ef (USHORT ef) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2545 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2546 TRACE_FUNCTION ("pb_get_ext_type_from_ef()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2547 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2548 switch (ef) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2549 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2550 case SIM_EXT1: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2551 return EXT1; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2552 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2553 case SIM_EXT2: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2554 return EXT2; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2555 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2556 case SIM_EXT3: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2557 return EXT3; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2558 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2559 case SIM_EXT4: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2560 return EXT4; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2561 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2562 case SIM_EXT5: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2563 return EXT5; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2564 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2565 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2566 return INVALID_EXT; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2567 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2568 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2569 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2570 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2571 /* ------------------------------------------------------------------------ */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2572 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2573 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2574 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2575 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2576 | STATE : code ROUTINE : pb_search_number_ex | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2577 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2578 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2579 PURPOSE : At some places a more sohisticated number searching function | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2580 is desirable which can be based on existing phonebook | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2581 functionality. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2582 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2583 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2584 GLOBAL T_PHB_RETURN pb_search_number_ex (T_PHB_TYPE type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2585 const UBYTE *number, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2586 SHORT *order_num, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2587 SHORT *found, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2588 T_PHB_RECORD *entry) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2589 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2590 T_PHB_RETURN phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2591 SHORT index; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2592 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2593 TRACE_FUNCTION ("pb_search_number_ex()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2594 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2595 /* Search for first entry */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2596 phb_result = pb_search_number (type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2597 number, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2598 order_num); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2599 if (phb_result NEQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2600 return phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2601 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2602 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2603 * Determine number of found entries. We are doing a linear algorithm, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2604 * a binary algorithm is possible here to speed up things. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2605 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2606 if (found NEQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2607 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2608 *found = 1; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2609 index = *order_num; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2610 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2611 while (pb_search_number (type, number, &index) EQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2612 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2613 ++(*found); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2614 /* index should not be incremented as lower layer (DB) will take | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2615 care of it */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2616 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2617 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2618 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2619 /* Read the first found entry, if desired */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2620 if (entry NEQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2621 return (pb_read_number_record (type, *order_num, entry)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2622 return PHB_OK; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2623 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2624 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2625 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2626 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2627 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2628 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2629 | STATE : code ROUTINE : pb_search_name_ex | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2630 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2631 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2632 PURPOSE : At some places a more sohisticated name searching function | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2633 is desirable which can be based on existing phonebook | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2634 functionality. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2635 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2636 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2637 GLOBAL T_PHB_RETURN pb_search_name_ex (T_PHB_TYPE type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2638 T_PHB_MATCH match, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2639 const T_ACI_PB_TEXT *search_tag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2640 SHORT *order_num, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2641 SHORT *found, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2642 T_PHB_RECORD *entry) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2643 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2644 T_PHB_RETURN phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2645 SHORT index; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2646 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2647 TRACE_FUNCTION ("pb_search_name_ex()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2648 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2649 /* Search for first entry */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2650 phb_result = pb_search_name (type, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2651 match, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2652 search_tag, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2653 order_num); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2654 if (phb_result NEQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2655 return phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2656 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2657 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2658 * Determine number of found entries. We are doing a linear algorithm, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2659 * a binary algorithm is possible here to speed up things. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2660 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2661 if (found NEQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2662 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2663 *found = 1; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2664 index = *order_num; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2665 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2666 while (pb_search_name (type, match, search_tag, &index) EQ PHB_OK) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2667 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2668 ++(*found); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2669 /* index should not be incremented as lower layer (DB) will take | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2670 care of it */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2671 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2672 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2673 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2674 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2675 /* Read the first found entry, if desired */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2676 if (entry NEQ NULL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2677 return (pb_read_alpha_record (type, *order_num, entry)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2678 return PHB_OK; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2679 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2680 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2681 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2682 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2683 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2684 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2685 | STATE : code ROUTINE : pb_status_ind | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2686 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2687 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2688 PURPOSE : This function indicates the new phonebook status to the ACI | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2689 preventing we're indication twice PHB_READY or PHB_BUSY. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2690 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2691 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2692 LOCAL void pb_status_ind (T_PHB_STAT phb_stat, SHORT cmeError) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2693 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2694 TRACE_FUNCTION ("pb_status_ind()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2695 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2696 /* Avoid to indicate twice busy or ready */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2697 if ((pba_data.phb_stat NEQ phb_stat) OR | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2698 ((phb_stat NEQ PHB_READY) AND | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2699 (phb_stat NEQ PHB_BUSY))) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2700 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2701 cmhPHB_StatIndication ((UBYTE)phb_stat, cmeError,TRUE); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2702 pba_data.phb_stat = phb_stat; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2703 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2704 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2705 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2706 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2707 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2708 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2709 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2710 | STATE : code ROUTINE : pb_write_queue | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2711 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2712 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2713 PURPOSE : This function writes a LDN entry to the queue if the SIM is busy. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2714 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2715 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2716 LOCAL T_PHB_RETURN pb_write_queue (const T_PHB_RECORD *entry) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2717 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2718 TRACE_FUNCTION ("pb_write_queue()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2719 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2720 if (pba_data.c_queued < PHB_MAX_QUEUE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2721 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2722 memmove (&pba_data.queued[1], | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2723 &pba_data.queued[0], | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2724 pba_data.c_queued * sizeof (T_PHB_QUEUE *)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2725 ACI_MALLOC (pba_data.queued[pba_data.c_queued], | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2726 sizeof (T_PHB_QUEUE)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2727 pba_data.queued[0]->entry = *entry; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2728 pba_data.c_queued++; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2729 return PHB_EXCT; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2730 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2731 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2732 return PHB_FAIL; /* Queue full */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2733 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2734 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2735 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2736 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2737 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2738 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2739 | STATE : code ROUTINE : pb_clear_queue | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2740 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2741 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2742 PURPOSE : This function clears the LDN queue. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2743 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2744 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2745 LOCAL void pb_clear_queue (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2746 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2747 TRACE_FUNCTION ("pb_clear_queue()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2748 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2749 while (pba_data.c_queued NEQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2750 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2751 pba_data.c_queued--; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2752 ACI_MFREE (pba_data.queued[pba_data.c_queued]); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2753 pba_data.queued[pba_data.c_queued] = NULL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2754 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2755 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2756 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2757 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2758 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2759 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2760 | PROJECT : GSM-PS (6147) MODULE : PHB | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2761 | STATE : code ROUTINE : pb_read_queue | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2762 +----------------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2763 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2764 PURPOSE : This function reads the queue and adds the queued phonebook | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2765 entries. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2766 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2767 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2768 LOCAL T_PHB_RETURN pb_read_queue (void) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2769 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2770 T_PHB_RETURN phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2771 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2772 TRACE_FUNCTION ("pb_write_queue()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2773 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2774 while (pba_data.c_queued NEQ 0) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2775 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2776 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2777 * LDN entries have been queued. Write them now. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2778 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2779 pba_data.c_queued--; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2780 phb_result = pb_add_record (LDN, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2781 pba_data.queued[pba_data.c_queued]->index, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2782 &pba_data.queued[pba_data.c_queued]->entry); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2783 ACI_MFREE (pba_data.queued[pba_data.c_queued]); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2784 pba_data.queued[pba_data.c_queued] = NULL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2785 switch (phb_result) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2786 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2787 case PHB_EXCT: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2788 return phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2789 case PHB_OK: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2790 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2791 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2792 pb_clear_queue(); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2793 return phb_result; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2794 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2795 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2796 return PHB_OK; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2797 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2798 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2799 #endif /* #ifdef TI_PS_FFS_PHB */ | 
