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_RAS
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 set functions related to the
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 18 | protocol stack adapter for RA.
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_RAS_C
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 23 #define CMH_RAS_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 /*==== INCLUDES ===================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 28 #include "aci_cmh.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 29 #include "ati_cmd.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 30 #include "aci_cmd.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 31
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 32 #ifdef FAX_AND_DATA
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 33 #include "aci_fd.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 34 #endif
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 35
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 36 #include "aci_io.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 37
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 38 #include "psa.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 39 #include "psa_ra.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 40 #include "psa_cc.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 41 #include "cmh.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 42 #include "cmh_ra.h"
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 43
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 44 /*==== CONSTANTS ==================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 45
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 46 /*==== EXPORT =====================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 47
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 48 /*==== VARIABLES ==================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 49
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 50 /*==== FUNCTIONS ==================================================*/
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 51
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 52 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 53 +-------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 54 | PROJECT : GSM-PS (6147) MODULE : CMH_RAS |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 55 | ROUTINE : cmhRA_Activate |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 56 +-------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 57
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 58 PURPOSE : set all nescessary parameters and activate RA
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 59
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 60 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 61
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 62 GLOBAL T_ACI_RETURN cmhRA_Activate ( T_ACI_CMD_SRC srcId,
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 63 T_ACI_AT_CMD cmdId,
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 64 SHORT cId )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 65 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 66 T_RA_SET_PRM * pRASetPrm; /* points to RA parameter set */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 67 UBYTE prmTst; /* for parameter testing */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 68
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 69 TRACE_FUNCTION ("cmhRA_Activate()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 70
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 71 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 72 *-------------------------------------------------------------------
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 73 * check command source
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 74 *-------------------------------------------------------------------
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 75 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 76 if(!cmh_IsVldCmdSrc (srcId))
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 77
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 78 return( AT_FAIL );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 79
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 80 pRASetPrm = &raShrdPrm.set_prm[srcId];
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 *-------------------------------------------------------------------
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 84 * check entity status
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 85 *-------------------------------------------------------------------
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 86 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 87 if( raEntStat.curCmd NEQ AT_CMD_NONE )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 88
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 89 return( AT_BUSY );
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 activate 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 pRASetPrm -> model = prmTst = cmhRA_SelTrfProt( cId );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 97 if( prmTst EQ NOT_PRESENT_8BIT ) return( AT_FAIL );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 98
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 99 pRASetPrm -> tra_rate = prmTst = (UBYTE)cmhRA_SelChnRate();
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 100 if( prmTst EQ NOT_PRESENT_8BIT ) return( AT_FAIL );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 101
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 102 pRASetPrm -> user_rate = prmTst = cmhRA_SelUsrRate( cId );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 103 if( prmTst EQ NOT_PRESENT_8BIT ) return( AT_FAIL );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 104
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 105 pRASetPrm -> ndb = prmTst = cmhRA_SelDataBits( cId );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 106 if( prmTst EQ NOT_PRESENT_8BIT ) return( AT_FAIL );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 107
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 108 pRASetPrm -> nsb = prmTst = cmhRA_SelStopBits( cId );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 109 if( prmTst EQ NOT_PRESENT_8BIT ) return( AT_FAIL );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 110
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 111 #ifdef FF_FAX
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 112 pRASetPrm -> bitord = prmTst = cmhRA_SelBitOrder( srcId );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 113 if( prmTst EQ NOT_PRESENT_8BIT ) return( AT_FAIL );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 114 #endif
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 115
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 116 raShrdPrm.cId = cId;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 117 raEntStat.curCmd = cmdId;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 118 raShrdPrm.owner = (UBYTE)srcId;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 119 raEntStat.entOwn = srcId;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 120
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 121 psaRA_Activate();
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 122
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 123 return( AT_EXCT );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 124
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 125 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 126
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 127 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 128 +-------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 129 | PROJECT : GSM-PS (6147) MODULE : CMH_RA |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 130 | ROUTINE : cmhRA_Deactivate |
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 PURPOSE : set all nescessary parameters and deactivate RA
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
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 137 GLOBAL T_ACI_RETURN cmhRA_Deactivate ( void )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 138 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 139 TRACE_FUNCTION ("cmhRA_Deactivate()");
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 /* deactivate */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 143 psaRA_Deactivate();
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 144 return( AT_EXCT );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 145 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 146
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 | PROJECT : GSM-PS (6147) MODULE : CMH_RA |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 150 | ROUTINE : cmhRA_Modify |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 151 +-------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 152
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 153 PURPOSE : set all nescessary parameters and modify RA
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 154
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 155 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 156
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 157 GLOBAL T_ACI_RETURN cmhRA_Modify ( T_ACI_CMD_SRC srcId,
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 158 SHORT cId )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 159 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 160 T_RA_SET_PRM * pRASetPrm; /* points to RA parameter set */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 161 UBYTE prmTst; /* for parameter testing */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 162
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 163 TRACE_FUNCTION ("cmhRA_Modify()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 164
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 165 /* check command source */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 166 if(!cmh_IsVldCmdSrc (srcId))
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 167 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 168 return( AT_FAIL );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 169 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 170
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 171 pRASetPrm = &raShrdPrm.set_prm[srcId];
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 172
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 173
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 174 pRASetPrm -> tra_rate = prmTst = (UBYTE)cmhRA_SelChnRate();
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 175 if( prmTst EQ NOT_PRESENT_8BIT ) return( AT_FAIL );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 176
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 177 pRASetPrm -> user_rate = prmTst = cmhRA_SelUsrRate( cId );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 178 if( prmTst EQ NOT_PRESENT_8BIT ) return( AT_FAIL );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 179
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 180 /* modify */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 181 raShrdPrm.owner = srcId;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 182 psaRA_Modify();
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 183 return( AT_EXCT );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 184 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 185
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 186 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 187 +-------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 188 | PROJECT : GSM-PS (6147) MODULE : CMH_RAR |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 189 | ROUTINE : cmhRA_Escape |
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 190 +-------------------------------------------------------------------+
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 191
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 192 PURPOSE : Escape from data mode
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 193
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 194 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 195
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 196 GLOBAL T_ACI_RETURN cmhRA_Escape ( void )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 197 {
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 198 T_OWN calOwn;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 199
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 200 TRACE_FUNCTION ("cmhRA_Escape()");
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 201
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 202 /*
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 203 *-------------------------------------------------------------------
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 204 * return to command mode
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 205 *-------------------------------------------------------------------
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 206 */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 207 /* io_setIoMode( IO_MODE_CMD, rCI_IoMode ); */
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 208
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 209 if (ccShrdPrm.ctb[raShrdPrm.cId] NEQ NULL)
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 210 calOwn = psaCC_ctb(raShrdPrm.cId)->calOwn;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 211 else
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 212 calOwn = (T_OWN)CMD_SRC_NONE;
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 213
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 214 R_AT( RAT_OK, (T_ACI_CMD_SRC)calOwn )
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 215 ( AT_CMD_NONE );
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 216
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 217 return(AT_CMPL);
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 218 }
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 219
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
+ − 220 /*==== EOF ========================================================*/