FreeCalypso > hg > fc-magnetite
annotate src/aci2/aci/cphs_aci.c @ 87:8dd671b7d41e
blobs/patches: main-pirelli and main-rvtmodem patches added
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Sun, 02 Oct 2016 14:00:10 +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: $Workfile:: cphs_aci.c $| | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
4 | $Author:: $Revision:: $| | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
5 | CREATED: $Modtime:: $| | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
6 | STATE : code | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
7 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
8 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
9 MODULE : CPHS | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
10 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
11 PURPOSE : This module contains the functions adapting CPHS module to ACI. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
12 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
13 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
14 #ifdef FF_CPHS | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
15 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
16 #ifndef CPHS_ACI_C | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
17 #define CPHS_ACI_C | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
18 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
19 #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
 | 
20 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
21 #include "cphs.h" | 
| 
 
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_cmh.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
24 #include "psa.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
25 #include "cmh.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 "psa_util.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
28 #include "psa_sim.h" /* cos' of simShrdPrm !!! */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
29 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
30 #include "cmh_cc.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
31 #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
 | 
32 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
33 static UBYTE last_sim_operation; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
34 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
35 /* ACI/CPHS adapt layer... Only part of the CPHS where cmh calls are allowed */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
36 GLOBAL void cphs_aci_sim_access_cb(SHORT sim_shrd_id) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
37 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
38 BOOL sim_failure = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
39 T_ACI_CME_ERR err; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
40 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
41 TRACE_FUNCTION("cphs_aci_sim_access_cb()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
42 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
43 if( simShrdPrm.atb[sim_shrd_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
 | 
44 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
45 sim_failure = TRUE; | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
48 switch(last_sim_operation) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
49 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
50 case(CPHS_SIM_READ_TRANSP_EF): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
51 case(CPHS_SIM_READ_RECORD): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
52 if(simShrdPrm.atb[sim_shrd_id].dataLen <= 0) | 
| 
 
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 sim_failure = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
55 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
56 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
57 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
58 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
59 /* free sim table entry */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
60 simShrdPrm.atb[sim_shrd_id].ntryUsdFlg = FALSE; | 
| 
 
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 if(sim_failure) | 
| 
 
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 /* an error occured !!! */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
65 TRACE_EVENT("SIM Access Error !!!"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
66 err = cmhSIM_GetCmeFromSim(simShrdPrm.atb[sim_shrd_id].errCode); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
67 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, err); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
68 cphs_sim_data_failure(); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
69 return; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
70 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
71 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
72 cphs_sim_data_accessed(simShrdPrm.atb[sim_shrd_id].recMax, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
73 simShrdPrm.atb[sim_shrd_id].dataLen); | 
| 
 
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 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
76 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
77 GLOBAL void cphs_sim_access_data(UBYTE cphs_sim_operation, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
78 UBYTE cphs_sim_field, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
79 UBYTE record, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
80 UBYTE *data_buffer, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
81 UBYTE data_buffer_size) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
82 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
83 USHORT sim_field_id = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
84 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
85 TRACE_FUNCTION("cphs_sim_access_data()"); | 
| 
 
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 switch(cphs_sim_field) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
88 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
89 case(CPHS_SIM_CFU): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
90 TRACE_EVENT("CPHS Access sim field: SIM_CPHS_CFF"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
91 sim_field_id = SIM_CPHS_CFF; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
92 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
93 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
94 case(CPHS_SIM_VWI): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
95 TRACE_EVENT("CPHS Access sim field: SIM_CPHS_VMW"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
96 sim_field_id = SIM_CPHS_VMW; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
97 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
98 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
99 case(CPHS_SIM_CINF): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
100 TRACE_EVENT("CPHS Access sim field: SIM_CPHS_CINF"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
101 sim_field_id = SIM_CPHS_CINF; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
102 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
103 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
104 case(CPHS_SIM_CSP): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
105 TRACE_EVENT("CPHS Access sim field: SIM_CPHS_CSP"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
106 sim_field_id = SIM_CPHS_CSP; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
107 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
108 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
109 case(CPHS_SIM_ORANGE_CSP): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
110 TRACE_EVENT("CPHS Access sim field: SIM_ORANGE_CSP2"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
111 sim_field_id = SIM_ORANGE_CSP2; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
112 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
113 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
114 case(CPHS_SIM_OPNLONG): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
115 TRACE_EVENT("CPHS Access sim field: SIM_CPHS_ONSTR"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
116 sim_field_id = SIM_CPHS_ONSTR; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
117 break; | 
| 
 
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 case(CPHS_SIM_OPNSHORT): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
120 TRACE_EVENT("CPHS Access sim field: SIM_CPHS_ONSHF"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
121 sim_field_id = SIM_CPHS_ONSHF; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
122 break; | 
| 
 
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 case(CPHS_SIM_MB): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
125 TRACE_EVENT("CPHS Access sim field: SIM_CPHS_MBXN"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
126 sim_field_id = SIM_CPHS_MBXN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
127 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
128 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
129 case(CPHS_SIM_INFO_NUMS): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
130 TRACE_EVENT("CPHS Access sim field: SIM_CPHS_INFN"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
131 sim_field_id = SIM_CPHS_INFN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
132 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
133 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
134 case(CPHS_SIM_INFO_NUMS_EA01): /* in case of old sims */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
135 TRACE_EVENT("CPHS Access sim field: SIM_CPHS_INFN2"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
136 sim_field_id = SIM_CPHS_INFN2; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
137 break; | 
| 
 
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 case(CPHS_SIM_ALSNAMES): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
140 TRACE_EVENT("CPHS Access sim field: SIM_MSISDN"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
141 sim_field_id = SIM_MSISDN; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
142 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
143 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
144 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
145 TRACE_ERROR("cphs_sim_access_data(): wrong cphs_sim_field value !!!"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
146 break; | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
149 last_sim_operation = cphs_sim_operation; | 
| 
 
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 switch(cphs_sim_operation) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
152 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
153 case(CPHS_SIM_READ_TRANSP_EF): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
154 cmhSIM_ReadTranspEF( CMD_SRC_NONE, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
155 AT_CMD_NONE, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
156 sim_field_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
157 0, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
158 data_buffer_size, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
159 data_buffer, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
160 cphs_aci_sim_access_cb ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
161 break; | 
| 
 
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 case(CPHS_SIM_WRITE_TRANSP_EF): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
164 cmhSIM_WriteTranspEF(CMD_SRC_NONE, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
165 AT_CMD_NONE, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
166 sim_field_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
167 0, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
168 data_buffer_size, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
169 data_buffer, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
170 cphs_aci_sim_access_cb ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
171 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
172 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
173 case(CPHS_SIM_READ_RECORD): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
174 cmhSIM_ReadRecordEF( CMD_SRC_NONE, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
175 AT_CMD_CPHS, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
176 sim_field_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
177 record, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
178 data_buffer_size, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
179 data_buffer, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
180 cphs_aci_sim_access_cb ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
181 break; | 
| 
 
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 case(CPHS_SIM_WRITE_RECORD): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
184 cmhSIM_WriteRecordEF( CMD_SRC_NONE, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
185 AT_CMD_CPHS, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
186 sim_field_id, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
187 record, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
188 data_buffer_size, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
189 data_buffer, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
190 cphs_aci_sim_access_cb ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
191 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
192 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
193 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
194 TRACE_ERROR("cphs_sim_access_data(): wrong cphs_sim_operation value !!!"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
195 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
196 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
197 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
198 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
199 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
200 /* converts a BCD number bcd of bcd_size length | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
201 into a string of ascii digits and writes the result in number */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
202 GLOBAL void cphs_bcd2number(CHAR *number, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
203 UBYTE *bcd, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
204 UBYTE bcd_size) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
205 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
206 int i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
207 UBYTE *num_buffer; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
208 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
209 TRACE_FUNCTION("cphs_bcd2number()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
210 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
211 MALLOC(num_buffer, 2*bcd_size); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
212 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
213 /* Decode BCD */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
214 for(i=0;i<bcd_size;i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
215 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
216 num_buffer[2*i] = (bcd[i] & 0x0F); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
217 num_buffer[2*i + 1] = (bcd[i] & 0xF0)>>4; | 
| 
 
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 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
220 utl_BCD2DialStr((const UBYTE *)num_buffer, number, (UBYTE)(2*bcd_size)); | 
| 
 
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 MFREE(num_buffer); | 
| 
 
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 GLOBAL T_CPHS_RET cphs_get_als_active_line(UBYTE srcId, T_CPHS_LINES *line) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
226 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
227 T_ACI_ALS_MOD ALSmode; | 
| 
 
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 TRACE_FUNCTION("cphs_get_als_active_line()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
230 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
231 cmhCC_get_active_als_mode(srcId, &ALSmode ); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
232 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
233 switch( ALSmode ) | 
| 
 
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 case(ALS_MOD_SPEECH): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
236 *line = CPHS_LINE1; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
237 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
238 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
239 case(ALS_MOD_AUX_SPEECH): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
240 *line = CPHS_LINE2; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
241 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
242 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
243 case(ALS_MOD_NOTPRESENT): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
244 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
245 *line = CPHS_LINE_NULL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
246 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
247 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
248 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
249 return(CPHS_OK); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
250 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
251 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
252 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
253 //if( ! psaSIM_ChkSIMSrvSup( SRV_MSISDN )) return( AT_CMPL ); | 
| 
 
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 GLOBAL T_CPHS_LINES als_get_call_info(SHORT call_id) | 
| 
 
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 T_CC_CALL_TBL *ctb; /* Pointer to call table entry */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
259 SHORT cId = call_id-1; /* tarnslation from +CLCC-like call_id and ACI cId */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
260 T_ACI_CRING_TYP cring_type; /* type of bearer of call */ | 
| 
 
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 TRACE_FUNCTION("als_get_call_info()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
263 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
264 /* ==== if the CPHS module is to be ported, then AT+CLCC shall be used... | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
265 Extra info might need to be added to differentiate AuxVoice from Voice... ==== | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
266 MALLOC(calLst, MAX_CALL_NR * sizeof(T_ACI_CLCC_CALDESC)); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
267 if(qAT_PlusCLCC(srcId, calLst) NEQ AT_CMPL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
268 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
269 TRACE_ERROR("+CLCC: error"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
270 return(CPHS_FAIL); | 
| 
 
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 if (!psaCC_ctbIsValid (cId)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
274 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
275 /* Call is not active ! */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
276 return(CPHS_LINE_NULL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
277 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
278 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
279 ctb = ccShrdPrm.ctb[cId]; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
280 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
281 switch(cmhCC_getcalltype(cId)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
282 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
283 case(VOICE_CALL): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
284 cring_type = cmhCC_GetCallType_from_bearer (&ctb->BC[ctb->curBC]); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
285 if(cring_type EQ CRING_TYP_Voice) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
286 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
287 return(CPHS_LINE1); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
288 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
289 else if(cring_type EQ CRING_TYP_AuxVoice) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
290 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
291 return(CPHS_LINE2); | 
| 
 
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 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
294 #ifdef FAX_AND_DATA | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
295 case( TRANS_CALL ): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
296 case( NON_TRANS_CALL ): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
297 return(CPHS_LINE_DATA); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
298 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
299 case( FAX_CALL ): | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
300 return(CPHS_LINE_FAX); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
301 #endif | 
| 
 
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 // MFREE(calLst); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
305 return(CPHS_LINE_NULL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
306 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
307 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
308 #endif /* CPHS_ACI_C */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
309 #endif /* FF_CPHS */ | 
