FreeCalypso > hg > fc-magnetite
annotate src/g23m-aci/aci/cmh_ssq.c @ 358:6b8e432a8cd9
!GPRS configs: TEST and DMEM pools moved into IRAM
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Mon, 25 Dec 2017 03:14:09 +0000 | 
| parents | 53929b40109c | 
| children | 
| rev | line source | 
|---|---|
| 
162
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2 +----------------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
3 | Project : GSM-PS (6147) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
4 | Modul : CMH_SSS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
5 +----------------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
6 | Copyright 2002 Texas Instruments Berlin, AG | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
7 | All rights reserved. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
8 | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
9 | This file is confidential and a trade secret of Texas | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
10 | Instruments Berlin, AG | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
11 | The receipt of or possession of this file does not convey | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
12 | any rights to reproduce or disclose its contents or to | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
13 | manufacture, use, or sell anything it may describe, in | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
14 | whole, or in part, without the specific written consent of | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
15 | Texas Instruments Berlin, AG. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
16 +----------------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
17 | Purpose : This module provides the query functions related to the | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
18 | protocol stack adapter for SS. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
19 +----------------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
20 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
21 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
22 #ifndef CMH_SSQ_C | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
23 #define CMH_SSQ_C | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
24 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
25 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
26 #include "aci_all.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
27 /*==== INCLUDES ===================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
28 #include "aci.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
29 #include "aci_cmh.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
30 #include "ati_cmd.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
31 #include "aci_cmd.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
32 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
33 #include "aci_ext_pers.h" /* we are using personalisation extensions */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
34 #include "aci_slock.h" /* in order to asure interfaces */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
35 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
36 #ifdef FAX_AND_DATA | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
37 #include "aci_fd.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
38 #endif /* of #ifdef FAX_AND_DATA */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
39 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
40 #ifdef UART | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
41 #include "dti.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
42 #include "dti_conn_mng.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
43 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
44 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
45 #include "ksd.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
46 #include "psa.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
47 #include "psa_ss.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
48 #include "psa_sim.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
49 #include "cmh.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
50 #include "cmh_ss.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
51 #include "cmh_sim.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
52 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
53 #include "aci_ext_pers.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
54 #include "aci_slock.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
55 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
56 #ifdef FF_PHONE_LOCK | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
57 #include "sec_drv.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
58 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
59 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
60 /*==== CONSTANTS ==================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
61 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
62 /*==== EXPORT =====================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
63 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
64 /*==== VARIABLES ==================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
65 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
66 /*==== PROTOTYPES==================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
67 /* Implements Measure 193 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
68 LOCAL T_ACI_RETURN cmhSS_queryHandler (T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
69 void *stat, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
70 T_ACI_AT_CMD atCmd, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
71 UBYTE ssCode); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
72 EXTERN T_ACI_RETURN cmhSS_check_oper_result(T_OPER_RET_STATUS result); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
73 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
74 #ifdef FF_PHONE_LOCK | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
75 EXTERN T_OPER_RET_STATUS aci_ext_get_phone_lock_satus(T_SEC_DRV_EXT_PHONE_LOCK_TYPE type,T_SEC_DRV_EXT_PHONE_LOCK_STATUS *status); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
76 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
77 /*==== FUNCTIONS ==================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
78 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
79 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
80 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
81 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
82 | STATE : code ROUTINE : qAT_PlusCCFC | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
83 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
84 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
85 PURPOSE : This is the functional counterpart to the +CCFC AT command | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
86 which is responsible to query the parameters for call | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
87 forwarding supplementary services. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
88 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
89 <reason> : reason for CF. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
90 <class> : class of basic service. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
91 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
92 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
93 GLOBAL T_ACI_RETURN qAT_PlusCCFC ( T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
94 T_ACI_CCFC_RSN reason, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
95 T_ACI_CLASS class_type ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
96 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
97 SHORT sId; /* holds service id */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
98 UBYTE ssCd; /* holds ss code */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
99 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
100 T_ACI_RETURN retVal; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
101 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
102 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
103 TRACE_FUNCTION ("qAT_PlusCCFC"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
104 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
105 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
106 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
107 * check command source | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
108 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
109 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
110 if(!cmh_IsVldCmdSrc (srcId)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
111 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
112 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
113 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
114 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
115 if( cmhPrm[srcId].ssCmdPrm.mltyTrnFlg NEQ 0 ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
116 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
117 return( AT_BUSY ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
118 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
119 /* Implements Measure # 85 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
120 if(!cmhSS_checkCCFC_RSN(reason, &ssCd)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
121 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
122 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
123 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
124 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
125 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
126 * check parameter <class> | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
127 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
128 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
129 if( !cmhSS_CheckClassInterr(class_type) ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
130 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
131 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
132 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
133 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
134 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
135 /* SIM TOOLKIT & FDN HANDLING */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
136 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
137 retVal = cmhSS_CF_SAT_Handle( srcId, reason, CCFC_MOD_Query, NULL, NULL, class_type, NULL, NULL, 0); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
138 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
139 if( retVal NEQ AT_CMPL ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
140 return( retVal ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
141 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
142 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
143 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
144 * get a new service table entry to interrogate SS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
145 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
146 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
147 sId = psaSS_stbNewEntry(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
148 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
149 if( sId EQ NO_ENTRY ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
150 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
151 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_SrvTabFull ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
152 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
153 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
154 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
155 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
156 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
157 * start first transaction | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
158 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
159 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
160 CCD_START; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
161 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
162 psaSS_asmInterrogateSS( ssCd, SS_NO_PRM, SS_NO_PRM ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
163 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
164 ssShrdPrm.stb[sId].ntryUsdFlg = TRUE; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
165 ssShrdPrm.stb[sId].ssCode = ssCd; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
166 ssShrdPrm.stb[sId].srvOwn = (T_OWN)srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
167 ssShrdPrm.stb[sId].ClassType = class_type; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
168 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
169 ssShrdPrm.stb[sId].curCmd = AT_CMD_CCFC; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
170 cmhSS_flagTrn( sId, &(cmhPrm[srcId].ssCmdPrm.mltyTrnFlg)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
171 psaSS_NewTrns(sId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
172 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
173 CCD_END; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
174 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
175 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
176 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
177 * log command execution | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
178 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
179 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
180 #if defined SMI OR defined MFW OR defined FF_MMI_RIV | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
181 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
182 T_ACI_CLOG cmdLog; /* holds logging info */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
183 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
184 cmdLog.atCmd = AT_CMD_CCFC; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
185 cmdLog.cmdType = CLOG_TYPE_Query; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
186 cmdLog.retCode = AT_EXCT; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
187 cmdLog.cId = ACI_NumParmNotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
188 cmdLog.sId = sId+1; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
189 cmdLog.cmdPrm.qCCFC.srcId = srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
190 cmdLog.cmdPrm.qCCFC.reason = reason; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
191 cmdLog.cmdPrm.qCCFC.class_type = class_type; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
192 rAT_PercentCLOG( &cmdLog ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
193 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
194 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
195 return( AT_EXCT ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
196 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
197 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
198 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
199 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
200 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
201 | STATE : code ROUTINE : qAT_PlusCLCK | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
202 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
203 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
204 PURPOSE : This is the functional counterpart to the +CLCK AT command | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
205 which is responsible to query the parameters for call | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
206 barring supplementary services. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
207 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
208 <fac> : CB facility. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
209 <class>: class of basic service. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
210 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
211 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
212 GLOBAL T_ACI_RETURN qAT_PlusCLCK ( T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
213 T_ACI_FAC fac, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
214 T_ACI_CLASS class_type, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
215 T_ACI_CLSSTAT *clsStat) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
216 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
217 UBYTE dummy_slockStat; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
218 TRACE_FUNCTION ("qAT_PlusCLCK"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
219 return qAT_PercentCLCK(srcId,fac,class_type, clsStat,&dummy_slockStat); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
220 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
221 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
222 /*QAT_PERCENTCLCK add for Simlock in Riviear MFW | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
223 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
224 Added by Shen,Chao April 16th, 2003 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
225 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
226 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
227 GLOBAL T_ACI_RETURN qAT_PercentCLCK ( T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
228 T_ACI_FAC fac, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
229 T_ACI_CLASS class_type, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
230 T_ACI_CLSSTAT *clsStat, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
231 UBYTE *simClockStat) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
232 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
233 SHORT sId; /* holds service id */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
234 UBYTE ssCd; /* holds ss code */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
235 T_ACI_RETURN retVal; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
236 #ifdef SIM_PERS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
237 T_SIMLOCK_TYPE slocktype; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
238 T_SIMLOCK_STATUS rlockstatus; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
239 T_OPER_RET_STATUS ret; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
240 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
241 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
242 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
243 TRACE_FUNCTION ("qAT_PercentCLCK"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
244 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
245 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
246 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
247 * check command source | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
248 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
249 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
250 if(!cmh_IsVldCmdSrc (srcId)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
251 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
252 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
253 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
254 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
255 if( cmhPrm[srcId].ssCmdPrm.mltyTrnFlg NEQ 0 ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
256 return( AT_BUSY ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
257 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
258 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
259 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
260 * check parameter <fac> | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
261 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
262 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
263 /* Implements Measure # 166 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
264 if( !cmhSS_getSSCd(fac, &ssCd) ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
265 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
266 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
267 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
268 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
269 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
270 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
271 * if action is related to SS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
272 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
273 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
274 if( ssCd NEQ NOT_PRESENT_8BIT ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
275 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
276 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
277 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
278 * check parameter <class> | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
279 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
280 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
281 if( !cmhSS_CheckCbClassInterr(class_type)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
282 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
283 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_OpNotAllow ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
284 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
285 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
286 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
287 if( cmhPrm[srcId].ssCmdPrm.mltyTrnFlg NEQ 0 ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
288 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
289 return( AT_BUSY ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
290 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
291 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
292 * check not allowed <fac> (only possible with mode=0 i.e unlock) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
293 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
294 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
295 if(fac EQ FAC_Ab OR fac EQ FAC_Ag OR fac EQ FAC_Ac) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
296 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
297 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_OpNotAllow ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
298 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
299 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
300 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
301 /* SIM TOOLKIT & FDN HANDLING */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
302 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
303 retVal = cmhSS_Call_Barr_SAT_Handle( srcId, CLCK_MODE_QUERY, fac, NULL, class_type); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
304 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
305 if( retVal NEQ AT_CMPL ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
306 return( retVal ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
307 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
308 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
309 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
310 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
311 * get a new service table entry to interrogate SS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
312 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
313 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
314 sId = psaSS_stbNewEntry(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
315 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
316 if( sId EQ NO_ENTRY ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
317 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
318 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_SrvTabFull ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
319 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
320 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
321 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
322 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
323 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
324 * start first transaction | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
325 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
326 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
327 CCD_START; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
328 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
329 psaSS_asmInterrogateSS( ssCd, SS_NO_PRM, SS_NO_PRM ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
330 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
331 ssShrdPrm.stb[sId].ntryUsdFlg = TRUE; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
332 ssShrdPrm.stb[sId].ssCode = ssCd; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
333 ssShrdPrm.stb[sId].srvOwn = (T_OWN)srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
334 ssShrdPrm.stb[sId].ClassType = class_type; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
335 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
336 ssShrdPrm.stb[sId].curCmd = AT_CMD_CLCK; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
337 cmhSS_flagTrn( sId, &(cmhPrm[srcId].ssCmdPrm.mltyTrnFlg)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
338 psaSS_NewTrns(sId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
339 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
340 CCD_END; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
341 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
342 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
343 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
344 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
345 * if action is related to SIM | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
346 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
347 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
348 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
349 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
350 switch (fac) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
351 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
352 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
353 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
354 * access PIN 1 status | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
355 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
356 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
357 case FAC_Sc: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
358 clsStat -> class_type = CLASS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
359 clsStat -> status = STATUS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
360 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
361 switch( simShrdPrm.PEDStat ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
362 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
363 case( PEDS_ENA ): clsStat -> status = STATUS_Active; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
364 return( AT_CMPL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
365 case( PEDS_DIS ): clsStat -> status = STATUS_NotActive; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
366 return( AT_CMPL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
367 default: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
368 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_SimFail ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
369 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
370 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
371 /* break is removed ,as case is returning before break so it is not needed */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
372 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
373 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
374 * access fixed dialling feature | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
375 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
376 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
377 case ( FAC_Fd ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
378 clsStat -> class_type = CLASS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
379 clsStat -> status = STATUS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
380 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
381 if( simShrdPrm.SIMStat EQ SS_OK ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
382 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
383 switch( simShrdPrm.crdFun ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
384 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
385 case( SIM_ADN_ENABLED ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
386 case( SIM_ADN_BDN_ENABLED ): clsStat -> status = STATUS_NotActive; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
387 return( AT_CMPL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
388 case( SIM_FDN_ENABLED ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
389 case( SIM_FDN_BDN_ENABLED ): clsStat -> status = STATUS_Active; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
390 return( AT_CMPL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
391 case( SIM_NO_OPERATION ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
392 default: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
393 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
394 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_SimFail ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
395 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
396 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
397 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
398 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
399 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
400 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_SimFail ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
401 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
402 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
403 /* break is removed ,as case is returning before break so it is not needed */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
404 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
405 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
406 * lock ALS setting with PIN2 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
407 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
408 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
409 case FAC_Al: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
410 clsStat -> class_type = CLASS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
411 clsStat -> status = STATUS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
412 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
413 switch( ALSlock ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
414 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
415 case( ALS_MOD_SPEECH ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
416 case( ALS_MOD_AUX_SPEECH ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
417 clsStat -> status = STATUS_Active; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
418 return( AT_CMPL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
419 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
420 case( ALS_MOD_NOTPRESENT ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
421 clsStat -> status = STATUS_NotActive; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
422 return( AT_CMPL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
423 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
424 default: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
425 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_OpNotSupp ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
426 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
427 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
428 /* break is removed ,as case is returning before break so it is not needed */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
429 #ifdef SIM_PERS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
430 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
431 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
432 * ME Personalisation | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
433 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
434 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
435 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
436 case FAC_Pn: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
437 case FAC_Pu: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
438 case FAC_Pp: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
439 case FAC_Pc: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
440 case FAC_Ps: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
441 case FAC_Pf: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
442 case FAC_Bl: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
443 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
444 clsStat -> class_type = CLASS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
445 clsStat -> status = STATUS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
446 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
447 switch (fac) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
448 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
449 case FAC_Pn: slocktype = SIMLOCK_NETWORK; break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
450 case FAC_Pu: slocktype = SIMLOCK_NETWORK_SUBSET; break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
451 case FAC_Pp: slocktype = SIMLOCK_SERVICE_PROVIDER; break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
452 case FAC_Pc: slocktype = SIMLOCK_CORPORATE; break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
453 case FAC_Ps: slocktype = SIMLOCK_SIM; break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
454 case FAC_Pf: slocktype = SIMLOCK_FIRST_SIM; break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
455 case FAC_Bl: slocktype = SIMLOCK_BLOCKED_NETWORK; break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
456 default: slocktype = SIMLOCK_NETWORK; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
457 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
458 aci_ext_personalisation_init(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
459 rlockstatus = aci_personalisation_get_status(slocktype); /* Changed to aci_personalisatio_get_status | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
460 from aci_ext_personalisatio_get_status on 11/03/2005 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
461 aci_ext_personalisation_free(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
462 if (rlockstatus EQ SIMLOCK_ENABLED) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
463 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
464 clsStat -> status = STATUS_Active; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
465 return( AT_CMPL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
466 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
467 else if (rlockstatus EQ SIMLOCK_DISABLED) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
468 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
469 clsStat -> status = STATUS_NotActive; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
470 return( AT_CMPL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
471 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
472 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
473 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
474 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_Unknown ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
475 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
476 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
477 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
478 case( FAC_Mu ) : | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
479 case( FAC_Mum ) : | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
480 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
481 clsStat->class_type = CLASS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
482 clsStat->status = STATUS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
483 ret = aci_slock_master_unlock( NULL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
484 switch (ret) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
485 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
486 case OPER_SUCCESS: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
487 case OPER_WRONG_PASSWORD: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
488 clsStat->status = STATUS_Active; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
489 return( AT_CMPL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
490 case OPER_NOT_ALLOWED: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
491 clsStat->status = STATUS_NotActive; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
492 return( AT_CMPL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
493 case OPER_FAIL: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
494 ACI_ERR_DESC( ACI_ERR_CLASS_Cme,CME_ERR_Unknown ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
495 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
496 default: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
497 ACI_ERR_DESC( ACI_ERR_CLASS_Cme,CME_ERR_Unknown ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
498 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
499 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
500 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
501 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
502 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
503 #ifdef FF_PHONE_LOCK | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
504 case(FAC_Pl) : | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
505 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
506 clsStat->class_type = CLASS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
507 clsStat->status = STATUS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
508 ret = aci_ext_get_phone_lock_satus(PHONE_LOCK,(T_SEC_DRV_EXT_PHONE_LOCK_STATUS *)&clsStat->status); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
509 return(cmhSS_check_oper_result(ret)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
510 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
511 case(FAC_Apl) : | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
512 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
513 clsStat->class_type = CLASS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
514 clsStat->status = STATUS_NotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
515 ret = aci_ext_get_phone_lock_satus(AUTO_LOCK,(T_SEC_DRV_EXT_PHONE_LOCK_STATUS *)&clsStat->status); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
516 return(cmhSS_check_oper_result(ret)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
517 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
518 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
519 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
520 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
521 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
522 * Error handling | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
523 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
524 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
525 default: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
526 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_Unknown ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
527 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
528 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
529 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
530 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
531 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
532 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
533 * log command execution | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
534 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
535 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
536 #if defined SMI OR defined MFW OR defined FF_MMI_RIV | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
537 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
538 T_ACI_CLOG cmdLog; /* holds logging info */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
539 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
540 cmdLog.atCmd = AT_CMD_CLCK; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
541 cmdLog.cmdType = CLOG_TYPE_Query; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
542 cmdLog.retCode = AT_EXCT; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
543 cmdLog.cId = ACI_NumParmNotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
544 cmdLog.sId = sId+1; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
545 cmdLog.cmdPrm.qCLCK.srcId = srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
546 cmdLog.cmdPrm.qCLCK.fac = fac; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
547 cmdLog.cmdPrm.qCLCK.class_type = class_type; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
548 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
549 rAT_PercentCLOG( &cmdLog ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
550 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
551 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
552 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
553 return( AT_EXCT ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
554 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
555 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
556 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
557 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
558 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
559 | STATE : code ROUTINE : qAT_PlusCCWA | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
560 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
561 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
562 PURPOSE : This is the functional counterpart to the +CCWA AT command | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
563 which is responsible to query the parameters for call | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
564 waiting supplementary services. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
565 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
566 <class> : class of basic service. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
567 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
568 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
569 GLOBAL T_ACI_RETURN qAT_PlusCCWA (T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
570 T_ACI_CLASS class_type) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
571 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
572 SHORT sId; /* holds service id */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
573 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
574 T_ACI_RETURN retVal; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
575 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
576 TRACE_FUNCTION ("qAT_PlusCCWA ()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
577 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
578 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
579 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
580 * check command source | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
581 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
582 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
583 if(!cmh_IsVldCmdSrc (srcId)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
584 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
585 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
586 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
587 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
588 if( cmhPrm[srcId].ssCmdPrm.mltyTrnFlg NEQ 0 ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
589 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
590 return( AT_BUSY ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
591 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
592 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
593 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
594 * check parameter <class> | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
595 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
596 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
597 if( !cmhSS_CheckClassInterr(class_type) ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
598 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
599 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
600 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
601 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
602 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
603 /* SIM TOOLKIT & FDN HANDLING */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
604 retVal = cmhSS_CW_SAT_Handle( srcId, CCFC_MOD_Query, class_type); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
605 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
606 if( retVal NEQ AT_CMPL ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
607 return( retVal ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
608 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
609 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
610 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
611 * get a new service table entry to interrogate SS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
612 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
613 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
614 sId = psaSS_stbNewEntry(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
615 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
616 if( sId EQ NO_ENTRY ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
617 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
618 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_SrvTabFull ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
619 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
620 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
621 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
622 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
623 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
624 * start first transaction | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
625 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
626 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
627 CCD_START; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
628 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
629 psaSS_asmInterrogateSS( SS_CD_CW, SS_NO_PRM, SS_NO_PRM ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
630 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
631 ssShrdPrm.stb[sId].ntryUsdFlg = TRUE; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
632 ssShrdPrm.stb[sId].ssCode = SS_CD_CW; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
633 ssShrdPrm.stb[sId].srvOwn = (T_OWN)srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
634 ssShrdPrm.stb[sId].ClassType = class_type; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
635 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
636 ssShrdPrm.stb[sId].curCmd = AT_CMD_CCWA; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
637 cmhSS_flagTrn( sId, &(cmhPrm[srcId].ssCmdPrm.mltyTrnFlg)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
638 psaSS_NewTrns(sId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
639 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
640 CCD_END; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
641 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
642 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
643 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
644 * log command execution | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
645 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
646 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
647 #if defined SMI OR defined MFW OR defined FF_MMI_RIV | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
648 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
649 T_ACI_CLOG cmdLog; /* holds logging info */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
650 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
651 cmdLog.atCmd = AT_CMD_CCWA; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
652 cmdLog.cmdType = CLOG_TYPE_Query; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
653 cmdLog.retCode = AT_EXCT; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
654 cmdLog.cId = ACI_NumParmNotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
655 cmdLog.sId = sId+1; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
656 cmdLog.cmdPrm.qCCWA.srcId = srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
657 cmdLog.cmdPrm.qCCWA.class_type = class_type; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
658 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
659 rAT_PercentCLOG( &cmdLog ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
660 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
661 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
662 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
663 return( AT_EXCT ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
664 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
665 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
666 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
667 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
668 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
669 | STATE : code ROUTINE : qAT_PlusCLIP | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
670 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
671 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
672 PURPOSE : This is the functional counterpart to the +CLIP AT command | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
673 which is responsible to query the setting for calling | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
674 line indication supplementary services. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
675 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
676 <stat> : CLIP status. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
677 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
678 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
679 GLOBAL T_ACI_RETURN qAT_PlusCLIP ( T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
680 T_ACI_CLIP_STAT * stat) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
681 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
682 /* Implements Measure 193 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
683 TRACE_FUNCTION ("qAT_PlusCLIP ()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
684 return (cmhSS_queryHandler (srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
685 (void*)stat, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
686 AT_CMD_CLIP, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
687 SS_CD_CLIP) ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
688 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
689 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
690 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
691 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
692 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
693 | STATE : code ROUTINE : qAT_PlusCLIR | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
694 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
695 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
696 PURPOSE : This is the functional counterpart to the +CLIR AT command | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
697 which is responsible to query the setting for calling | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
698 line restriction supplementary services. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
699 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
700 <mode> : CLIR mode. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
701 <stat> : CLIR status. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
702 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
703 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
704 GLOBAL T_ACI_RETURN qAT_PlusCLIR ( T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
705 T_ACI_CLIR_MOD * mode, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
706 T_ACI_CLIR_STAT * stat) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
707 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
708 SHORT sId; /* holds service id */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
709 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
710 T_ACI_RETURN retVal; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
711 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
712 TRACE_FUNCTION ("qAT_PlusCLIR ()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
713 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
714 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
715 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
716 * check command source | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
717 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
718 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
719 if(!cmh_IsVldCmdSrc (srcId)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
720 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
721 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
722 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
723 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
724 /* SIM TOOLKIT & FDN HANDLING */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
725 retVal = cmhSS_CLIR_SAT_Handle( srcId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
726 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
727 if( retVal NEQ AT_CMPL ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
728 return( retVal ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
729 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
730 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
731 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
732 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
733 * get a new service table entry to interrogate SS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
734 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
735 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
736 sId = psaSS_stbNewEntry(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
737 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
738 if( sId EQ NO_ENTRY ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
739 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
740 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_SrvTabFull ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
741 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
742 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
743 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
744 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
745 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
746 * set up facility information element | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
747 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
748 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
749 CCD_START; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
750 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
751 psaSS_asmInterrogateSS( SS_CD_CLIR, SS_NO_PRM, SS_NO_PRM ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
752 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
753 *----------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
754 * declare service table entry as used and the owner of the service | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
755 *----------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
756 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
757 ssShrdPrm.stb[sId].ntryUsdFlg = TRUE; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
758 ssShrdPrm.stb[sId].srvOwn = (T_OWN)srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
759 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
760 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
761 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
762 * start a new transaction | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
763 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
764 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
765 ssShrdPrm.stb[sId].curCmd = AT_CMD_CLIR; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
766 psaSS_NewTrns(sId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
767 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
768 CCD_END; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
769 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
770 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
771 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
772 * log command execution | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
773 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
774 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
775 #if defined SMI OR defined MFW OR defined FF_MMI_RIV | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
776 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
777 T_ACI_CLOG cmdLog; /* holds logging info */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
778 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
779 cmdLog.atCmd = AT_CMD_CLIR; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
780 cmdLog.cmdType = CLOG_TYPE_Query; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
781 cmdLog.retCode = AT_EXCT; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
782 cmdLog.cId = ACI_NumParmNotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
783 cmdLog.sId = sId+1; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
784 cmdLog.cmdPrm.qCLIR.srcId = srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
785 cmdLog.cmdPrm.qCLIR.stat = stat; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
786 cmdLog.cmdPrm.qCLIR.mode = mode; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
787 rAT_PercentCLOG( &cmdLog ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
788 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
789 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
790 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
791 return( AT_EXCT ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
792 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
793 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
794 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
795 GLOBAL T_ACI_RETURN qAT_PercentCLIR ( T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
796 T_ACI_CLIR_MOD * mode) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
797 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
798 T_CC_CMD_PRM *pCCCmdPrm; /* points to CC command parameters */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
799 TRACE_FUNCTION ("qAT_PercentCLIR ()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
800 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
801 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
802 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
803 * check command source | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
804 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
805 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
806 if(!cmh_IsVldCmdSrc (srcId)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
807 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
808 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
809 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
810 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
811 pCCCmdPrm = &cmhPrm[srcId].ccCmdPrm; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
812 *mode = pCCCmdPrm->CLIRmode; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
813 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
814 return AT_CMPL; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
815 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
816 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
817 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
818 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
819 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
820 | STATE : code ROUTINE : qAT_PlusCOLP | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
821 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
822 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
823 PURPOSE : This is the functional counterpart to the +COLP AT command | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
824 which is responsible to query the setting for connected | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
825 line presentation supplementary services. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
826 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
827 <stat> : COLP status. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
828 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
829 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
830 GLOBAL T_ACI_RETURN qAT_PlusCOLP ( T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
831 T_ACI_COLP_STAT * stat) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
832 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
833 /* Implements Measure 193 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
834 TRACE_FUNCTION ("qAT_PercentCOLP ()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
835 return (cmhSS_queryHandler (srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
836 (void*)stat, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
837 AT_CMD_COLP, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
838 SS_CD_COLP) ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
839 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
840 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
841 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
842 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
843 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
844 | STATE : code ROUTINE : qAT_PercentCOLR | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
845 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
846 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
847 PURPOSE : This is the functional counterpart to the %COLR AT command | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
848 which is responsible to query the setting for connected | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
849 line restriction supplementary services. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
850 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
851 <stat> : COLR status. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
852 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
853 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
854 GLOBAL T_ACI_RETURN qAT_PercentCOLR ( T_ACI_CMD_SRC srcId ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
855 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
856 /* Implements Measure 193 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
857 TRACE_FUNCTION ("qAT_PercentCOLR ()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
858 return (cmhSS_queryHandler (srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
859 NULL, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
860 AT_CMD_COLR, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
861 SS_CD_COLR)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
862 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
863 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
864 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
865 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
866 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
867 | STATE : code ROUTINE : qAT_PercentCCBS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
868 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
869 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
870 PURPOSE : This is the functional counterpart to the %CCBS AT command | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
871 which is responsible to query the setting for connected | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
872 line restriction supplementary services. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
873 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
874 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
875 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
876 GLOBAL T_ACI_RETURN qAT_PercentCCBS ( T_ACI_CMD_SRC srcId ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
877 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
878 SHORT sId; /* holds service id */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
879 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
880 T_ACI_RETURN retVal; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
881 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
882 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
883 TRACE_FUNCTION ("qAT_PercentCCBS ()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
884 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
885 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
886 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
887 * check command source | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
888 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
889 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
890 if(!cmh_IsVldCmdSrc (srcId)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
891 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
892 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
893 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
894 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
895 /* SIM TOOLKIT & FDN HANDLING */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
896 retVal = cmhSS_CCBS_SAT_Handle( srcId, CCBS_MOD_Query, -1); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
897 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
898 if( retVal NEQ AT_CMPL ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
899 return( retVal ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
900 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
901 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
902 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
903 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
904 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
905 * get a new service table entry to interrogate SS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
906 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
907 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
908 sId = psaSS_stbNewEntry(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
909 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
910 if( sId EQ NO_ENTRY ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
911 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
912 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_SrvTabFull ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
913 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
914 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
915 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
916 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
917 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
918 * set up facility information element | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
919 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
920 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
921 CCD_START; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
922 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
923 psaSS_asmInterrogateSS( SS_CD_CCBS, SS_NO_PRM, SS_NO_PRM ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
924 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
925 *----------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
926 * declare service table entry as used and the owner of the service | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
927 *----------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
928 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
929 ssShrdPrm.stb[sId].ntryUsdFlg = TRUE; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
930 ssShrdPrm.stb[sId].srvOwn = (T_OWN)srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
931 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
932 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
933 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
934 * start a new transaction | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
935 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
936 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
937 ssShrdPrm.stb[sId].curCmd = AT_CMD_CCBS; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
938 psaSS_NewTrns(sId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
939 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
940 CCD_END; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
941 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
942 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
943 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
944 * log command execution | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
945 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
946 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
947 #if defined SMI OR defined MFW OR defined FF_MMI_RIV | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
948 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
949 T_ACI_CLOG cmdLog; /* holds logging info */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
950 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
951 cmdLog.atCmd = AT_CMD_CCBS; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
952 cmdLog.cmdType = CLOG_TYPE_Query; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
953 cmdLog.retCode = AT_EXCT; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
954 cmdLog.cId = ACI_NumParmNotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
955 cmdLog.sId = sId+1; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
956 cmdLog.cmdPrm.qCCBS.srcId = srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
957 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
958 rAT_PercentCLOG( &cmdLog ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
959 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
960 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
961 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
962 return( AT_EXCT ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
963 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
964 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
965 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
966 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
967 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
968 | STATE : code ROUTINE : qAT_PercentCNAP | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
969 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
970 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
971 PURPOSE : This is the functional counterpart to the %CNAP AT command | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
972 which is responsible to query the setting for calling | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
973 name presentation supplementary services. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
974 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
975 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
976 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
977 GLOBAL T_ACI_RETURN qAT_PercentCNAP ( T_ACI_CMD_SRC srcId ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
978 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
979 /* Implements Measure 193 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
980 TRACE_FUNCTION ("qAT_PercentCNAP ()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
981 return (cmhSS_queryHandler (srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
982 NULL, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
983 AT_CMD_CNAP, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
984 SS_CD_CNAP) ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
985 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
986 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
987 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
988 #ifdef TI_PS_FF_AT_P_CMD_CSCN | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
989 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
990 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
991 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
992 | STATE : code ROUTINE : qAT_PercentCSCN | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
993 +--------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
994 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
995 PURPOSE : This is the functional counterpart to the %CSCN AT command | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
996 which is responsible to query the settings. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
997 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
998 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
999 GLOBAL T_ACI_RETURN qAT_PercentCSCN ( T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1000 T_ACI_SS_CSCN_MOD_STATE *ss_switch, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1001 T_ACI_SS_CSCN_MOD_DIRECTION *ss_direction, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1002 T_ACI_CC_CSCN_MOD_STATE *cc_switch, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1003 T_ACI_CC_CSCN_MOD_DIRECTION *cc_direction ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1004 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1005 TRACE_FUNCTION ("qAT_PercentCSCN ()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1006 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1007 if(!cmh_IsVldCmdSrc (srcId)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1008 { /* check command source */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1009 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1010 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1011 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1012 *ss_switch = cmhPrm[srcId].ssCmdPrm.CSCNss_mode.SsCSCNModeState; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1013 *ss_direction = cmhPrm[srcId].ssCmdPrm.CSCNss_mode.SsCSCNModeDirection; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1014 *cc_switch = cmhPrm[srcId].ccCmdPrm.CSCNcc_mode.CcCSCNModeState; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1015 *cc_direction = cmhPrm[srcId].ccCmdPrm.CSCNcc_mode.CcCSCNModeDirection; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1016 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1017 return( AT_CMPL); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1018 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1019 #endif /* TI_PS_FF_AT_P_CMD_CSCN */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1020 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1021 #ifdef SIM_PERS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1022 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1023 +===========================================================+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1024 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1025 | STATE : code ROUTINE : qAT_PercentMEPD | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1026 | | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1027 |This is the functional counterpart to the %MEPD AT command | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1028 |which is responsible to query MEPD Configuration Data. | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1029 +===========================================================+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1030 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1031 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1032 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1033 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1034 GLOBAL T_ACI_RETURN qAT_PercentMEPD( T_ACI_CMD_SRC srcId, T_SUP_INFO *sup_info) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1035 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1036 T_OPER_RET_STATUS rlockstatus; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1037 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1038 TRACE_FUNCTION ("qAT_ PercentMEPD()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1039 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1040 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1041 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1042 * check command source | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1043 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1044 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1045 if(!cmh_IsVldCmdSrc (srcId)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1046 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1047 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1048 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1049 rlockstatus=aci_slock_sup_info(sup_info); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1050 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1051 if (rlockstatus EQ OPER_SUCCESS) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1052 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1053 return (AT_CMPL); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1054 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1055 else if (rlockstatus EQ OPER_FAIL) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1056 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1057 ACI_ERR_DESC( ACI_ERR_CLASS_Cme, CME_ERR_Unknown); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1058 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1059 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1060 return( AT_EXCT ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1061 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1062 #endif /* SIM_PERS */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1063 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1064 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1065 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1066 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1067 /* Implements Measure 193 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1068 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1069 +=============================================================+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1070 | PROJECT : GSM-PS (6147) MODULE : CMH_SSQ | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1071 | STATE : code ROUTINE : cmhSS_queryHandler | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1072 | PARAMETERS : srcId - Source of AT Command | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1073 | stat - CLIP or COLP provisioning status | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1074 | atCmd - AT Command sent for querying | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1075 | ssCode - Supplementary service code | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1076 | RETURN : Query status | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1077 |This contains common code for handling CLIP, COLP, COLR, CNAP| | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1078 +=============================================================+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1079 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1080 LOCAL T_ACI_RETURN cmhSS_queryHandler (T_ACI_CMD_SRC srcId, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1081 void *stat, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1082 T_ACI_AT_CMD atCmd, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1083 UBYTE ssCode) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1084 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1085 SHORT sId; /* holds service id */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1086 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1087 T_ACI_RETURN retVal = AT_FAIL; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1088 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1089 TRACE_FUNCTION ("cmhSS_queryHandler ()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1090 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1091 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1092 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1093 * check command source | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1094 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1095 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1096 if(!cmh_IsVldCmdSrc (srcId)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1097 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1098 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1099 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1100 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1101 /* SIM TOOLKIT & FDN HANDLING */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1102 switch(atCmd) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1103 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1104 case AT_CMD_CLIP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1105 retVal = cmhSS_CLIP_SAT_Handle(srcId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1106 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1107 case AT_CMD_COLP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1108 retVal = cmhSS_COLP_SAT_Handle(srcId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1109 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1110 case AT_CMD_COLR: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1111 retVal = cmhSS_COLR_SAT_Handle(srcId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1112 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1113 case AT_CMD_CNAP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1114 retVal = cmhSS_CNAP_SAT_Handle(srcId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1115 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1116 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1117 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1118 if( retVal NEQ AT_CMPL ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1119 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1120 return( retVal ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1121 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1122 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1123 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1124 * get a new service table entry to interrogate SS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1125 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1126 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1127 sId = psaSS_stbNewEntry(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1128 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1129 if( sId EQ NO_ENTRY ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1130 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1131 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_SrvTabFull ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1132 return( AT_FAIL ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1133 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1134 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1135 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1136 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1137 * set up facility information element | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1138 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1139 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1140 CCD_START; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1141 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1142 psaSS_asmInterrogateSS( ssCode, SS_NO_PRM, SS_NO_PRM ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1143 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1144 *----------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1145 * declare service table entry as used and the owner of the service | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1146 *----------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1147 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1148 ssShrdPrm.stb[sId].ntryUsdFlg = TRUE; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1149 ssShrdPrm.stb[sId].srvOwn = (T_OWN)srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1150 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1151 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1152 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1153 * start a new transaction | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1154 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1155 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1156 ssShrdPrm.stb[sId].curCmd = atCmd; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1157 psaSS_NewTrns(sId); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1158 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1159 CCD_END; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1160 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1161 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1162 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1163 * log command execution | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1164 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1165 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1166 #if defined SMI OR defined MFW OR defined FF_MMI_RIV | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1167 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1168 T_ACI_CLOG cmdLog; /* holds logging info */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1169 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1170 cmdLog.atCmd = atCmd; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1171 cmdLog.cmdType = CLOG_TYPE_Query; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1172 cmdLog.retCode = AT_EXCT; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1173 cmdLog.cId = ACI_NumParmNotPresent; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1174 cmdLog.sId = sId+1; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1175 switch(atCmd) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1176 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1177 case AT_CMD_CLIP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1178 cmdLog.cmdPrm.qCLIP.srcId = srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1179 cmdLog.cmdPrm.qCLIP.stat = (T_ACI_CLIP_STAT *)stat; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1180 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1181 case AT_CMD_COLP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1182 cmdLog.cmdPrm.qCOLP.srcId = srcId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1183 cmdLog.cmdPrm.qCOLP.stat = (T_ACI_COLP_STAT *)stat; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1184 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1185 default: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1186 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1187 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1188 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1189 rAT_PercentCLOG( &cmdLog ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1190 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1191 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1192 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1193 return( AT_EXCT ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1194 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1195 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1196 /*==== EOF ========================================================*/ | 
