FreeCalypso > hg > fc-magnetite
annotate src/aci2/aci/aci_bat_mm.c @ 125:d5bbfb9649d5
src/aci2/mfw: file renames to make filename case consistent
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Fri, 07 Oct 2016 05:33:56 +0000 | 
| parents | 93999a60b835 | 
| children | 
| rev | line source | 
|---|---|
| 
3
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
1 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
2 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
3 | Project : GSM-F&D (8411) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
4 | Modul : ACI_BAT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
5 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
6 | Copyright 2002 Texas Instruments Berlin, AG | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
7 | All rights reserved. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
8 | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
9 | This file is confidential and a trade secret of Texas | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
10 | Instruments Berlin, AG | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
11 | The receipt of or possession of this file does not convey | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
12 | any rights to reproduce or disclose its contents or to | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
13 | manufacture, use, or sell anything it may describe, in | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
14 | whole, or in part, without the specific written consent of | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
15 | Texas Instruments Berlin, AG. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
16 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
17 | Purpose : This BAT wrapper modul is ... | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
18 | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
19 +----------------------------------------------------------------------------- | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
20 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
21 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
22 #include "aci_all.h" /* includes prim.h, which includes p_bat.h */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
23 #include "aci_cmh.h" /* prototypes of sAT_,qAT_,tAT_ */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
24 #include "aci_bat_cmh.h" /* prototypes of sBAT_,qBAT_,tBAT_ */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
25 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
26 #ifdef FF_ATI_BAT | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
27 #include "typedefs.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
28 #include "gdd.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
29 #include "bat.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
30 #include "aci_bat.h" | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
31 #endif /* FF_ATI_BAT */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
32 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
33 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
34 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
35 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
36 | STATE : code ROUTINE : sBAT_PlusCOPS | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
37 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
38 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
39 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
40 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
41 #undef min | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
42 #define min(a,b) ((a) < (b) ? (a) : (b)) /* from gpf\inc\vcms */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
43 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
44 GLOBAL T_ACI_BAT_RSLT sBAT_PlusCOPS(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
45 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
46 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
47 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
48 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
49 U8 c_oper = cmd->params.ptr_set_plus_cops->c_oper; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
50 CHAR op[MAX_ALPHA_OPER_LEN] = {0}; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
51 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
52 TRACE_FUNCTION ("sBAT_PlusCOPS()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
53 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
54 c_oper = min(c_oper, MAX_ALPHA_OPER_LEN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
55 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
56 if (cmd->params.ptr_set_plus_cops->v_oper EQ TRUE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
57 memcpy(op, cmd->params.ptr_set_plus_cops->oper, c_oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
58 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
59 ret = sAT_PlusCOPS (src_infos_psi->srcId, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
60 cmd->params.ptr_set_plus_cops->mode, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
61 cmd->params.ptr_set_plus_cops->format, op); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
62 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
63 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
64 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
65 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
66 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
67 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
68 | STATE : code ROUTINE : qBAT_PlusCOPS | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
69 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
70 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
71 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
72 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
73 GLOBAL T_ACI_BAT_RSLT qBAT_PlusCOPS(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
74 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
75 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
76 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
77 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
78 CHAR op[MAX_ALPHA_OPER_LEN] = {0}; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
79 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
80 T_ACI_COPS_MOD mode = COPS_MOD_NotPresent; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
81 T_ACI_COPS_FRMT format = COPS_FRMT_NotPresent; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
82 T_BAT_cmd_response resp; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
83 T_BAT_res_que_plus_cops cops; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
84 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
85 TRACE_FUNCTION ("qBAT_PlusCOPS()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
86 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
87 resp.ctrl_response = BAT_RES_QUE_PLUS_COPS; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
88 resp.response.ptr_que_plus_cops = &cops; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
89 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
90 ret = qAT_PlusCOPS(src_infos_psi->srcId, &mode, &format, op); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
91 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
92 cops.mode = mode; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
93 cops.format = format; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
94 cops.c_oper = strlen(op); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
95 cops.v_oper = cops.c_oper ? TRUE : FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
96 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
97 if (cops.v_oper) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
98 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
99 memcpy(cops.oper, op, cops.c_oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
100 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
101 aci_bat_send(src_infos_psi, &resp); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
102 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
103 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
104 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
105 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
106 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
107 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
108 | STATE : code ROUTINE : tBAT_PlusCOPS | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
109 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
110 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
111 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
112 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
113 GLOBAL T_ACI_BAT_RSLT tBAT_PlusCOPS(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
114 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
115 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
116 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
117 T_ACI_COPS_LST operLst; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
118 T_BAT_cmd_response resp = {0}; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
119 T_BAT_res_tst_plus_cops *pTPC = resp.response.ptr_tst_plus_cops; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
120 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
121 SHORT startIdx = 0, lastIdx = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
122 BOOL END_OF_LIST = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
123 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
124 TRACE_FUNCTION ("tBAT_PlusCOPS()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
125 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
126 resp.ctrl_response = BAT_RES_TST_PERCENT_COPS; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
127 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
128 do | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
129 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
130 int i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
131 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
132 startIdx += lastIdx; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
133 ret = tAT_PlusCOPS(src_infos_psi->srcId, startIdx, &lastIdx, &operLst[0]); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
134 if (ret NEQ ACI_BAT_CMPL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
135 return (ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
136 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
137 for (i = 0; i < lastIdx; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
138 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
139 if ((operLst[i].status EQ COPS_STAT_NotPresent) AND (*operLst[i].numOper EQ 0)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
140 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
141 END_OF_LIST = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
142 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
143 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
144 /* Fill BAT resp structs */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
145 pTPC->status = operLst[i].status; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
146 pTPC->c_short_oper = strlen(operLst[i].shortOper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
147 pTPC->c_long_oper = strlen(operLst[i].longOper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
148 pTPC->c_num_oper = strlen(operLst[i].numOper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
149 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
150 /* Check if there is long operator name, set valid flag and store it. */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
151 if(pTPC->c_long_oper) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
152 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
153 pTPC->v_long_oper = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
154 strncpy((CHAR*)pTPC->long_oper, operLst[i].longOper, pTPC->c_long_oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
155 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
156 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
157 /* Check if there is short operator name, set valid flag and store it. */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
158 if(pTPC->c_short_oper) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
159 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
160 pTPC->v_short_oper = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
161 strncpy((CHAR*)pTPC->short_oper, operLst[i].shortOper, pTPC->c_short_oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
162 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
163 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
164 /* Check if there is num operator name, set valid flag and store it. */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
165 if(pTPC->c_num_oper) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
166 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
167 pTPC->v_num_oper = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
168 strncpy((CHAR*)pTPC->num_oper, operLst[i].numOper, pTPC->c_num_oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
169 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
170 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
171 aci_bat_send(src_infos_psi, &resp); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
172 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
173 return (ACI_BAT_CMPL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
174 } while(!END_OF_LIST); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
175 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
176 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
177 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
178 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
179 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
180 | STATE : code ROUTINE : sBAT_PercentCOPS | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
181 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
182 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
183 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
184 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
185 GLOBAL T_ACI_BAT_RSLT sBAT_PercentCOPS(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
186 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
187 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
188 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
189 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
190 U8 c_oper = cmd->params.ptr_set_percent_cops->c_oper; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
191 CHAR op[MAX_ALPHA_OPER_LEN] = {0}; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
192 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
193 TRACE_FUNCTION ("sBAT_PercentCOPS()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
194 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
195 c_oper = min(c_oper, MAX_ALPHA_OPER_LEN); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
196 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
197 if (cmd->params.ptr_set_percent_cops->v_oper EQ TRUE) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
198 memcpy(op, cmd->params.ptr_set_percent_cops->oper, c_oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
199 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
200 ret = sAT_PercentCOPS (src_infos_psi->srcId, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
201 cmd->params.ptr_set_percent_cops->mode, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
202 cmd->params.ptr_set_percent_cops->format, op); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
203 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
204 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
205 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
206 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
207 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
208 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
209 | STATE : code ROUTINE : tBAT_PercentCOPS | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
210 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
211 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
212 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
213 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
214 GLOBAL T_ACI_BAT_RSLT tBAT_PercentCOPS(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
215 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
216 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
217 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
218 T_ACI_COPS_LST operLst; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
219 T_BAT_cmd_response resp = {0}; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
220 T_BAT_res_tst_percent_cops *pTPC = resp.response.ptr_tst_percent_cops; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
221 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
222 SHORT startIdx = 0, lastIdx = 0; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
223 BOOL END_OF_LIST = FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
224 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
225 TRACE_FUNCTION ("tBAT_PercentCOPS()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
226 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
227 resp.ctrl_response = BAT_RES_TST_PERCENT_COPS; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
228 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
229 do | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
230 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
231 int i; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
232 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
233 startIdx += lastIdx; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
234 ret = tAT_PlusCOPS(src_infos_psi->srcId, startIdx, &lastIdx, &operLst[0]); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
235 if (ret NEQ ACI_BAT_CMPL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
236 return (ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
237 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
238 for (i = 0; i < lastIdx; i++) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
239 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
240 if ((operLst[i].status EQ COPS_STAT_NotPresent) AND (*operLst[i].numOper EQ 0)) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
241 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
242 END_OF_LIST = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
243 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
244 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
245 /* Fill BAT resp structs */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
246 pTPC->status = operLst[i].status; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
247 pTPC->c_short_oper = strlen(operLst[i].shortOper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
248 pTPC->c_long_oper = strlen(operLst[i].longOper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
249 pTPC->c_num_oper = strlen(operLst[i].numOper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
250 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
251 /* Check if there is long operator name, set valid flag and store it. */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
252 if(pTPC->c_long_oper) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
253 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
254 pTPC->v_long_oper = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
255 strncpy((CHAR*)pTPC->long_oper, operLst[i].longOper, pTPC->c_long_oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
256 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
257 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
258 /* Check if there is short operator name, set valid flag and store it. */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
259 if(pTPC->c_short_oper) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
260 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
261 pTPC->v_short_oper = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
262 strncpy((CHAR*)pTPC->short_oper, operLst[i].shortOper, pTPC->c_short_oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
263 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
264 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
265 /* Check if there is num operator name, set valid flag and store it. */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
266 if(pTPC->c_num_oper) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
267 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
268 pTPC->v_num_oper = TRUE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
269 strncpy((CHAR*)pTPC->num_oper, operLst[i].numOper, pTPC->c_num_oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
270 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
271 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
272 aci_bat_send(src_infos_psi, &resp); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
273 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
274 return (ACI_BAT_CMPL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
275 } while(!END_OF_LIST); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
276 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
277 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
278 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
279 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
280 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
281 | STATE : code ROUTINE : qBAT_PercentCOPS | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
282 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
283 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
284 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
285 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
286 GLOBAL T_ACI_BAT_RSLT qBAT_PercentCOPS(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
287 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
288 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
289 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
290 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
291 CHAR op[MAX_ALPHA_OPER_LEN] = {0}; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
292 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
293 T_ACI_COPS_MOD mode = COPS_MOD_NotPresent; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
294 T_ACI_COPS_FRMT format = COPS_FRMT_NotPresent; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
295 T_ACI_COPS_SVST svrStatus = COPS_SVST_NotPresent; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
296 T_BAT_cmd_response resp; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
297 T_BAT_res_que_percent_cops cops; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
298 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
299 TRACE_FUNCTION ("qBAT_PercentCOPS()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
300 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
301 resp.ctrl_response = BAT_RES_QUE_PERCENT_COPS; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
302 resp.response.ptr_que_percent_cops = &cops; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
303 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
304 ret = qAT_PercentCOPS(src_infos_psi->srcId, &mode, &format, &svrStatus, op); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
305 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
306 cops.mode = mode; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
307 cops.format = format; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
308 cops.service = svrStatus; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
309 cops.c_oper = strlen(op); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
310 cops.v_oper = cops.c_oper ? TRUE : FALSE; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
311 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
312 if (cops.v_oper) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
313 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
314 memcpy(cops.oper, op, cops.c_oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
315 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
316 aci_bat_send(src_infos_psi, &resp); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
317 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
318 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
319 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
320 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
321 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
322 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
323 | STATE : code ROUTINE : qBAT_PercentCREG | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
324 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
325 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
326 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
327 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
328 GLOBAL T_ACI_BAT_RSLT qBAT_PercentCREG(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
329 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
330 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
331 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
332 T_BAT_cmd_response resp; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
333 T_BAT_res_que_percent_creg creg; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
334 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
335 TRACE_FUNCTION ("qBAT_PercentCREG()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
336 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
337 resp.ctrl_response = BAT_RES_QUE_PERCENT_CREG; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
338 resp.response.ptr_que_percent_creg = &creg; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
339 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
340 ret = qAT_PercentCREG(src_infos_psi->srcId, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
341 (T_ACI_CREG_STAT*)&creg.stat, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
342 (USHORT*)&creg.lac, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
343 (USHORT*)&creg.ci, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
344 (T_ACI_P_CREG_GPRS_IND*)&creg.gprs_ind); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
345 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
346 aci_bat_send(src_infos_psi, &resp); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
347 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
348 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
349 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
350 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
351 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
352 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
353 | STATE : code ROUTINE : sBAT_PlusWS46 | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
354 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
355 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
356 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
357 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
358 GLOBAL T_ACI_BAT_RSLT sBAT_PlusWS46(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
359 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
360 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
361 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
362 T_BAT_plus_ws46_n mode = cmd->params.ptr_set_plus_ws46->n; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
363 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
364 TRACE_FUNCTION ("sBAT_PlusWS46()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
365 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
366 ret = sAT_PlusWS46(src_infos_psi->srcId, mode); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
367 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
368 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
369 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
370 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
371 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
372 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
373 | STATE : code ROUTINE : qBAT_PlusWS46 | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
374 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
375 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
376 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
377 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
378 GLOBAL T_ACI_BAT_RSLT qBAT_PlusWS46(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
379 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
380 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
381 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
382 T_BAT_cmd_response resp; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
383 T_BAT_res_que_plus_ws46 ws46; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
384 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
385 TRACE_FUNCTION ("qBAT_PlusWS46()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
386 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
387 resp.ctrl_response = BAT_RES_QUE_PLUS_WS46; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
388 resp.response.ptr_que_plus_ws46 = &ws46; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
389 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
390 ret = qAT_PlusWS46(src_infos_psi->srcId, (T_ACI_WS46_MOD *)&ws46.n); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
391 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
392 aci_bat_send(src_infos_psi, &resp); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
393 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
394 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
395 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
396 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
397 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
398 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
399 | STATE : code ROUTINE : sBAT_PercentCHPL | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
400 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
401 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
402 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
403 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
404 GLOBAL T_ACI_BAT_RSLT sBAT_PercentCHPL(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
405 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
406 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
407 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
408 T_ACI_OPER_NTRY oper; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
409 UBYTE len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
410 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
411 TRACE_FUNCTION ("sBAT_PercentCHPL()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
412 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
413 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
414 * Call the corresponding ACI function. T_ACI_BAT_RSLT is | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
415 * assumed to be equivalent to T_ACI_RESULT. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
416 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
417 ret=(T_ACI_BAT_RSLT)sAT_PercentCHPL(src_infos_psi->srcId,&oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
418 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
419 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
420 * If the command completes, we must send a response. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
421 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
422 if (ret==ACI_BAT_CMPL) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
423 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
424 T_BAT_cmd_response resp; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
425 T_BAT_res_set_percent_chpl chpl_data; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
426 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
427 resp.ctrl_response=BAT_RES_SET_PERCENT_CHPL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
428 resp.response.ptr_set_percent_chpl=&chpl_data; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
429 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
430 chpl_data.type=BAT_P_CHPL_TYPE_FROM_IMS; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
431 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
432 switch (cmd->params.ptr_set_percent_chpl->oprfrmt) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
433 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
434 case BAT_P_CHPL_OPRFRMT_LONG: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
435 len=strlen(oper.longName); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
436 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
437 if (len<=BAT_MAX_CHPL_OPER_LEN) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
438 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
439 memcpy(chpl_data.oper,oper.longName,len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
440 chpl_data.c_oper=(U8)len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
441 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
442 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
443 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
444 return(ACI_BAT_FAIL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
445 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
446 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
447 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
448 case BAT_P_CHPL_OPRFRMT_SHORT: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
449 len=strlen(oper.shrtName); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
450 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
451 if (len<=BAT_MAX_CHPL_OPER_LEN) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
452 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
453 memcpy(chpl_data.oper,oper.shrtName,len); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
454 chpl_data.c_oper=(U8)len; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
455 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
456 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
457 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
458 return(ACI_BAT_FAIL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
459 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
460 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
461 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
462 case BAT_P_CHPL_OPRFRMT_NUMERIC: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
463 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
464 * Representation of the numeric format as in the ATI. | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
465 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
466 if ((oper.mnc & 0x00F)==0xF) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
467 sprintf((char *)chpl_data.oper, "%03x,%02x",oper.mcc, oper.mnc >> 4); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
468 else | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
469 sprintf((char *)chpl_data.oper, "%03x,%03x",oper.mcc, oper.mnc); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
470 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
471 chpl_data.c_oper=(U8)strlen((char *)chpl_data.oper); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
472 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
473 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
474 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
475 return(ACI_BAT_FAIL); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
476 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
477 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
478 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
479 aci_bat_send(src_infos_psi,&resp); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
480 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
481 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
482 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
483 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
484 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
485 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
486 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
487 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
488 | STATE : code ROUTINE : sBAT_PlusCTZU | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
489 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
490 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
491 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
492 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
493 GLOBAL T_ACI_BAT_RSLT sBAT_PlusCTZU(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
494 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
495 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
496 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
497 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
498 TRACE_FUNCTION ("sBAT_PlusCTZU()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
499 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
500 ret = sAT_PlusCTZU (src_infos_psi->srcId, cmd->params.ptr_set_plus_ctzu->onoff); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
501 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
502 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
503 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
504 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
505 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
506 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
507 | STATE : code ROUTINE : qBAT_PlusCTZU | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
508 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
509 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
510 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
511 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
512 GLOBAL T_ACI_BAT_RSLT qBAT_PlusCTZU(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
513 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
514 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
515 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
516 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
517 T_BAT_cmd_response resp; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
518 T_BAT_res_que_plus_ctzu ctzu; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
519 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
520 TRACE_FUNCTION ("qBAT_PlusCTZU()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
521 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
522 resp.ctrl_response = BAT_RES_QUE_PLUS_CTZU; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
523 resp.response.ptr_que_plus_ctzu = &ctzu; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
524 ret = qAT_PlusCTZU(src_infos_psi->srcId, (T_ACI_CTZU_MODE*)&ctzu.onoff); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
525 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
526 aci_bat_send(src_infos_psi, &resp); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
527 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
528 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
529 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
530 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
531 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
532 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
533 | STATE : code ROUTINE : sBAT_PercentCWUP | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
534 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
535 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
536 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
537 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
538 GLOBAL T_ACI_BAT_RSLT sBAT_PercentCWUP(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
539 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
540 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
541 T_ACI_BAT_RSLT ret = ACI_BAT_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
542 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
543 TRACE_FUNCTION ("sBAT_PercentCWUP()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
544 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
545 ret = sAT_PercentCWUP (src_infos_psi->srcId, cmd->params.ptr_set_percent_cwup->type); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
546 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
547 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
548 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
549 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
550 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
551 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
552 | STATE : code ROUTINE : sBAT_PercentCTZV | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
553 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
554 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
555 PURPOSE : %CTZV command mode (time and date report) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
556 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
557 GLOBAL T_ACI_BAT_RSLT sBAT_PercentCTZV (T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
558 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
559 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
560 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
561 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
562 TRACE_FUNCTION ("sBAT_PercentCTZV()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
563 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
564 ret = sAT_PercentCTZV (src_infos_psi->srcId, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
565 (T_ACI_PCTZV_MODE)cmd->params.ptr_set_percent_ctzv->mode); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
566 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
567 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
568 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
569 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
570 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
571 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
572 | STATE : code ROUTINE : sBAT_PlusCIND | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
573 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
574 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
575 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
576 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
577 GLOBAL T_ACI_BAT_RSLT sBAT_PlusCIND(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
578 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
579 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
580 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
581 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
582 TRACE_FUNCTION ("sBAT_PlusCIND()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
583 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
584 ret = sAT_PlusCIND( src_infos_psi->srcId, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
585 cmd->params.ptr_set_plus_cind->signal_ctrl, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
586 cmd->params.ptr_set_plus_cind->smsfull_ctrl); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
587 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
588 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
589 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
590 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
591 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
592 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
593 | STATE : code ROUTINE : qBAT_PlusCIND | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
594 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
595 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
596 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
597 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
598 GLOBAL T_ACI_BAT_RSLT qBAT_PlusCIND(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
599 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
600 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
601 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
602 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
603 T_BAT_cmd_response resp; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
604 T_BAT_res_que_plus_cind cind; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
605 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
606 TRACE_FUNCTION ("qBAT_PlusCIND()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
607 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
608 resp.ctrl_response = BAT_RES_QUE_PLUS_CIND; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
609 resp.response.ptr_que_plus_cind = &cind; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
610 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
611 ret = qAT_PlusCIND(src_infos_psi->srcId, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
612 (T_ACI_CIND_SIGNAL_TYPE*)&cind.signal, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
613 (T_ACI_CIND_SMSFULL_TYPE*)&cind.smsfull); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
614 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
615 aci_bat_send(src_infos_psi, &resp); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
616 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
617 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
618 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
619 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
620 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
621 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
622 | STATE : code ROUTINE : sBAT_PlusCMER | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
623 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
624 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
625 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
626 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
627 GLOBAL T_ACI_BAT_RSLT sBAT_PlusCMER(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
628 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
629 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
630 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
631 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
632 T_ACI_CMER_MODE_TYPE sCmerModeSettings = CMER_MODE_INVALID; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
633 T_ACI_CMER_IND_TYPE sCmerIndicationSettings = CMER_INDICATOR_INVALID; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
634 T_ACI_CMER_BFR_TYPE sCmerBfrSettings = CMER_BFR_INVALID; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
635 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
636 TRACE_FUNCTION ("sBAT_PlusCMER()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
637 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
638 switch (cmd->params.ptr_set_plus_cmer->ind_option) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
639 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
640 case BAT_CMER_IND_OPTION_LOWER: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
641 ret = sAT_PlusCMER(src_infos_psi->srcId, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
642 sCmerModeSettings, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
643 sCmerIndicationSettings, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
644 sCmerBfrSettings); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
645 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
646 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
647 case BAT_CMER_IND_OPTION_GREATER_EQUAL: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
648 ret = sAT_PlusCMER(src_infos_psi->srcId, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
649 sCmerModeSettings, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
650 sCmerIndicationSettings, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
651 sCmerBfrSettings); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
652 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
653 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
654 case BAT_CMER_IND_OPTION_NOT_PRESENT: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
655 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
656 return ACI_BAT_FAIL; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
657 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
658 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
659 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
660 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
661 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
662 /* | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
663 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
664 | PROJECT : GSM-F&D (8411) MODULE : ACI_BAT | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
665 | STATE : code ROUTINE : qBAT_PlusCMER | | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
666 +--------------------------------------------------------------------+ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
667 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
668 PURPOSE : | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
669 */ | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
670 GLOBAL T_ACI_BAT_RSLT qBAT_PlusCMER(T_ACI_DTI_PRC_PSI *src_infos_psi, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
671 T_BAT_cmd_send *cmd) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
672 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
673 T_ACI_BAT_RSLT ret; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
674 T_BAT_cmd_response resp; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
675 T_BAT_res_que_plus_cmer cmer; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
676 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
677 T_ACI_CMER_MODE_TYPE sCmerModeSettings; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
678 T_ACI_CMER_IND_TYPE sCmerIndicationSettings; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
679 T_ACI_CMER_BFR_TYPE sCmerBfrSettings; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
680 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
681 TRACE_FUNCTION ("qBAT_PlusCMER()"); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
682 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
683 resp.ctrl_response = BAT_RES_QUE_PLUS_CMER; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
684 resp.response.ptr_que_plus_cmer = &cmer; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
685 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
686 ret = qAT_PlusCMER(src_infos_psi->srcId, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
687 &sCmerModeSettings, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
688 &sCmerIndicationSettings, | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
689 &sCmerBfrSettings); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
690 | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
691 switch (cmd->params.ptr_que_plus_cmer->bat_dummy) | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
692 { | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
693 default: | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
694 break; | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
695 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
696 aci_bat_send(src_infos_psi, &resp); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
697 return(ret); | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
698 } | 
| 
 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 
Mychaela Falconia <falcon@freecalypso.org> 
parents:  
diff
changeset
 | 
699 | 
