1
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
1 /*
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
2 +-----------------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
3 | Project : GSM-PS (6147)
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
4 | Modul : CMH_L2RQ
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
5 +-----------------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
6 | Copyright 2002 Texas Instruments Berlin, AG
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
7 | All rights reserved.
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
8 |
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
9 | This file is confidential and a trade secret of Texas
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
10 | Instruments Berlin, AG
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
11 | The receipt of or possession of this file does not convey
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
12 | any rights to reproduce or disclose its contents or to
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
13 | manufacture, use, or sell anything it may describe, in
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
14 | whole, or in part, without the specific written consent of
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
15 | Texas Instruments Berlin, AG.
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
16 +-----------------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
17 | Purpose : This module provides the query functions related to the
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
18 | protocol stack adapter for L2R.
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
19 +-----------------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
20 */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
21
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
22 #ifndef CMH_L2RQ_C
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
23 #define CMH_L2RQ_C
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
24 #endif
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
25
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
26 #include "aci_all.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
27
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
28 /*==== INCLUDES ===================================================*/
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
29 #include "aci_cmh.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
30 #include "ati_cmd.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
31 #include "aci_cmd.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
32 #include "dti.h" /* functionality of the dti library */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
33
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
34 #ifdef FAX_AND_DATA
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
35 #include "aci_fd.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
36 #endif /* of #ifdef FAX_AND_DATA */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
37
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
38 #include "dti_conn_mng.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
39
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
40 #include "cmh_ra.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
41 #include "psa.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
42 #include "psa_l2r.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
43 #include "cmh.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
44 #include "cmh_l2r.h"
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
45
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
46 /*==== CONSTANTS ==================================================*/
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
47
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
48 /*==== EXPORT =====================================================*/
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
49
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
50 /*==== VARIABLES ==================================================*/
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
51
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
52 /*==== FUNCTIONS ==================================================*/
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
53
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
54 /*
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
55 +--------------------------------------------------------------------+
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
56 | PROJECT : GSM-PS (6147) MODULE : CMH_L2RQ |
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
57 | STATE : code ROUTINE : qAT_PlusCRLP |
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
58 +--------------------------------------------------------------------+
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
59
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
60 PURPOSE : This is the functional counterpart to the +CRLP? AT command
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
61 which returns the current setting of iws, mws, t1 and
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
62 n2.
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
63
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
64 <iws>: IWF to MS window size.
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
65 <mws>: MS to IWF window size
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
66 <t1> : acknowledge timer
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
67 <n2> : retransmission attemps
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
68 */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
69
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
70 GLOBAL T_ACI_RETURN qAT_PlusCRLP ( T_ACI_CMD_SRC srcId,
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
71 SHORT* iws, SHORT* mws,
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
72 SHORT* t1, SHORT* n2 )
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
73 {
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
74 T_L2R_CMD_PRM * pL2RCmdPrm; /* points to L2R command parameters */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
75
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
76 TRACE_FUNCTION ("qAT_PlusCRLP()");
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
77
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
78 /*
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
79 *-------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
80 * check command source
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
81 *-------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
82 */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
83 if(!cmh_IsVldCmdSrc (srcId))
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
84 {
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
85 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter );
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
86 return( AT_FAIL );
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
87 }
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
88
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
89 pL2RCmdPrm = &fnd_cmhPrm[srcId].l2rCmdPrm;
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
90
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
91 /*
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
92 *-------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
93 * fill in parameters
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
94 *-------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
95 */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
96 *iws = pL2RCmdPrm -> CRLPiws;
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
97 *mws = pL2RCmdPrm -> CRLPmws;
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
98 *t1 = pL2RCmdPrm -> CRLPt1;
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
99 *n2 = pL2RCmdPrm -> CRLPn2;
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
100
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
101
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
102 return( AT_CMPL );
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
103 }
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
104
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
105 /*
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
106 +--------------------------------------------------------------------+
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
107 | PROJECT : GSM-PS (6147) MODULE : CMH_L2RQ |
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
108 | STATE : code ROUTINE : qAT_PlusDS |
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
109 +--------------------------------------------------------------------+
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
110
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
111 PURPOSE : This is the functional counterpart to the +DS? AT command
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
112 which returns the current setting of dir, comp, maxDict
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
113 and maxStr.
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
114
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
115 <dir> : desired direction of data compression.
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
116 <comp> : mode of continue
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
117 <maxDict> : maximum number of dictionary entries
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
118 <maxStr> : maximum string length
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
119 */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
120
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
121 GLOBAL T_ACI_RETURN qAT_PlusDS ( T_ACI_CMD_SRC srcId,
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
122 T_ACI_DS_DIR* dir,
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
123 T_ACI_DS_COMP* comp,
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
124 LONG* maxDict,
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
125 SHORT* maxStr )
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
126 {
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
127 T_L2R_CMD_PRM * pL2RCmdPrm; /* points to L2R command parameters */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
128
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
129 TRACE_FUNCTION ("qAT_PlusDS()");
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
130
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
131 /*
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
132 *-------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
133 * check command source
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
134 *-------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
135 */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
136 if(!cmh_IsVldCmdSrc (srcId))
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
137 {
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
138 ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter );
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
139 return( AT_FAIL );
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
140 }
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
141
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
142 pL2RCmdPrm = &fnd_cmhPrm[srcId].l2rCmdPrm;
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
143
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
144 /*
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
145 *-------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
146 * fill in parameters
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
147 *-------------------------------------------------------------------
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
148 */
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
149 *dir = pL2RCmdPrm -> DSdir;
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
150 *comp = pL2RCmdPrm -> DScomp;
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
151 *maxDict = pL2RCmdPrm -> DSmaxDict;
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
152 *maxStr = pL2RCmdPrm -> DSmaxStr;
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
153
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
154
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
155 return( AT_CMPL );
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
156 }
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
157
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
158
|
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
159 /*==== EOF ========================================================*/
|