FreeCalypso > hg > fc-magnetite
annotate src/g23m-aci/aci/psa_sims.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 : PSA_SIMS | 
| 
 
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 defines the signalling functions of the | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
18 | protocol stack adapter for the subscriber identity | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
19 | module. | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
23 #ifndef PSA_SIMS_C | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
24 #define PSA_SIMS_C | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
25 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
26 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
27 #include "aci_all.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
28 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
29 /*==== INCLUDES ===================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
30 #include "aci_cmh.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
31 #include "ati_cmd.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
32 #include "aci_cmd.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
33 #include "aci.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
34 #include "psa.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
35 #include "psa_sim.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
36 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
37 #include "aci_mem.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
38 #ifdef SIM_TOOLKIT | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
39 #include "psa_cc.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
40 #include "psa_sat.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
41 #include "ati_src_sat.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
42 #include "psa_tcpip.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
43 #endif/* SIM_TOOLKIT */ | 
| 
 
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 #ifdef DTI | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
46 #include "dti.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
47 #include "dti_conn_mng.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
48 #include "dti_cntrl_mng.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
49 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
50 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
51 #if defined GPRS AND defined (DTI) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
52 #include "gprs.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
53 #include "gaci.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
54 #include "gaci_cmh.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
55 #include "gaci_srcc.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
56 #include "psa_sm.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
57 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
58 #ifdef FAX_AND_DATA | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
59 #include "aci_fd.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
60 #endif /* FAX_AND_DATA */ | 
| 
 
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 #endif /* GPRS */ | 
| 
 
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 #include "cmh.h" | 
| 
 
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 #if defined (GPRS) AND defined (DTI) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
67 #include "cmh_sm.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
68 #endif /* GPRS */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
69 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
70 #include "cmh_sim.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
71 #include "cmh_sat.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
72 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
73 #include "psa_util.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
74 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
75 #ifndef _SIMULATION_ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
76 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
77 /* temporary solution to get ffs.h included without GPRS to be set ! */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
78 #ifdef GPRS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
79 #include "ffs/ffs.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
80 #else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
81 #include "ffs/ffs.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
82 #undef GPRS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
83 #endif /* GPRS */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
84 #include "ffs_coat.h" | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
85 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
86 #endif /* !_SIMULATION_ */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
87 | 
| 
 
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 /*==== CONSTANTS ==================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
90 | 
| 
 
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 /*==== TYPES ======================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
93 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
94 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
95 /*==== EXPORT =====================================================*/ | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
98 /*==== VARIABLES ==================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
99 #ifdef TI_PS_FF_AT_P_CMD_CUST | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
100 LOCAL BOOL Cust_Mode_Set = FALSE; | 
| 
 
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 /*==== FUNCTIONS ==================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
103 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
104 GLOBAL BOOL psaSIM_hasCustModeBeenSet(void) | 
| 
 
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 return Cust_Mode_Set; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
107 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
108 #endif /* TI_PS_FF_AT_P_CMD_CUST */ | 
| 
 
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 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
111 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
112 | ROUTINE : psaSIM_AccessSIMData | | 
| 
 
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 PURPOSE : access SIM data | 
| 
 
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 */ | 
| 
 
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 GLOBAL SHORT psaSIM_AccessSIMData ( void ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
120 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
121 SHORT aId; /* holds access id */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
122 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
123 TRACE_FUNCTION ("psaSIM_AccessSIMData()"); | 
| 
 
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 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
127 * determine access type | 
| 
 
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 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
130 aId = simShrdPrm.aId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
131 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
132 switch( simShrdPrm.atb[aId].accType ) | 
| 
 
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 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
136 * read datafield | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
137 *--------------------------------------------------------------- | 
| 
 
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 case( ACT_RD_DAT ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
140 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
141 PALLOC (sim_read_req, SIM_READ_REQ); | 
| 
 
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 /* fill in primitive parameter: read data request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
144 sim_read_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
145 sim_read_req -> req_id = (UBYTE)aId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
146 sim_read_req -> v_path_info = simShrdPrm.atb[aId].v_path_info; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
147 if(sim_read_req -> v_path_info) | 
| 
 
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 sim_read_req -> path_info = simShrdPrm.atb[aId].path_info; | 
| 
 
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 sim_read_req -> datafield = simShrdPrm.atb[aId].reqDataFld; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
152 sim_read_req -> offset = simShrdPrm.atb[aId].dataOff; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
153 sim_read_req -> length = simShrdPrm.atb[aId].dataLen; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
154 sim_read_req -> max_length = simShrdPrm.atb[aId].recMax; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
155 PSENDX (SIM, sim_read_req); | 
| 
 
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 break; | 
| 
 
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 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
161 * write datafield | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
162 *--------------------------------------------------------------- | 
| 
 
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 case( ACT_WR_DAT ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
165 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
166 PALLOC (sim_update_req, SIM_UPDATE_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
167 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
168 /* fill in primitive parameter: update data request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
169 sim_update_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
170 sim_update_req -> req_id = (UBYTE)aId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
171 sim_update_req -> v_path_info = simShrdPrm.atb[aId].v_path_info; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
172 if(sim_update_req -> v_path_info) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
173 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
174 sim_update_req -> path_info = simShrdPrm.atb[aId].path_info; | 
| 
 
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 sim_update_req -> datafield = simShrdPrm.atb[aId].reqDataFld; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
177 sim_update_req -> offset = simShrdPrm.atb[aId].dataOff; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
178 sim_update_req -> length = simShrdPrm.atb[aId].dataLen; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
179 memcpy (sim_update_req -> trans_data, simShrdPrm.atb[aId].exchData, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
180 simShrdPrm.atb[aId].dataLen); | 
| 
 
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 PSENDX (SIM, sim_update_req); | 
| 
 
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 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
185 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
186 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
187 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
188 * read record | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
189 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
190 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
191 case( ACT_RD_REC ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
192 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
193 PALLOC (sim_read_record_req, SIM_READ_RECORD_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
194 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
195 /* fill in primitive parameter: read absolute record request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
196 sim_read_record_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
197 sim_read_record_req -> req_id = (UBYTE)aId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
198 sim_read_record_req -> v_path_info = simShrdPrm.atb[aId].v_path_info; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
199 if(sim_read_record_req -> v_path_info) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
200 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
201 sim_read_record_req -> path_info = simShrdPrm.atb[aId].path_info; | 
| 
 
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 sim_read_record_req -> datafield = simShrdPrm.atb[aId].reqDataFld; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
204 sim_read_record_req -> record = simShrdPrm.atb[aId].recNr; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
205 if(simShrdPrm.atb[aId].check_dataLen) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
206 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
207 sim_read_record_req -> length = NOT_PRESENT_8BIT; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
208 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
209 else | 
| 
 
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 sim_read_record_req -> length = simShrdPrm.atb[aId].dataLen; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
212 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
213 PSENDX (SIM, sim_read_record_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
214 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
215 break; | 
| 
 
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 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
218 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
219 * write record | 
| 
 
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 case( ACT_WR_REC ): | 
| 
 
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 PALLOC (sim_update_record_req, SIM_UPDATE_RECORD_REQ); | 
| 
 
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 /* fill in primitive parameter: update absolute record request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
227 sim_update_record_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
228 sim_update_record_req -> req_id = (U8)aId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
229 sim_update_record_req -> v_path_info = simShrdPrm.atb[aId].v_path_info; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
230 if(sim_update_record_req -> v_path_info) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
231 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
232 sim_update_record_req -> path_info = simShrdPrm.atb[aId].path_info; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
233 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
234 sim_update_record_req -> datafield = simShrdPrm.atb[aId].reqDataFld; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
235 sim_update_record_req -> record = simShrdPrm.atb[aId].recNr; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
236 sim_update_record_req -> length = simShrdPrm.atb[aId].dataLen; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
237 memcpy (sim_update_record_req -> linear_data, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
238 simShrdPrm.atb[aId].exchData, sim_update_record_req->length); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
239 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
240 PSENDX (SIM, sim_update_record_req); | 
| 
 
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 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
243 | 
| 
 
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 * increment datafield | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
247 *--------------------------------------------------------------- | 
| 
 
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 case( ACT_INC_DAT ): | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
250 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
251 PALLOC (sim_increment_req, SIM_INCREMENT_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
252 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
253 /* fill in primitive parameter: increment data request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
254 sim_increment_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
255 sim_increment_req -> req_id = (U8)aId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
256 sim_increment_req -> v_path_info = simShrdPrm.atb[aId].v_path_info; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
257 if(sim_increment_req -> v_path_info) | 
| 
 
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 sim_increment_req -> path_info = simShrdPrm.atb[aId].path_info; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
260 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
261 sim_increment_req -> datafield = simShrdPrm.atb[aId].reqDataFld; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
262 sim_increment_req -> length = simShrdPrm.atb[aId].dataLen; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
263 memcpy (sim_increment_req -> linear_data, simShrdPrm.atb[aId].exchData, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
264 sim_increment_req->length); | 
| 
 
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 PSENDX (SIM, sim_increment_req); | 
| 
 
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 break; | 
| 
 
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 *--------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
272 * illegal access type | 
| 
 
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 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
275 default: | 
| 
 
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 TRACE_EVENT("UNEXP ACCESS TYPE IN ATB"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
278 return( -1 ); | 
| 
 
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 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
282 * create and send primitive | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
283 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
284 */ | 
| 
 
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 return 0; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
287 } | 
| 
 
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 /* | 
| 
 
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 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
292 | ROUTINE : psaSIM_VerifyPIN | | 
| 
 
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 PURPOSE : verify a PIN | 
| 
 
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 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
298 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
299 GLOBAL SHORT psaSIM_VerifyPIN ( void ) | 
| 
 
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 T_SIM_SET_PRM * pPrmSet; /* points to used parameter set */ | 
| 
 
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 TRACE_FUNCTION ("psaSIM_VerifyPIN()"); | 
| 
 
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 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
306 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
307 * check owner id | 
| 
 
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 if(!psa_IsVldOwnId(simShrdPrm.owner)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
311 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
312 return( -1 ); | 
| 
 
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 pPrmSet = &simShrdPrm.setPrm[simShrdPrm.owner]; | 
| 
 
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 /* | 
| 
 
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 * create and send primitive | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
319 *------------------------------------------------------------------- | 
| 
 
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 PALLOC (sim_verify_pin_req, SIM_VERIFY_PIN_REQ); | 
| 
 
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 /* fill in primitive parameter: verify PIN request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
325 sim_verify_pin_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
326 sim_verify_pin_req -> pin_id = pPrmSet -> PINType; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
327 memcpy( sim_verify_pin_req -> pin, pPrmSet -> curPIN, PIN_LEN ); | 
| 
 
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 PSENDX (SIM, sim_verify_pin_req); | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
332 return 0; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
333 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
334 | 
| 
 
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 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
337 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
338 | ROUTINE : psaSIM_ChangePIN | | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
341 PURPOSE : change a PIN | 
| 
 
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 GLOBAL SHORT psaSIM_ChangePIN ( void ) | 
| 
 
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 T_SIM_SET_PRM * pPrmSet; /* points to used parameter set */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
348 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
349 TRACE_FUNCTION ("psaSIM_ChangePIN()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
350 | 
| 
 
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 * check owner id | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
354 *------------------------------------------------------------------- | 
| 
 
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 if(!psa_IsVldOwnId(simShrdPrm.owner)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
357 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
358 return( -1 ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
359 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
360 pPrmSet = &simShrdPrm.setPrm[simShrdPrm.owner]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
361 | 
| 
 
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 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
364 * create and send primitive | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
365 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
366 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
367 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
368 PALLOC (sim_change_pin_req, SIM_CHANGE_PIN_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
369 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
370 /* fill in primitive parameter: change PIN request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
371 sim_change_pin_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
372 sim_change_pin_req -> pin_id = pPrmSet -> PINType; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
373 memcpy( sim_change_pin_req -> old_pin, pPrmSet -> curPIN, PIN_LEN ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
374 memcpy( sim_change_pin_req -> new_pin, pPrmSet -> newPIN, PIN_LEN ); | 
| 
 
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 PSENDX (SIM, sim_change_pin_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
377 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
378 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
379 return 0; | 
| 
 
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 | 
| 
 
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 /* | 
| 
 
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 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
386 | ROUTINE : psaSIM_DisablePIN | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
387 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
388 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
389 PURPOSE : disable a PIN | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
390 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
391 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
392 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
393 GLOBAL SHORT psaSIM_DisablePIN ( void ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
394 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
395 T_SIM_SET_PRM * pPrmSet; /* points to used parameter set */ | 
| 
 
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 TRACE_FUNCTION ("psaSIM_DisablePIN()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
398 | 
| 
 
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 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
401 * check owner id | 
| 
 
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 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
404 if(!psa_IsVldOwnId(simShrdPrm.owner)) | 
| 
 
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 return( -1 ); | 
| 
 
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 pPrmSet = &simShrdPrm.setPrm[simShrdPrm.owner]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
409 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
410 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
411 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
412 * create and send primitive | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
413 *------------------------------------------------------------------- | 
| 
 
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 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
416 PALLOC (sim_disable_pin_req, SIM_DISABLE_PIN_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
417 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
418 /* fill in primitive parameter: disable PIN request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
419 sim_disable_pin_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
420 memcpy( sim_disable_pin_req -> pin, pPrmSet -> curPIN, PIN_LEN ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
421 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
422 PSENDX (SIM, sim_disable_pin_req); | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
425 return 0; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
426 } | 
| 
 
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 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
429 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
430 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
431 | ROUTINE : psaSIM_EnablePIN | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
432 +-------------------------------------------------------------------+ | 
| 
 
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 PURPOSE : enable a PIN | 
| 
 
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 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
437 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
438 GLOBAL SHORT psaSIM_EnablePIN ( void ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
439 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
440 T_SIM_SET_PRM * pPrmSet; /* points to used parameter set */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
441 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
442 TRACE_FUNCTION ("psaSIM_EnablePIN()"); | 
| 
 
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 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
445 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
446 * check owner id | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
447 *------------------------------------------------------------------- | 
| 
 
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 if(!psa_IsVldOwnId(simShrdPrm.owner)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
450 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
451 return( -1 ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
452 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
453 pPrmSet = &simShrdPrm.setPrm[simShrdPrm.owner]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
454 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
455 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
456 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
457 * create and send primitive | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
458 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
459 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
460 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
461 PALLOC (sim_enable_pin_req, SIM_ENABLE_PIN_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
462 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
463 /* fill in primitive parameter: enable PIN request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
464 sim_enable_pin_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
465 memcpy( sim_enable_pin_req -> pin, pPrmSet -> curPIN, PIN_LEN ); | 
| 
 
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 PSENDX (SIM, sim_enable_pin_req); | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
470 return 0; | 
| 
 
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 | 
| 
 
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 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
475 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
476 | ROUTINE : psaSIM_UnblockCard | | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
479 PURPOSE : unblock the card | 
| 
 
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 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
482 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
483 GLOBAL SHORT psaSIM_UnblockCard ( void ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
484 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
485 T_SIM_SET_PRM * pPrmSet; /* points to used parameter set */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
486 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
487 TRACE_FUNCTION ("psaSIM_UnblockCard()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
488 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
489 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
490 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
491 * check owner id | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
492 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
493 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
494 if(!psa_IsVldOwnId(simShrdPrm.owner)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
495 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
496 return( -1 ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
497 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
498 pPrmSet = &simShrdPrm.setPrm[simShrdPrm.owner]; | 
| 
 
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 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
502 * create and send primitive | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
503 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
504 */ | 
| 
 
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 PALLOC (sim_unblock_req, SIM_UNBLOCK_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
507 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
508 /* fill in primitive parameter: unblock card request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
509 sim_unblock_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
510 sim_unblock_req -> pin_id = pPrmSet -> PINType; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
511 memcpy( sim_unblock_req -> pin, pPrmSet -> curPIN, PIN_LEN ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
512 memcpy( sim_unblock_req -> unblock_key, pPrmSet -> unblkKey, PUK_LEN ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
513 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
514 PSENDX (SIM, sim_unblock_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
515 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
516 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
517 return 0; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
518 } | 
| 
 
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 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
523 | ROUTINE : psaSIM_SyncSIM | | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
526 PURPOSE : synchronize SIM data | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
527 | 
| 
 
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 GLOBAL void psaSIM_SyncSIM ( void ) | 
| 
 
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 TRACE_FUNCTION ("psaSIM_SyncSIM()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
533 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
534 /* create and send primitive */ | 
| 
 
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 PALLOC (sim_sync_req, SIM_SYNC_REQ); | 
| 
 
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 /* fill in primitive parameter: synchronize request */ | 
| 
 
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 sim_sync_req -> synccs = simShrdPrm.synCs; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
541 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
542 PSENDX (SIM, sim_sync_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
543 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
544 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
545 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
546 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
547 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
548 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
549 | ROUTINE : psaSIM_ActivateSIM | | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
552 PURPOSE : synchronize SIM data | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
553 | 
| 
 
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 GLOBAL SHORT psaSIM_ActivateSIM ( void ) | 
| 
 
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 T_SIM_SET_PRM * pPrmSet; /* points to used parameter set */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
559 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
560 TRACE_FUNCTION ("psaSIM_ActivateSIM()"); | 
| 
 
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 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
563 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
564 * check owner id | 
| 
 
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 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
567 if(!psa_IsVldOwnId(simShrdPrm.owner)) | 
| 
 
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 TRACE_EVENT("not a valid owner !!"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
570 return( -1 ); | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
573 pPrmSet = &simShrdPrm.setPrm[simShrdPrm.owner]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
574 | 
| 
 
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 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
577 * create and send primitive | 
| 
 
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 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
581 PALLOC (sim_activate_req, SIM_ACTIVATE_REQ); | 
| 
 
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 /* fill in primitive parameter: activate request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
584 sim_activate_req->proc = pPrmSet -> actProc; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
585 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
586 /* sim toolkit profile */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
587 memcpy( sim_activate_req->stk_pro_file, pPrmSet -> STKprof, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
588 MAX_STK_PRF ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
589 sim_activate_req->mmi_pro_file = 0xE0; /*enable all*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
590 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
591 #ifdef TI_PS_FF_AT_P_CMD_CUST | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
592 if (pPrmSet -> actProc EQ SIM_INITIALISATION) | 
| 
 
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 if (psaSIM_hasCustModeBeenSet() == FALSE) | 
| 
 
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 ** Customisation Mode is to be global, applying to ALL ACI channels | 
| 
 
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 simShrdPrm.overall_cust_mode = pPrmSet->cust_mode; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
600 Cust_Mode_Set = TRUE; | 
| 
 
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_activate_req->cust_mode = simShrdPrm.overall_cust_mode; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
604 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
605 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
606 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
607 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
608 ** If this isn't SIM_INITIALISATION then the cust_mode will have no relevance, but it should | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
609 ** still not be left uninitialised. | 
| 
 
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 sim_activate_req->cust_mode = (psaSIM_hasCustModeBeenSet() == FALSE) ? | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
612 (UBYTE)CUST_NORMAL_BEHAVIOUR: simShrdPrm.overall_cust_mode; | 
| 
 
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 #else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
615 sim_activate_req->cust_mode = (UBYTE)CUST_NORMAL_BEHAVIOUR; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
616 #endif /* TI_PS_FF_AT_P_CMD_CUST */ | 
| 
 
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 if(sim_activate_req->proc EQ SIM_INITIALISATION) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
619 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
620 sim_activate_req->v_trmst_file = 0x01; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
621 TRACE_EVENT("Read Terminal Support table from FFS"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
622 #ifndef _SIMULATION_ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
623 if(FFS_fread("/gsm/osf/ftrsprt", &sim_activate_req->trmst_file, MAX_TRMST) NEQ MAX_TRMST) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
624 #endif /* _SIMULATION_ */ | 
| 
 
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 memset(&sim_activate_req->trmst_file, 0, MAX_TRMST); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
627 } | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
630 PSENDX (SIM, sim_activate_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
631 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
632 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
633 return 0; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
634 } | 
| 
 
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 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
637 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
638 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
639 | ROUTINE : psaSIM_TrnsSIMAccess | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
640 +-------------------------------------------------------------------+ | 
| 
 
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 PURPOSE : transparent access to SIM data | 
| 
 
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 */ | 
| 
 
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 GLOBAL SHORT psaSIM_TrnsSIMAccess ( T_SIM_TRNS_ACC_PRM * prm ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
647 { | 
| 
 
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 TRACE_FUNCTION ("psaSIM_TrnsSIMAccess()"); | 
| 
 
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 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
652 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
653 * create and send primitive | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
654 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
655 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
656 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
657 PALLOC (sim_access_req, SIM_ACCESS_REQ); | 
| 
 
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 /* fill in primitive parameter: SIM access request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
660 sim_access_req -> source = SRC_MMI; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
661 sim_access_req -> sim_command = prm -> cmd; | 
| 
 
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 if (prm->cmd NEQ SIM_TRANSP_CMD) | 
| 
 
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 sim_access_req -> datafield = prm -> reqDataFld; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
666 sim_access_req -> p1 = prm -> p1; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
667 sim_access_req -> p2 = prm -> p2; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
668 sim_access_req -> p3 = prm -> p3; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
669 } | 
| 
 
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 sim_access_req->c_trans_data = prm -> dataLen; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
672 memcpy( sim_access_req -> trans_data, prm -> transData, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
673 prm -> dataLen ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
674 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
675 PSENDX (SIM, sim_access_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
676 } | 
| 
 
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 return 0; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
679 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
680 | 
| 
 
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 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
683 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
684 | ROUTINE : psaSIM_Bpi_Req | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
685 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
686 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
687 PURPOSE : resume/suspend/connect/disconnect SAT BIP connection. | 
| 
 
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 #if defined (FF_SAT_E) AND defined (DTI) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
690 GLOBAL void psaSIM_Bip_Req ( void ) | 
| 
 
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 T_SAT_CSD_PRM * csd_prm_ptr; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
693 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
694 TRACE_EVENT("psaSIM_Bip_Req()"); | 
| 
 
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 if (simShrdPrm.sim_dti_chPrm EQ NULL) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
697 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
698 TRACE_ERROR ("ERROR: simShrdPrm.sim_dti_chPrm uninitalized, aborting!"); | 
| 
 
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 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
701 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
702 PALLOC(sim_bip_req,SIM_BIP_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
703 memset(sim_bip_req,0,sizeof(sim_bip_req)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
704 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
705 /* copy connection qualifier */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
706 sim_bip_req->bip_conn = simShrdPrm.sim_dti_chPrm->sat_chn_prm.bipConn; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
707 /* copy channel id */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
708 sim_bip_req->bip_ch_id = simShrdPrm.sim_dti_chPrm->sat_chn_prm.chnId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
709 /* copy general result */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
710 sim_bip_req->general_result = simShrdPrm.sim_dti_chPrm->sat_chn_prm.genRes; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
711 /* copy additional result info */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
712 sim_bip_req->add_info_result = simShrdPrm.sim_dti_chPrm->sat_chn_prm.addRes; | 
| 
 
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 /* copy release timer to primitive, if CSD and if duration defined */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
715 /* SAT_E_PATCH: Should be ported to SIM_BIP_CONFIG_REQ? */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
716 if(satShrdPrm.opchType EQ B_CSD) | 
| 
 
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 csd_prm_ptr = (T_SAT_CSD_PRM *)(satShrdPrm.opchPrm); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
719 if(csd_prm_ptr NEQ NULL) | 
| 
 
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 if(csd_prm_ptr->v_dur2) | 
| 
 
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 switch(csd_prm_ptr->dur2.time_unit) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
724 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
725 case TU_100_MSEC: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
726 sim_bip_req->release_time = (U32)csd_prm_ptr->dur2.time_ivl; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
727 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
728 case TU_MIN: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
729 sim_bip_req->release_time = (U32)(csd_prm_ptr->dur2.time_ivl * 600); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
730 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
731 case TU_SEC: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
732 sim_bip_req->release_time = (U32)(csd_prm_ptr->dur2.time_ivl * 10); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
733 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
734 } /* end switch */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
735 } /* end if */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
736 } /* end if csd_prm_ptr NEQ NULL */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
737 } /* end if */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
738 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
739 /* SEND SIM_BIP_REQ */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
740 PSENDX(SIM,sim_bip_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
741 } /* end else*/ | 
| 
 
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 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
747 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
748 | ROUTINE : psaSIM_Bip_Config_Req | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
749 +-------------------------------------------------------------------+ | 
| 
 
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 PURPOSE : sends the BIP channel parameters to SIM. The type of | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
752 parameters depends on the transport unit. | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
755 GLOBAL void psaSIM_Bip_Config_Req ( ) | 
| 
 
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 T_SAT_CSD_PRM * csd_prm_ptr; /* holds pointer to CSD open channel prms */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
758 T_SAT_GPRS_PRM * gprs_prm_ptr; /* holds pointer to GPRS open channel prms */ | 
| 
 
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 /* allocate SIM_BIP_CONFIG_REQ primitive */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
761 PALLOC(sim_bip_config_req,SIM_BIP_CONFIG_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
762 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
763 TRACE_EVENT("psaSIM_Bip_Config_Req()"); | 
| 
 
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 /* reset values of primitive */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
766 memset(sim_bip_config_req,0,sizeof(sim_bip_config_req)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
767 /* check kind of bearer */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
768 if(satShrdPrm.opchType EQ B_CSD) | 
| 
 
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 /* BEARER: CSD */ | 
| 
 
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 /* get connection type */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
773 switch(simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiUnit) | 
| 
 
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 case DTI_ENTITY_UDP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
776 sim_bip_config_req->con_type = SIM_CON_TYPE_UDP; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
777 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
778 #ifdef UART | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
779 case DTI_ENTITY_TRA: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
780 sim_bip_config_req->con_type = SIM_CON_TYPE_SERIAL; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
781 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
782 case DTI_ENTITY_L2R: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
783 sim_bip_config_req->con_type = SIM_CON_TYPE_SERIAL; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
784 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
785 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
786 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
787 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
788 /* get addresses */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
789 /* local_ip,destination_ip, destination port are only valid for UDP */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
790 if(simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiUnit EQ DTI_ENTITY_UDP) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
791 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
792 csd_prm_ptr = (T_SAT_CSD_PRM *)(satShrdPrm.opchPrm); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
793 if(csd_prm_ptr->v_other_addr) | 
| 
 
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 if(csd_prm_ptr->other_addr.oth_addr_type EQ IPv4) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
796 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
797 if(csd_prm_ptr->other_addr.v_ipv4_addr)/* local IP address */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
798 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
799 memcpy(&sim_bip_config_req->local_ip, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
800 &csd_prm_ptr->other_addr.ipv4_addr, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
801 sizeof(csd_prm_ptr->other_addr.ipv4_addr)); | 
| 
 
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 else /* not valid */ | 
| 
 
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 sim_bip_config_req->local_ip = SIM_IP_LOCAL_DYNAMIC; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
806 } | 
| 
 
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 else /* not supported IPv6*/ | 
| 
 
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 sim_bip_config_req->local_ip = SIM_IP_LOCAL_DYNAMIC; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
811 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
812 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
813 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
814 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
815 sim_bip_config_req->local_ip = SIM_IP_LOCAL_DYNAMIC; | 
| 
 
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 /* data destination address */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
819 if(csd_prm_ptr->v_dda) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
820 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
821 if(csd_prm_ptr->dda.oth_addr_type EQ IPv4) | 
| 
 
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 if(csd_prm_ptr->dda.v_ipv4_addr)/* local IP address */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
824 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
825 memcpy(&sim_bip_config_req->destination_ip, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
826 &csd_prm_ptr->dda.ipv4_addr, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
827 sizeof(csd_prm_ptr->dda.ipv4_addr)); | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
831 /* SIM/ME interface transport level:destination port number for UDP */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
832 if(csd_prm_ptr->v_itl) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
833 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
834 sim_bip_config_req->destination_port = csd_prm_ptr->itl.port_number; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
835 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
836 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
837 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
838 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
839 else if (satShrdPrm.opchType EQ B_GPRS) | 
| 
 
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 /* BEARER: GPRS */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
842 #ifdef GPRS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
843 /* get connecton type */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
844 switch(simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiUnit) | 
| 
 
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 case DTI_ENTITY_UDP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
847 sim_bip_config_req->con_type = SIM_CON_TYPE_UDP; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
848 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
849 case DTI_ENTITY_SNDCP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
850 sim_bip_config_req->con_type = SIM_CON_TYPE_IP; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
851 break; | 
| 
 
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 /* get port and addresses */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
855 gprs_prm_ptr = (T_SAT_GPRS_PRM *)(satShrdPrm.opchPrm); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
856 if(gprs_prm_ptr NEQ NULL) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
857 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
858 /* local_ip,destination_ip, destination port are only valid for UDP */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
859 if(simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiUnit EQ DTI_ENTITY_UDP) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
860 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
861 /* get local ip address */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
862 if(gprs_prm_ptr->v_other_addr) | 
| 
 
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 if(gprs_prm_ptr->other_addr.oth_addr_type EQ IPv4) | 
| 
 
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 if(gprs_prm_ptr->other_addr.v_ipv4_addr)/* local IP address */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
867 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
868 memcpy(&sim_bip_config_req->local_ip, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
869 &gprs_prm_ptr->other_addr.ipv4_addr, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
870 sizeof(gprs_prm_ptr->other_addr.ipv4_addr)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
871 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
872 else /* not valid */ | 
| 
 
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 sim_bip_config_req->local_ip = SIM_IP_LOCAL_DYNAMIC; | 
| 
 
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 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
877 else /* not supported IPv6*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
878 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
879 sim_bip_config_req->local_ip = SIM_IP_LOCAL_DYNAMIC; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
880 } | 
| 
 
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 else /* not valid flag for other address */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
883 { | 
| 
 
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 * local IP4 address has been provided by Session Management; it was not provided by the OPEN CHANNEL command | 
| 
 
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 if(tcpipShrdPrm.ipaddr) | 
| 
 
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 sim_bip_config_req->local_ip = psaTCPIP_bytes2ipv4addr(tcpipShrdPrm.ipaddr); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
890 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
891 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
892 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
893 sim_bip_config_req->local_ip = SIM_IP_LOCAL_DYNAMIC; | 
| 
 
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 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
896 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
897 /* get data destination address */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
898 if(gprs_prm_ptr->v_dda) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
899 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
900 if(gprs_prm_ptr->dda.oth_addr_type EQ IPv4) | 
| 
 
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 if(gprs_prm_ptr->dda.v_ipv4_addr)/* local IP address */ | 
| 
 
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 memcpy(&sim_bip_config_req->destination_ip, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
905 &gprs_prm_ptr->dda.ipv4_addr, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
906 sizeof(gprs_prm_ptr->dda.ipv4_addr)); | 
| 
 
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 } | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
911 /* get SIM/ME interface transport level:destination port number for UDP */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
912 if(gprs_prm_ptr->v_itl) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
913 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
914 sim_bip_config_req->destination_port = gprs_prm_ptr->itl.port_number; | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
919 #else /* GPRS */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
920 PFREE(sim_bip_config_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
921 TRACE_ERROR("psaSIM_Bip_Config_Req(): ERROR stack does not support GPRS"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
922 #endif /* GPRS */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
923 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
924 else /* BEARER: unknown */ | 
| 
 
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 TRACE_ERROR("psaSIM_Bip_Config_Req(): ERROR unkown bearer"); | 
| 
 
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 /* send primitive to SIM */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
929 PSENDX(SIM,sim_bip_config_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
930 } | 
| 
 
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 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
935 | ROUTINE : psaSIM_Dti_Req | | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
938 PURPOSE : connection SIM with UDP,TRA or L2R in context CSD | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
939 connection SIM with UDP or SNDCP in context GPRS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
940 request by proactive SIM CARD, set feature SAT CLASS e | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
941 sent parameter depends on kind of connection (dtiConn) | 
| 
 
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 This function sends the primitive SIM_DTI_REQ which is | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
944 only responsible for the establishment of the SIM DTI | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
945 channel! | 
| 
 
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 GLOBAL void psaSIM_Dti_Req ( ULONG link_id ) | 
| 
 
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 #ifdef DTI | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
950 CHAR *p_ent_name=NULL; /* hold peer name */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
951 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
952 TRACE_EVENT("psaSIM_Dti_Req"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
953 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
954 if (simShrdPrm.sim_dti_chPrm EQ NULL) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
955 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
956 /* when disconnecting if previos state connecting; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
957 * will otherwise crash the stack in ACISAT473H */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
958 TRACE_ERROR ("simShrdPrm.sim_dti_chPrm uninitalized, aborting!"); | 
| 
 
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 else | 
| 
 
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 /* alloc primitive */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
963 PALLOC(sim_dti_req,SIM_DTI_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
964 /* reset values */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
965 memset(sim_dti_req,0,sizeof(sim_dti_req)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
966 /* copy dti connection qualifier */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
967 sim_dti_req->dti_conn = simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiConn; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
968 /* set dti direction */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
969 sim_dti_req->dti_direction = SIM_DTI_INVERTED; | 
| 
 
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 if( simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiConn EQ SIM_DTI_CONNECT ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
972 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
973 /* CASE: CONNECT IMMEDIATELY */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
974 /* copy link id */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
975 sim_dti_req->link_id = link_id; | 
| 
 
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 if(satShrdPrm.opchType EQ B_CSD) | 
| 
 
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 /* BEARER: CSD */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
980 /* copy entity_name | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
981 * handle different transport protocols: L2R, RA and UDP */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
982 switch(simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiUnit) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
983 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
984 case DTI_ENTITY_UDP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
985 p_ent_name = &UDP_NAME[0]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
986 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
987 case DTI_ENTITY_TRA: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
988 p_ent_name = &TRA_NAME[0]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
989 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
990 case DTI_ENTITY_L2R: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
991 p_ent_name = &L2R_NAME[0]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
992 break; | 
| 
 
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 sim_dti_req->entity_name = (ULONG)p_ent_name; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
995 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
996 #ifdef GPRS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
997 else if(satShrdPrm.opchType EQ B_GPRS) | 
| 
 
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 /* BEARER: GPRS */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1000 /* copy entity_name | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1001 * handle different transport protocols: L2R, RA and UDP */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1002 switch(simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiUnit) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1003 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1004 case DTI_ENTITY_UDP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1005 p_ent_name = &UDP_NAME[0]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1006 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1007 case DTI_ENTITY_SNDCP: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1008 p_ent_name = &SNDCP_NAME[0]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1009 break; | 
| 
 
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 sim_dti_req->entity_name = (ULONG)p_ent_name; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1012 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1013 #endif /* GPRS */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1014 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1015 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1016 TRACE_EVENT("psaSIM_Dti_Req:error"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1017 } | 
| 
 
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 PSENDX(SIM,sim_dti_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1020 } /* end DTI open channel */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1021 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1022 else if ( simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiConn EQ SIM_DTI_DISCONNECT ) | 
| 
 
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 /* CASE: CLOSE DTI CHANNEL */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1025 /* copy link id */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1026 sim_dti_req->link_id = link_id; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1027 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1028 PSENDX(SIM,sim_dti_req); | 
| 
 
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 else if ( simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiConn EQ SIM_DTI_UNKNOWN) | 
| 
 
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 /* no primitive has to be send, free mem */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1034 PFREE(sim_dti_req); | 
| 
 
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 /* check whether a BIP channel has to be closed */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1037 if( simShrdPrm.sim_dti_chPrm->sat_chn_prm.bipConn | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1038 EQ SIM_BIP_CLOSE_CHANNEL ) | 
| 
 
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 /* No action has to be performed, DTI channel already disconnected by | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1041 * SIM */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1042 TRACE_EVENT("psaSIM_Dti_Req: SIM-DTI channel already disconnected"); | 
| 
 
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 /* inform dti manager about successfull disconnection */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1045 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1046 TRACE_EVENT("psaSIM_Dti_Req: close open BIP channel"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1047 /* send SIM_BIP_REQ to close BIP channel */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1048 psaSIM_Bip_Req(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1049 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1050 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1051 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1052 TRACE_ERROR("psaSIM_Dti_Req: ERROR: Unkown parameter combination"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1053 } | 
| 
 
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 | 
| 
 
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 /* no primitive has to be send, free mem */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1058 PFREE(sim_dti_req); | 
| 
 
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 TRACE_ERROR("psaSIM_Dti_Req: ERROR: Unkown parameter"); | 
| 
 
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 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1063 #endif | 
| 
 
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 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1068 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1069 | ROUTINE : psaSIM_SATBIPChn | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1070 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1071 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1072 PURPOSE : connect/disconnect/suspend/resume of BIP | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1073 (Bearer Independent Protocol) connection for SAT | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1074 (new for SAT_E_PATCH) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1075 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1076 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1077 GLOBAL void psaSIM_SATBIPChn ( T_SIM_SAT_CHN chnInf, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1078 void (*cb)(UBYTE bipConn, UBYTE chnId)) | 
| 
 
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 TRACE_EVENT("psaSIM_SATBIPChn()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1081 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1082 #ifdef UART | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1083 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1084 /* ALLOC shared paramenters for BIP if not yet done */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1085 if(!simShrdPrm.sim_dti_chPrm) | 
| 
 
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 ACI_MALLOC(simShrdPrm.sim_dti_chPrm,sizeof(T_SIM_DTI_CH_PRM)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1088 /* reset parameters */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1089 memset(simShrdPrm.sim_dti_chPrm,0,sizeof(T_SIM_DTI_CH_PRM)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1090 TRACE_EVENT("ALLOC sim_dti_chPrm"); | 
| 
 
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 /* copy bip related parameters */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1094 simShrdPrm.sim_dti_chPrm->sat_chn_prm.bipConn = chnInf.bipConn; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1095 simShrdPrm.sim_dti_chPrm->sat_chn_prm.dtiConn = chnInf.dtiConn; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1096 simShrdPrm.sim_dti_chPrm->sat_chn_prm.chnId = chnInf.chnId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1097 simShrdPrm.sim_dti_chPrm->sat_chn_prm.genRes = chnInf.genRes; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1098 simShrdPrm.sim_dti_chPrm->sat_chn_prm.addRes = chnInf.addRes; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1099 /* callback to process after of BIP connection request */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1100 simShrdPrm.sim_dti_chPrm->bip_cb = cb; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1101 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1102 switch( chnInf.bipConn ) | 
| 
 
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 SIM_BIP_CLOSE_CHANNEL: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1105 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1106 if(chnInf.dtiConn EQ SIM_DTI_DISCONNECT) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1107 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1108 cmhSAT_OpChnClose( chnInf.bipConn, 1 ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1109 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1110 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1111 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1112 if (dti_cntrl_is_dti_channel_connected (DTI_ENTITY_SIM, simShrdPrm.sat_class_e_dti_id) EQ TRUE) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1113 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1114 /* SIM entity has disconnected the dti connection via SIM_DTI_BIP_IND */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1115 if (dti_cntrl_is_dti_channel_connected (DTI_ENTITY_UDP, simShrdPrm.sat_class_e_dti_id) EQ TRUE) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1116 cmhSAT_OpChnClose( chnInf.bipConn, 1 ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1117 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1118 dti_cntrl_close_dpath_from_dti_id(simShrdPrm.sat_class_e_dti_id); | 
| 
 
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 else | 
| 
 
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 /* up to now there was not a dti connection with SIM entity */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1123 psaSIM_Bip_Req(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1124 } | 
| 
 
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 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1127 case SIM_BIP_OPEN_CHANNEL: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1128 case SIM_BIP_CHANNEL_SUSPENDED: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1129 case SIM_BIP_CHANNEL_RESUMED: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1130 psaSIM_Bip_Req(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1131 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1132 default: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1133 TRACE_ERROR("ERROR: psaSIM_SATBIPChn() unknown BIP status"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1134 } /* end of switch */ | 
| 
 
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 /* old behavior: test */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1137 #endif /* UART */ | 
| 
 
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 /* | 
| 
 
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 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1143 | ROUTINE : psaSIM_SATChn | | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1146 PURPOSE : start of DTI connection SIM - UDP,L2R,SNDCP,TRA for CSD | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1147 /GPRS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1148 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1149 SAT E Design: Now only used for SIM DTI connections to SNDCP, L2R and TRA | 
| 
 
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 #ifdef DTI | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1153 GLOBAL void psaSIM_SATChn ( T_SIM_SAT_CHN chnInf, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1154 void (*cb)(UBYTE dtiConn, UBYTE chnId)) | 
| 
 
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 #ifdef GPRS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1157 U8 cid_array[2] = { 0,PDP_CONTEXT_CID_INVALID }; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1158 cid_array[0] = satShrdPrm.chnTb.chnRefId; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1159 #endif | 
| 
 
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 TRACE_EVENT("psaSIM_SATChn"); | 
| 
 
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 if(!simShrdPrm.sim_dti_chPrm) | 
| 
 
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 ACI_MALLOC(simShrdPrm.sim_dti_chPrm,sizeof(T_SIM_DTI_CH_PRM)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1166 TRACE_EVENT("ALLOC sim_dti_chPrm"); | 
| 
 
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 memcpy(&simShrdPrm.sim_dti_chPrm->sat_chn_prm,&chnInf,sizeof(T_SIM_SAT_CHN)); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1169 simShrdPrm.sim_dti_chPrm->dti_cb = cb;/* callback for results of DTI connection -> SatSource */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1170 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1171 if( chnInf.dtiConn EQ SIM_DTI_CONNECT ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1172 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1173 if(psa_search_SATSrcId() >= 0) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1174 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1175 T_DTI_ENTITY_ID entity_list[2]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1176 entity_list[0]= DTI_ENTITY_SIM; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1177 entity_list[1]= (T_DTI_ENTITY_ID)chnInf.dtiUnit; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1178 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1179 if(satShrdPrm.opchType EQ B_CSD) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1180 {/* case immediately connection of SIM entity with L2R or TRA */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1181 /* case on demand connection of SIM entity with L2R or TRA */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1182 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1183 /* create a SAT class E DTI ID if not present */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1184 if ( simShrdPrm.sat_class_e_dti_id EQ DTI_DTI_ID_NOTPRESENT ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1185 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1186 simShrdPrm.sat_class_e_dti_id = dti_cntrl_new_dti(DTI_DTI_ID_NOTPRESENT); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1187 TRACE_EVENT_P1("sat_class_e_dti_id = %d", simShrdPrm.sat_class_e_dti_id); | 
| 
 
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 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1190 /* establish SIM-L2R or SIM-TRA DTI connection */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1191 dti_cntrl_est_dpath( simShrdPrm.sat_class_e_dti_id, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1192 entity_list, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1193 2, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1194 APPEND, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1195 SIM_ENT_CSDconnect_dti_cb); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1196 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1197 #ifdef GPRS | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1198 else if(satShrdPrm.opchType EQ B_GPRS) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1199 {/* case immediately: open and connect bip channel with help of DTI connection between SIM entity and UDP or SNDCP */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1200 /* case on demand: connect bip channel with help of DTI connection between SIM entity and UDP or SNDCP */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1201 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1202 /* create a SAT class E DTI ID if not present */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1203 if ( simShrdPrm.sat_class_e_dti_id EQ DTI_DTI_ID_NOTPRESENT ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1204 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1205 simShrdPrm.sat_class_e_dti_id = dti_cntrl_new_dti(DTI_DTI_ID_NOTPRESENT); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1206 TRACE_EVENT_P1("sat_class_e_dti_id = %d", simShrdPrm.sat_class_e_dti_id); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1207 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1208 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1209 if(chnInf.dtiUnit NEQ DTI_ENTITY_SNDCP) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1210 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1211 dti_cntrl_est_dpath( simShrdPrm.sat_class_e_dti_id, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1212 entity_list, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1213 2, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1214 APPEND, | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1215 SIM_ENT_GPRSconnect_dti_cb); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1216 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1217 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1218 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1219 if(!srcc_reserve_sources( SRCC_SIM_SNDCP_LINK, satShrdPrm.chnTb.chnRefId) OR | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1220 !cmhSM_make_active_cid_list((T_ACI_CMD_SRC)satShrdPrm.opchAcptSrc, cid_array) ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1221 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1222 TRACE_FUNCTION("psaSIM_SATChn: Error cid list "); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1223 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1224 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1225 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1226 set_conn_param_on_working_cid( (UBYTE)smEntStat.entOwn, DTI_ENTITY_SIM ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1227 cmhSM_connect_working_cid(); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1228 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1229 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1230 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1231 #endif | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1232 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1233 else | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1234 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1235 TRACE_ERROR("psaSIM_SATChn: fatal ERROR: SAT source id invalid!"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1236 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1237 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1238 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1239 #endif /* DTI */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1240 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1241 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1242 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1243 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1244 | ROUTINE : psaSIM_EvDatAvail | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1245 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1246 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1247 PURPOSE : processes the SIM_EVENTLIST_REQ primitive to SIM. | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1248 MMI informs about a change of the status of the | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1249 Data available event (because it is part of the SAT event list) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1250 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1251 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1252 GLOBAL void psaSIM_EvDatAvail ( BOOL evStat ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1253 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1254 TRACE_EVENT("psaSIM_EvDatAvail"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1255 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1256 PALLOC(sim_eventlist_req,SIM_EVENTLIST_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1257 switch(evStat) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1258 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1259 case SIM_EVENT_DISABLE: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1260 case SIM_EVENT_ENABLE: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1261 sim_eventlist_req->event_data_avail = evStat; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1262 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1263 default: | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1264 TRACE_EVENT("psaSIM_EvDatAvail:not valid evStat"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1265 break; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1266 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1267 PSENDX(SIM,sim_eventlist_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1268 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1269 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1270 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1271 #endif /* #ifdef FF_SAT_E */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1272 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1273 #ifdef FF_DUAL_SIM | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1274 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1275 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1276 | PROJECT : GSM-PS (6147) MODULE : PSA_SIMS | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1277 | ROUTINE : psaSIM_SelectSIM | | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1278 +-------------------------------------------------------------------+ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1279 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1280 PURPOSE : processes the SIM_ACTIVATE_REQ primitive to SIM to Select the required SIM | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1281 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1282 GLOBAL SHORT psaSIM_SelectSIM ( void ) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1283 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1284 T_SIM_SET_PRM * pPrmSet; /* points to used parameter set */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1285 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1286 TRACE_FUNCTION ("psaSIM_SelectSIM()"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1287 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1288 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1289 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1290 * check owner id | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1291 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1292 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1293 if(!psa_IsVldOwnId(simShrdPrm.owner)) | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1294 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1295 TRACE_EVENT("not a valid owner !!"); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1296 return( -1 ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1297 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1298 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1299 pPrmSet = &simShrdPrm.setPrm[simShrdPrm.owner]; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1300 simShrdPrm.SIM_Selection = TRUE; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1301 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1302 /* | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1303 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1304 * create and send primitive | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1305 *------------------------------------------------------------------- | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1306 */ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1307 { | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1308 PALLOC (sim_activate_req, SIM_ACTIVATE_REQ); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1309 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1310 sim_activate_req->proc = SIM_SELECT; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1311 sim_activate_req->sim_num = pPrmSet->SIM_Selected; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1312 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1313 PSENDX (SIM, sim_activate_req); | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1314 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1315 return 0; | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1316 } | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1317 #endif /*FF_DUAL_SIM*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1318 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1319 | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1320 /*==== EOF ========================================================*/ | 
| 
 
53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1321 | 
