FreeCalypso > hg > fc-magnetite
annotate src/aci2/ati_ext/ati_ext_mech.c @ 488:ff91db8c9eb8
OSL: os_com_fl.c compiles
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Fri, 22 Jun 2018 06:38:03 +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 : | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 4 | Modul : J:\g23m-aci\aci_ext\ati_ext_mech.c | 
| 
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 is the implementation of the AT command extension mechanism. Customers | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 18 | can implement their own handling of extension AT comannds here. | 
| 
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 #ifndef ATI_EXT_MECH_C | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 22 #define ATI_EXT_MECH_C | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 23 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 24 #include "aci_all.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 25 #include "aci_cmh.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 26 #include "ati_cmd.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 27 #include "aci_cmd.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 28 #include "aci_lst.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 29 #include "ati_int.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 30 #include "ati_ext_mech.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 31 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 32 #ifdef FF_BAT | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 33 #include "aci_bat_ext.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 34 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 35 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 36 | 
| 
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 /*==== CONSTANTS ==================================================*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 39 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 40 #define EXT_ATD "EXT: D, I" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 41 #define EXT_ATCFUN "EXT: +CFUN, I" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 42 #define EXT_ATCOPS_START "EXT: +COPS, I" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 43 #define EXT_ATCOPS_STOP "EXT: +COPS, O" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 44 #define EXT_ENTER "EXT: I" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 45 #define EXT_LEAVE "EXT: O" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 46 #define EXT_UNEXPCTD "EXT: E" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 47 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 48 #define EXT_DIAL_VOICE_PASS "DVCP" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 49 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 50 #define EXT_MAX_BUF_LEN 41 | 
| 
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 #define EXT_VOICE_DELIMITER ';' | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 55 /*==== EXTERNALS ======================================================*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 56 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 57 /*==== LOCALS =========================================================*/ | 
| 
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 /*==== EXPORT ======================================================*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 60 EXTERN UBYTE src_id_ext; /* this source runs currently an extension command */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 61 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 62 /*==== TYPES ======================================================*/ | 
| 
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 #ifndef WIN32 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 65 extern USHORT IQ_GetBuild(void); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 66 #ifndef ALR | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 67 extern USHORT IQ_GetPoleStarVersion(void); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 68 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 69 extern USHORT IQ_GetJtagId(void); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 70 extern USHORT IQ_GetRevision(void); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 71 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 72 #endif*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 73 /*==== VARIABLES ==================================================*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 74 LOCAL CHAR extDialNum[MAX_CC_ORIG_NUM_LEN]; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 75 /* number to be dialled during testing */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 76 LOCAL T_ACI_AT_CMD currAbrtCmd = AT_CMD_NONE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 77 /* used for indicating abort of */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 78 /* asynchronous command handling */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 79 LOCAL T_ACI_AT_CMD currExtCmd_v2 = AT_CMD_NONE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 80 /* used for indicating asynchronous */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 81 /* command handling */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 82 LOCAL SHORT extCallId_v2 = ACI_NumParmNotPresent; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 83 /* identifier of the call which was */ | 
| 
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 /* | 
| 
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 | PROJECT : GSM-PS (8403) MODULE : TIL_CSF | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 88 | STATE : code ROUTINE : cmh_show_version | | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 91 PURPOSE : Trace Layer 1 DSP version numbers | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 92 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 93 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 94 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 95 #ifndef WIN32 | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 98 static void jtagid_to_chipset (USHORT jtagid, CHAR *chipset) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 99 { | 
| 
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 switch (jtagid) { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 102 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 103 case 0xB268: | 
| 
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 strcpy (chipset, "Hercules"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 106 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 107 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 108 case 0xB2B5: | 
| 
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 strcpy (chipset, "Ulysse 1Mbits rev. B"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 111 break; | 
| 
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 case 0xB335: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 114 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 115 strcpy (chipset, "Ulysse 1Mbits rev. A"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 116 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 117 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 118 case 0xB334: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 119 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 120 strcpy (chipset, "Ulysse 2Mbits"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 121 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 122 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 123 case 0xB393: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 124 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 125 strcpy (chipset, "Ulysse G1"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 126 break; | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 129 case 0xB396: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 130 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 131 strcpy (chipset, "Calypso rev. B"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 132 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 133 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 134 case 0xB2AC: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 135 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 136 // Samson and Calypso rev. A share the same JTAG ID. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 137 #if (CHIPSET != 7) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 138 strcpy (chipset, "Samson"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 139 #else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 140 strcpy (chipset, "Calypso rev. A"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 141 #endif | 
| 
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 default: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 145 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 146 strcpy (chipset, "Unknown"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 147 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 148 } | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 151 */ | 
| 
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 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 154 GLOBAL void cmh_show_version (UBYTE src_id ) | 
| 
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 #ifndef ALR | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 157 CHAR buf[80]; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 158 USHORT build, hw, rev; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 159 #else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 160 CHAR buf[160]; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 161 CHAR chipset[25]; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 162 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 163 USHORT jtag; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 164 UCHAR size; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 165 CHAR *output;*/ | 
| 
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 * Retrieve hardware JTAG ID info | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 168 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 169 /* jtag = IQ_GetJtagId(); | 
| 
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 #ifndef ALR | 
| 
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 build = IQ_GetBuild(); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 174 hw = IQ_GetPoleStarVersion(); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 175 rev = IQ_GetRevision(); | 
| 
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 sprintf (buf, "Build %d, Silicon Revision %04X/%04X/%04X", | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 178 build, hw, jtag, rev); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 179 #else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 180 | 
| 
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 jtagid_to_chipset (jtag, chipset); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 183 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 184 sprintf (buf, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 185 "Chipset Version:\n\r\t%s\n\rS/W Versions:\n\n\r\tTI Layer1\t\t%4X\n\r\tCondat G.2-3\t\t %3X\n\r\tTI Ref. Design Release\t %3X", | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 186 chipset, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 187 SOFTWAREVERSION, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 188 G23VERSION, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 189 SYSTEMVERSION); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 190 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 191 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 192 // Format output as a list of Pascal-like strings | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 193 size = strlen(buf); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 194 output[0] = size; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 195 strcpy(&(output[1]), buf); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 196 output[size+1] = (CHAR) 0xFF; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 197 sEXT_Output (src_id, ATI_EXT_CMPL_LINE, output); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 198 } | 
| 
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 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 201 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 202 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 203 | 
| 
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 | PROJECT : GSM-PS (6147) MODULE : ATI_EXT_MECH | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 208 | STATE : code ROUTINE : aci_to_ext_return_map | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 209 +--------------------------------------------------------------------+ | 
| 
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 PURPOSE : This function is used to map the ACI return values to the EXT return values | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 212 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 213 LOCAL T_ATI_EXT_RETURN aci_to_ext_return_map (T_ACI_RETURN aci_return) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 214 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 215 TRACE_FUNCTION ("aci_to_ext_return_map ()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 216 switch (aci_return) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 217 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 218 case AT_FAIL: return ATI_EXT_FAIL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 219 case AT_CMPL: return ATI_EXT_CMPL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 220 case AT_EXCT: return ATI_EXT_EXCT; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 221 case AT_BUSY: return ATI_EXT_BUSY; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 222 default: return ATI_EXT_FAIL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 223 } | 
| 
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 | 
| 
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 +--------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 228 | PROJECT : GSM-PS (6147) MODULE : ATI_EXT_MECH | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 229 | STATE : code ROUTINE : aci_to_ext_return_map | | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 232 PURPOSE : This function is used to map the ATI return values to the EXT return values | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 233 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 234 LOCAL T_ATI_EXT_RETURN ati_to_ext_return_map (T_ATI_RSLT ati_return) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 235 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 236 TRACE_FUNCTION ("ati_to_ext_return_map ()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 237 switch (ati_return) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 238 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 239 case ATI_FAIL: return ATI_EXT_FAIL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 240 case ATI_CMPL: return ATI_EXT_CMPL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 241 case ATI_EXCT: return ATI_EXT_EXCT; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 242 case ATI_BUSY: return ATI_EXT_BUSY; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 243 default: return ATI_EXT_FAIL; | 
| 
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 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 246 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 247 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 248 +--------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 249 | PROJECT : GSM-PS (6147) MODULE : ATI_EXT_MECH | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 250 | STATE : code ROUTINE : ext_LeaveEXT_v2 | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 251 +--------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 252 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 253 PURPOSE : This function is called in case the extensin mechansim | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 254 should be left finally. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 255 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 256 LOCAL void ext_LeaveEXT_v2 ( ) | 
| 
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 /*indicating that no extended AT command is still in progress*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 259 currExtCmd_v2 = AT_CMD_NONE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 260 /*indicate end of extended command handling to the AT interpreter*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 261 /* sEXT_Finit();*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 262 sEXT_Indication (src_id_ext, EXT_LEAVE ); | 
| 
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 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 266 +--------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 267 | PROJECT : GSM-PS (6147) MODULE : CMH_EXTS | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 268 | STATE : code ROUTINE : ext_ContinueTest_v2 | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 269 +--------------------------------------------------------------------+ | 
| 
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 PURPOSE : This function is called in case the AT extension | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 272 procedure should be continued. | 
| 
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 <id>: identifies the specific procedure to be continued | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 275 | 
| 
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 LOCAL void ext_ContinueTest_v2 ( CHAR* id ) | 
| 
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 T_ACI_RETURN rslt; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 280 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 281 if ( strcmp ( id, EXT_DIAL_VOICE_PASS ) EQ 0 ) | 
| 
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 T_ACI_D_TOC callType = D_TOC_Data; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 284 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 285 if ( extDialNum [strlen ( extDialNum ) - 1] EQ EXT_VOICE_DELIMITER ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 286 callType = D_TOC_Voice; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 287 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 288 extDialNum[strlen ( extDialNum ) - 1] = '\0'; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 289 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 290 rslt = sAT_Dn ( CMD_SRC_LCL, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 291 extDialNum, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 292 D_CLIR_OVRD_Default, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 293 D_CUG_CTRL_NotPresent, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 294 callType ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 295 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 296 if ( rslt EQ AT_EXCT ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 297 { | 
| 
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 * generate some output at the AT interface | 
| 
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 sEXT_Indication (src_id_ext, EXT_ATD); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 302 | 
| 
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 * indicating that an extended AT command is still in progress | 
| 
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 currExtCmd_v2 = AT_CMD_D; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 307 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 308 else if (rslt EQ AT_CMPL) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 309 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 310 sEXT_Confirm (src_id_ext); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 311 ext_LeaveEXT_v2 (); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 312 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 313 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 314 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 315 rCI_PlusCME ( AT_CMD_EXT, CME_ERR_Unknown ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 316 ext_LeaveEXT_v2 (); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 317 } | 
| 
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 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 323 +--------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 324 | PROJECT : GSM-PS (6147) MODULE : CMH_EXTS | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 325 | STATE : code ROUTINE : ext_OK_v2 | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 326 +--------------------------------------------------------------------+ | 
| 
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 PURPOSE : This function is called in case the positive | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 329 result of the asynchronous command handling is available. | 
| 
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 <cmdId>: command identity | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 332 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 333 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 334 GLOBAL void ext_OK_v2 ( T_ACI_AT_CMD cmdId ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 335 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 336 T_ACI_RETURN rslt; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 337 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 338 if ( cmdId EQ AT_CMD_CFUN AND currAbrtCmd EQ AT_CMD_NONE ) | 
| 
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 rslt = sAT_PlusCOPS ( CMD_SRC_LCL, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 341 COPS_MOD_Auto, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 342 COPS_FRMT_NotPresent, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 343 NULL ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 344 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 345 if ( rslt EQ AT_EXCT ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 346 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 347 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 348 * generate some output at the AT interface | 
| 
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 sEXT_Output (src_id_ext, ATI_EXT_CMPL_LINE, EXT_ATCOPS_START); | 
| 
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 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 353 * indicating that an extended AT command is still in progress | 
| 
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 currExtCmd_v2 = AT_CMD_COPS; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 356 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 357 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 358 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 359 ext_LeaveEXT_v2 (); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 360 sEXT_Error ( AT_CMD_EXT, CME_ERR_Unknown); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 361 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 362 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 363 else if ( cmdId EQ AT_CMD_COPS AND currAbrtCmd EQ AT_CMD_NONE ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 364 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 365 currExtCmd_v2 = AT_CMD_NONE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 366 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 367 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 368 * generate some output at the AT interface | 
| 
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 sEXT_Indication (AT_CMD_EXT, EXT_ATCOPS_STOP ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 372 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 373 #ifndef WIN32 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 374 ext_ContinueTest_v2 ( EXT_DIAL_VOICE_PASS ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 375 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 376 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 377 else if ( cmdId EQ AT_CMD_D AND currAbrtCmd EQ AT_CMD_NONE ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 378 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 379 extCallId_v2 = 1; | 
| 
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 ext_LeaveEXT_v2 (); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 382 sEXT_Confirm( AT_CMD_EXT ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 383 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 384 else if ( currAbrtCmd NEQ AT_CMD_NONE ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 385 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 386 currAbrtCmd = AT_CMD_NONE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 387 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 388 ext_LeaveEXT_v2 (); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 389 sEXT_Confirm( AT_CMD_EXT ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 390 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 391 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 392 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 393 /*generate some output at the AT interface*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 394 sEXT_Output(src_id_ext, ATI_EXT_CMPL_LINE, EXT_UNEXPCTD); | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 399 /* | 
| 
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 | PROJECT : GSM-PS (6147) MODULE : ATI_EXT_MECH | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 402 | STATE : code ROUTINE : rEXT_Init | | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 405 PURPOSE : This function is called in the ATI initialization process. | 
| 
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 GLOBAL T_ATI_EXT_RETURN rEXT_Init () | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 408 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 409 #ifdef _SIMULATION_ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 410 static CHAR *cmd_list[] = {"$A", "$B", "%TA", NULL}; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 411 #else /*_SIMULATION_*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 412 static CHAR *cmd_list[] = {NULL}; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 413 //static CHAR *cmd_list[] = {"$A", "$B", "%TA", NULL}; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 414 #endif /*_SIMULATION_*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 415 TRACE_FUNCTION ("rEXT_Init ()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 416 if (sEXT_Init (cmd_list) EQ ATI_CMPL) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 417 return ATI_EXT_CMPL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 418 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 419 return ATI_EXT_FAIL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 420 } | 
| 
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 | 
| 
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 +--------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 425 | PROJECT : GSM-PS (6147) MODULE : ATI_EXT_MECH | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 426 | STATE : code ROUTINE : rAT_EXT | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 427 +--------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 428 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 429 PURPOSE : This function is called by ATI in case of the detection of an | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 430 unknown command. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 431 <src_id> : source Id | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 432 <cmd> : remaining unparsed command string. | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 435 GLOBAL T_ATI_EXT_RETURN rEXT_Execute (UBYTE src_id, CHAR *cmd) | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 438 TRACE_FUNCTION ("rEXT_Execute ()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 439 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 440 /*example how to process the command AT$A*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 441 if (*cmd EQ '$') | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 442 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 443 cmd++; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 444 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 445 switch (*cmd++) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 446 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 447 T_ATI_RSLT output_rslt; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 448 case 'A': /*print out string "Hello World"*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 449 output_rslt = ATI_FAIL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 450 if (*cmd EQ '\0') | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 451 output_rslt = sEXT_Output (src_id, ATI_EXT_CMPL_LINE, "Hello World!"); | 
| 
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 if (*cmd EQ '=' AND *(cmd+1) EQ '0') | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 454 output_rslt = sEXT_Output (src_id, ATI_EXT_CMPL_LINE, "AT$A is set to off."); | 
| 
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 if (*cmd EQ '=' AND *(cmd+1) EQ '1') | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 457 output_rslt = sEXT_Output (src_id, ATI_EXT_CMPL_LINE, "AT$A is set to on."); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 458 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 459 if (*cmd EQ '=' AND *(cmd+1) EQ '?') | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 460 output_rslt = sEXT_Output (src_id, ATI_EXT_CMPL_LINE, "$A: 0, 1"); | 
| 
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 return (ati_to_ext_return_map (output_rslt)); | 
| 
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 case 'B': /*print out a complete string part by part*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 465 sEXT_Output(src_id, ATI_EXT_PART_BEGIN, "This is "); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 466 sEXT_Output(src_id, ATI_EXT_PART_LINE, "a complete "); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 467 sEXT_Output(src_id, ATI_EXT_PART_LAST, "line. "); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 468 return (ATI_EXT_CMPL); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 469 } | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 472 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 473 * example how to process the command AT% commands | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 474 */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 475 if (*cmd EQ '%') | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 476 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 477 sEXT_Output (src_id, ATI_EXT_CMPL_LINE, EXT_ENTER); | 
| 
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 cmd++; | 
| 
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 switch (*cmd) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 482 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 483 case 'T': | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 484 case 't': | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 485 /*Enables RTC or AUDIO tests */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 486 cmd++; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 487 if (!strncmp(cmd, "A", 1) || !strncmp(cmd, "a", 1)) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 488 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 489 sEXT_Output (src_id, ATI_EXT_CMPL_LINE, "Performing Audio Tests"); | 
| 
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 else | 
| 
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 if (!strncmp(cmd, "R", 1) || !strncmp(cmd, "r", 1)) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 494 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 495 sEXT_Output (src_id, ATI_EXT_CMPL_LINE, "Performing RTC Tests"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 496 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 497 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 498 return( AT_FAIL ); | 
| 
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 return( AT_CMPL ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 501 default: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 502 return ( AT_FAIL ); | 
| 
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 else if ( *cmd EQ 'D' ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 507 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 508 T_ACI_RETURN rslt; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 509 TRACE_EVENT ("ATD in extension mechanism."); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 510 strncpy ( extDialNum, cmd + 1, MINIMUM ( MAX_CC_ORIG_NUM_LEN - 1, strlen (cmd) - 1 ) ); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 511 extDialNum[MINIMUM ( MAX_CC_ORIG_NUM_LEN - 1, strlen (cmd) - 1 )] = '\0'; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 512 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 513 rslt = sAT_PlusCFUN ( CMD_SRC_LCL, CFUN_FUN_Full, CFUN_RST_NotPresent ); | 
| 
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 if ( rslt EQ AT_EXCT ) | 
| 
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 /*generate some output at the AT interface*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 518 sEXT_Output (src_id, ATI_EXT_CMPL_LINE, EXT_ATCFUN); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 519 /*indicating that an extended AT command is still in progress*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 520 currExtCmd_v2 = AT_CMD_CFUN; | 
| 
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 if (rslt EQ AT_FAIL) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 523 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 524 sEXT_Indication(src_id, EXT_LEAVE); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 525 sEXT_Error (src_id, CME_ERR_Unknown); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 526 return ATI_EXT_FAIL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 527 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 528 else if (rslt EQ AT_CMPL) | 
| 
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 ext_LeaveEXT_v2 (); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 531 return ATI_EXT_CMPL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 532 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 533 return ( aci_to_ext_return_map (rslt)); | 
| 
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 return ATI_EXT_FAIL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 536 } | 
| 
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 /* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 539 +--------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 540 | PROJECT : GSM-PS (6147) MODULE : ATI_EXT_MECH | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 541 | STATE : code ROUTINE : rEXT_Abort | | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 544 PURPOSE : This function is called by the ATI in case of aborting a pending | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 545 extension command. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 546 */ | 
| 
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 GLOBAL T_ATI_EXT_RETURN rEXT_Abort (UBYTE src_id) | 
| 
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 T_ACI_RETURN rslt = AT_CMPL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 551 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 552 TRACE_FUNCTION ("rEXT_Abort ()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 553 /* call the abort function if necessary */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 554 if ( currExtCmd_v2 NEQ AT_CMD_NONE ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 555 rslt = sAT_Abort (src_id, currExtCmd_v2 ); | 
| 
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 switch ( rslt ) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 558 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 559 case ( AT_CMPL ): | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 560 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 561 currExtCmd_v2 = AT_CMD_NONE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 562 sEXT_Indication(src_id, cmdAtError(atOk)); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 563 ext_LeaveEXT_v2(); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 564 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 565 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 566 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 567 case ( AT_EXCT ): | 
| 
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 currExtCmd_v2 = AT_CMD_ABRT; | 
| 
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 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 572 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 573 default: | 
| 
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 /* do nothing */ | 
| 
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 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 578 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 579 return aci_to_ext_return_map (rslt); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 580 } | 
| 
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 | 
| 
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 +--------------------------------------------------------------------+ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 585 | PROJECT : GSM-PS (6147) MODULE : ATI_EXT_MECH | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 586 | STATE : code ROUTINE : rEXT_Signal | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 587 +--------------------------------------------------------------------+ | 
| 
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 PURPOSE : This function is called by the ATI when an extension signal is received. | 
| 
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 GLOBAL T_ATI_EXT_RETURN rEXT_Signal (T_ACI_EXT_IND *aci_ext_ind) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 593 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 594 TRACE_FUNCTION ("rEXT_Signal ()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 595 /*The handling of the extension signal can be done here.*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 596 sEXT_Output (CMD_SRC_ATI_5, ATI_EXT_CMPL_LINE, "This is an extension signal."); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 597 return ATI_EXT_CMPL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 598 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 599 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 600 #ifdef FF_BAT | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 601 /* | 
| 
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 | PROJECT : GSM-PS (6147) MODULE : ATI_EXT_MECH | | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 604 | STATE : code ROUTINE : rEXT_Response_BAT | | 
| 
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 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 607 PURPOSE : This function is called by BAT Module when customer stuff | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 608 is asynchronously received. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 609 */ | 
| 
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 GLOBAL T_ATI_EXT_RETURN rEXT_Response_BAT (UBYTE src_id, 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 | 612 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 613 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 614 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 615 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 616 | 
| 
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 #endif /* ATI_EXT_MECH_C */ | 
| 
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 | 
