freecalypso-sw: gsm-fw/g23m-glue/cst/cst

annotate gsm-fw/g23m-glue/cst/cst_exts.c @ 874:72d64c172d85

fc-shell: Rx control implemented

author	Space Falcon <falcon@ivan.Harhan.ORG>
date	Sat, 30 May 2015 07:20:50 +0000
parents	21247e7d0b8d
children

rev	line source
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	2 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	3 \| PROJECT: GSM-F&D (8411) $Workfile:: CST_EXTS.C $\|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	4 \| $Author:: Sa $ CONDAT GmbH $Revision:: 7 $\|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	5 \| CREATED: 03.08.99 $Modtime:: 14.02.00 16:06 $\|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	6 \| STATE : code \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	7 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	8
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	9
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	10 MODULE : CST_EXTS
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	11
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	12 PURPOSE : This Modul defines the custom specific AT commands
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	13 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	14
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	15 #ifndef CST_EXTS_C
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	16 #define CST_EXTS_C
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	17 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	18
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	19 #include "config.h"
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	20 #include "fixedconf.h"
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	21 #include "condat-features.h"
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	22
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	23 #define ENTITY_CST
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	24 /==== INCLUDES ===================================================/
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	25
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	26 #include <stdlib.h>
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	27 #include <string.h>
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	28 #include <stdio.h>
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	29 #include "typedefs.h"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	30 #include "m_sms.val"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	31 #include "m_fac.h"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	32 #include "p_mnsms.h"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	33 #include "p_mmreg.h"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	34 #include "p_mncc.h"
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	35 #include "p_mnss.h"
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	36 #include "vsi.h"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	37 #include "gsm.h"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	38 #include "p_cst.h"
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	39 #include "cst.h"
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	40 #include "custom.h"
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	41 #include "p_mmi.h"
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	42 #include "p_em.h"
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	43 #include "../../g23m-aci/aci/aci_cmh.h"
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	44
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	45 #if 0 //#ifdef ALR
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	46 #include "main/sys_ver.h"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	47 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	48
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	49 /==== CONSTANTS ==================================================/
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	50
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	51 #define EXT_ATD "EXT: D, I"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	52 #define EXT_ATCFUN "EXT: +CFUN, I"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	53 #define EXT_ATCOPS_START "EXT: +COPS, I"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	54 #define EXT_ATCOPS_STOP "EXT: +COPS, O"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	55 #define EXT_ENTER "EXT: I"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	56 #define EXT_LEAVE "EXT: O"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	57 #define EXT_UNEXPCTD "EXT: E"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	58
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	59 #define EXT_DIAL_VOICE_PASS "DVCP"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	60
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	61 #define EXT_MAX_BUF_LEN 41
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	62
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	63 #define EXT_VOICE_DELIMITER ';'
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	64
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	65 /==== EXPORT =====================================================/
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	66
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	67 /==== TYPES ======================================================/
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	68
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	69 #ifndef WIN32
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	70 extern USHORT IQ_GetBuild(void);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	71 extern USHORT IQ_GetPoleStarVersion(void);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	72 extern USHORT IQ_GetJtagId(void);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	73 extern USHORT IQ_GetRevision(void);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	74 extern void l1dmacro_init_hw(void);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	75
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	76 extern BOOL SER_WriteConfig (char *new_config,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	77 BOOL write_to_flash);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	78 extern BOOL SER_ImmediateSwitch (void);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	79 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	80
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	81 LOCAL CHAR* percentCFG ( CHAR* cmd );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	82 LOCAL CHAR* percentDBG ( CHAR* cmd );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	83 LOCAL void ext_LeaveEXT ( BOOL final );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	84 LOCAL void ext_CreatePString ( CHAR* buffer,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	85 CHAR* text );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	86 GLOBAL void ext_ContinueTest ( CHAR* id );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	87
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	88 /==== VARIABLES ==================================================/
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	89
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	90 LOCAL CHAR* extCmd; /* remaining unparsed command string, */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	91 /* will be needed in case of asynchronous */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	92 /* command handling */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	93 LOCAL USHORT extCmdLen; /* length of command string, will be */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	94 /* needed in case of asynchronous */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	95 /* command handling */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	96 LOCAL CHAR extBuffer[EXT_MAX_BUF_LEN]; /* outbut buffer */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	97
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	98 LOCAL CHAR extDialNum[MAX_PHB_NUM_LEN];
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	99 /* number to be dialled during testing */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	100 GLOBAL SHORT extCallId = ACI_NumParmNotPresent;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	101 /* identifier of the call which was */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	102 /* set-up using AT extension mechansim */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	103 GLOBAL T_ACI_AT_CMD currExtCmd = AT_CMD_NONE;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	104 /* used for indicating asynchronous */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	105 /* command handling */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	106 LOCAL T_ACI_AT_CMD currAbrtCmd = AT_CMD_NONE;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	107 /* used for indicating abort of */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	108 /* asynchronous command handling */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	109
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	110 /==== FUNCTIONS ==================================================/
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	111
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	112 USHORT * csf_return_adc (void);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	113
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	114 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	115 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	116 \| PROJECT : GSM-PS (8403) MODULE : TIL_CSF \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	117 \| STATE : code ROUTINE : cmh_show_version \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	118 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	119
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	120 PURPOSE : Trace Layer 1 DSP version numbers
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	121
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	122 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	123
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	124 #ifndef WIN32
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	125
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	126 #if 0
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	127 static void jtagid_to_chipset (USHORT jtagid, CHAR *chipset)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	128 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	129
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	130 switch (jtagid) {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	131
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	132 case 0xB268:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	133
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	134 strcpy (chipset, "Hercules");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	135 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	136
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	137 case 0xB2B5:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	138
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	139 strcpy (chipset, "Ulysse 1Mbits rev. B");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	140 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	141
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	142 case 0xB335:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	143
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	144 strcpy (chipset, "Ulysse 1Mbits rev. A");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	145 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	146
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	147 case 0xB334:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	148
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	149 strcpy (chipset, "Ulysse 2Mbits");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	150 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	151
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	152 case 0xB393:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	153
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	154 strcpy (chipset, "Ulysse G1");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	155 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	156
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	157
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	158 case 0xB396:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	159
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	160 strcpy (chipset, "Calypso rev. B");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	161 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	162
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	163 case 0xB2AC:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	164
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	165 // Samson and Calypso rev. A share the same JTAG ID.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	166 #if (CHIPSET != 7)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	167 strcpy (chipset, "Samson");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	168 #else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	169 strcpy (chipset, "Calypso rev. A");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	170 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	171 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	172
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	173 case 0xB217:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	174
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	175 strcpy (chipset, "Ulysse C035");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	176 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	177
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	178 case 0xB496:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	179
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	180 strcpy (chipset, "Calypso C035");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	181 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	182
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	183 case 0xB4FB:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	184
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	185 strcpy (chipset, "Calypso Lite C035");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	186 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	187
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	188 default:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	189
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	190 strcpy (chipset, "Unknown");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	191 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	192 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	193 }
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	194 #endif
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	195
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	196 GLOBAL void cmh_show_version (
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	197 CHAR *command,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	198 USHORT *len,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	199 CHAR *output
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	200 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	201 {
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	202 #if 1 //#ifndef ALR
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	203 CHAR buf[80];
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	204 USHORT build, hw, rev;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	205 #else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	206 CHAR buf[160];
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	207 CHAR chipset[25];
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	208 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	209 USHORT jtag;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	210 UCHAR size;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	211
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	212 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	213 * Retrieve hardware JTAG ID info
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	214 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	215 jtag = IQ_GetJtagId();
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	216
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	217 #if 1 //#ifndef ALR
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	218 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	219 * Retrieve others hardware info and build from library
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	220 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	221 build = IQ_GetBuild();
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	222 hw = IQ_GetPoleStarVersion();
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	223 rev = IQ_GetRevision();
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	224
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	225 sprintf (buf, "Build %d, Silicon Revision %04X/%04X/%04X",
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	226 build, hw, jtag, rev);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	227 #else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	228
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	229 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	230 * Retrieve CHIPSET name from JTAG ID
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	231 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	232 jtagid_to_chipset (jtag, chipset);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	233
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	234 sprintf (buf,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	235 "Chipset Version:\n\r\t%s\n\rS/W Versions:\n\n\r\tLayer1\t%4X_%3X\n\r\tLayer2-3 %3XBERLIN_S420\n\r\tNICE\t %3X_I64",
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	236 chipset,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	237 OFFICIAL_VERSION,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	238 INTERNAL_VERSION,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	239 G23VERSION,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	240 SYSTEMVERSION);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	241 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	242
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	243 // Format output as a list of Pascal-like strings
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	244 size = strlen(buf);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	245 output[0] = size;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	246 strcpy(&(output[1]), buf);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	247 output[size+1] = (CHAR) 0xFF; // terminate list of strings
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	248 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	249
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	250 #endif /* #ifndef WIN32 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	251
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	252
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	253
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	254 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	255 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	256 \| PROJECT : GSM-PS (8403) MODULE : TIL_CSF \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	257 \| STATE : code ROUTINE : show_adc_conversion \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	258 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	259
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	260 PURPOSE : Trace Layer 1 AD conversions results
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	261
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	262 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	263
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	264 GLOBAL void show_adc_conversion (CHAR *output)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	265 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	266 USHORT * adc_conversion;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	267 #ifdef ALR
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	268 CHAR buf[160];
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	269 #else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	270 CHAR buf[80];
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	271 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	272 UCHAR size;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	273
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	274 adc_conversion = csf_return_adc ();
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	275 #ifdef ALR
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	276 sprintf (buf, "ADC 0 = %x, ADC 1 = %x, ADC 2 = %x, ADC 3 = %x, ADC 4 = %x, ADC 5 = %x, ADC 6 = %x, ADC 7 = %x, ADC 8 = %x",
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	277 adc_conversion++, adc_conversion++, *adc_conversion++,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	278 adc_conversion++, adc_conversion++, *adc_conversion++,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	279 adc_conversion++, adc_conversion++, *adc_conversion);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	280
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	281 #else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	282 sprintf (buf, "ADC 0 = %x, ADC 1 = %x, ADC 2 = %x, ADC 3 = %x, ADC 4 = %x",
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	283 adc_conversion++, adc_conversion++, *adc_conversion++,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	284 adc_conversion++, adc_conversion);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	285 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	286
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	287 // Format output as a list of Pascal-like strings
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	288 size = strlen(buf);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	289 output[0] = size;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	290 strcpy(&(output[1]), buf);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	291 output[size+1] = (CHAR) 0xFF; // terminate list of strings
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	292 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	293
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	294
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	295 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	296 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	297 \| PROJECT : GSM-PS (8403) MODULE : CST_EXTS \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	298 \| STATE : code ROUTINE : AEC_Enable \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	299 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	300
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	301 PURPOSE : activate the Acoustic Echo Cancelation
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	302
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	303 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	304
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	305 GLOBAL void AEC_Enable (CHAR command, CHAR output)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	306 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	307
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	308 /* -------------------------------------------------------------------------- */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	309 /* MMI_AEC_REQ : 0283 = Long AEC, 105 = SPENH, 187 = AEC+SPENH, 1 = STOP */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	310 /* aec_control register bits \| 0 0 Sa t2\|t1 g3 g2 g1\|g0 e2 e1 ak\| */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	311 /* bit 0 : ACK bit : set to 1 in order to warn DSP that a new command */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	312 /* is present. */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	313 /* bit 1 : enable AEC */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	314 /* bit 2 : enable SPENH (= Speech Enhancement = noise reduction) */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	315 /* bit 3 : additionnal AEC gain attenuation (lsb) */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	316 /* bit 4 : additionnal AEC gain attenuation (msb) */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	317 /* bit 5 : additionnal SPENH gain attenuation (lsb) */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	318 /* bit 6 : additionnal SPENH gain attenuation (msb) */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	319 /* bit 7 : reset trigger for AEC */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	320 /* bit 8 : reset trigger for SPENH */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	321 /* bit 9 : AEC selector 0 : short AEC, 1 : long AEC */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	322 /* */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	323 /* for Short AEC 0083 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	324 /* for long AEC 0283 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	325 /* for long AEC -6 dB 028B */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	326 /* for long AEC -12 dB 0293 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	327 /* for long AEC -18 dB 029B */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	328 /* for SPENH 0105 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	329 /* for SPENH -6 dB 0125 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	330 /* for SPENH -12 dB 0145 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	331 /* for SPENH -18 dB 0165 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	332 /* for BOTH 0187 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	333 /* for STOP ALL 0001 (all bits reset + ACK to 1 to warn the DSP) */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	334 /* -------------------------------------------------------------------------- */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	335
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	336
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	337 command++; /* increment command pointer to point on the hexa value of the command */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	338
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	339
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	340 if (!strncmp(command, "0083", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	341 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	342 output[0] = strlen ("Short AEC is active");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	343 memcpy (&output[1], "Short AEC is active", 19);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	344
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	345 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	346 output [20] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	347 csf_aec_enable(0x0083);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	348 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	349
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	350 else if (!strncmp(command, "0283", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	351 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	352 output[0] = strlen ("Long AEC is active");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	353 memcpy (&output[1], "Long AEC is active", 18);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	354
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	355 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	356 output [19] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	357 csf_aec_enable(0x0283);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	358 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	359
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	360 else if (!strncmp(command, "028B", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	361 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	362 output[0] = strlen ("Long AEC -6 dB is active");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	363 memcpy (&output[1], "Long AEC -6 dB is active", 24);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	364
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	365 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	366 output [25] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	367 csf_aec_enable(0x028B);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	368 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	369
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	370 else if (!strncmp(command, "0293", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	371 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	372 output[0] = strlen ("Long AEC -12 dB is active");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	373 memcpy (&output[1], "Long AEC -12 dB is active", 25);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	374
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	375 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	376 output [26] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	377 csf_aec_enable(0x0293);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	378 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	379
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	380 else if (!strncmp(command, "029B", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	381 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	382 output[0] = strlen ("Long AEC -18 dB is active");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	383 memcpy (&output[1], "Long AEC -18 dB is active", 25);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	384
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	385 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	386 output [26] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	387 csf_aec_enable(0x029B);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	388 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	389
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	390 else if (!strncmp(command, "0105", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	391 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	392 output[0] = strlen ("Noise reduction is active");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	393 memcpy (&output[1], "Noise reduction is active", 25);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	394
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	395 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	396 output [26] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	397 csf_aec_enable(0x0105);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	398 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	399
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	400 else if (!strncmp(command, "0125", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	401 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	402 output[0] = strlen ("Noise reduction -6 dB is active");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	403 memcpy (&output[1], "Noise reduction -6 dB is active", 31);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	404
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	405 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	406 output [32] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	407 csf_aec_enable(0x0125);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	408 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	409
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	410 else if (!strncmp(command, "0145", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	411 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	412 output[0] = strlen ("Noise reduction -12 dB is active");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	413 memcpy (&output[1], "Noise reduction -12 dB is active", 32);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	414
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	415 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	416 output [33] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	417 csf_aec_enable(0x0145);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	418 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	419
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	420 else if (!strncmp(command, "0165", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	421 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	422 output[0] = strlen ("Noise reduction -18 dB is active");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	423 memcpy (&output[1], "Noise reduction -18 dB is active", 32);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	424
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	425 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	426 output [33] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	427 csf_aec_enable(0x0165);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	428 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	429
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	430 else if (!strncmp(command, "0187", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	431 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	432 output[0] = strlen ("Both AEC and Noise reduction are active");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	433 memcpy (&output[1], "Both AEC and Noise reduction are active", 39);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	434
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	435 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	436 output [40] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	437 csf_aec_enable(0x0187);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	438 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	439
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	440 else if (!strncmp(command, "0001", 4))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	441 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	442 output[0] = strlen ("AEC and Noise reduction are unactivated");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	443 memcpy (&output[1], "AEC and Noise reduction are unactivated", 39);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	444
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	445 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	446 output [40] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	447 csf_aec_enable(0x0001);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	448 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	449
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	450 else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	451 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	452 output[0] = strlen ("Bad AT command");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	453 memcpy (&output[1], "Bad AT command", 14);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	454
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	455 /* end of string list */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	456 output [15] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	457 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	458
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	459 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	460
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	461
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	462
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	463
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	464 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	465 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	466 \| PROJECT : GSM-PS (6147) MODULE : CST_EXTS \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	467 \| STATE : code ROUTINE : rAT_EXT \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	468 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	469
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	470 PURPOSE : This function is called by the interpreter part of the
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	471 ACI in case of the detection of an unknown command.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	472
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	473 <cmd> : remaining unparsed command string.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	474 <cmdLen> : length of command string. This value must be
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	475 incremented by the amount of parsed characters
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	476 by this function.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	477 <out> : this parameter can be used to display some
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	478 strings at the AT command interface.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	479 The first char of one string must contain
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	480 the length of the following string. The
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	481 special length 0xff must be used to define
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	482 the end of the string list.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	483 <outLen> : maximum length of output buffer referenced
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	484 by parameter <out>.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	485
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	486 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	487
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	488 GLOBAL T_ACI_RETURN rAT_EXT (
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	489 CHAR* cmd,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	490 USHORT* cmdLen,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	491 CHAR* out,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	492 USHORT outLen
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	493 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	494 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	495 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	496 * store command string in case it will be needed later on, when
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	497 * result code of this function is equal to AT_EXCT
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	498 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	499 extCmd = cmd;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	500 extCmdLen = *cmdLen;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	501
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	502 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	503 * example how to send an unsolicited result code via the AT interface
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	504 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	505 ext_CreatePString ( extBuffer, EXT_ENTER );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	506
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	507 sAT_URC ( extBuffer );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	508
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	509 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	510 * example how to process the command AT%H
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	511 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	512 if (*cmd == '%')
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	513 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	514 cmd++;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	515
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	516 switch (*cmd)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	517 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	518 case 'A':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	519 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	520 * Display AD conversions results
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	521 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	522 *cmdLen -= 2;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	523 show_adc_conversion(out);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	524 return( AT_CMPL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	525
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	526 case 'C':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	527 case 'c':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	528 case 'D':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	529 case 'd':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	530 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	531 CHAR* nextCmd;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	532
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	533 *cmdLen -= 2;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	534
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	535 switch ( *cmd )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	536 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	537 case 'C':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	538 case 'c':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	539 /* dynamic configuration via AT command interface */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	540 nextCmd = percentCFG ( ++cmd );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	541
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	542 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	543
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	544 case 'D':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	545 case 'd':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	546 /* set debug pin for reset purposes */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	547 nextCmd = percentDBG ( ++cmd );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	548
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	549 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	550 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	551
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	552 *out = ( CHAR ) 0xFF;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	553
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	554 if ( nextCmd EQ NULL )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	555 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	556 return ( AT_FAIL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	557 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	558 else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	559 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	560 *cmdLen -= ( nextCmd - cmd );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	561
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	562 return ( AT_CMPL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	563 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	564 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	565
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	566 case 'N':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	567 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	568 * Enables the AEC by sending a primitive to L1A
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	569 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	570 *cmdLen -= 6;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	571 AEC_Enable(cmd, out);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	572 return( AT_CMPL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	573
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	574 //---------------------------------------------------------------------------//
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	575 // Added by Matthieu Vanin for the test of melody E2/E1
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	576 //---------------------------------------------------------------------------//
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	577
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	578
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	579
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	580 // End
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	581 //---------------------------------------------------------------------------//
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	582 case 'S':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	583 case 's':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	584 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	585 cmd++;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	586
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	587 switch (*cmd) {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	588
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	589 case 'e':
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	590 case 'E':
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	591 /* 's''e' already detected => assume the command is at%ser. */
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	592 {
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	593 cmd += 3; /* Discard the following characters */
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	594 *cmdLen -= 9;
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	595 if (SER_WriteConfig (cmd, (BOOL) (*(cmd + 3) - '0')))
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	596 return( AT_CMPL );
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	597 else
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	598 return( AT_FAIL );
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	599 }
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	600
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	601 case 'w':
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	602 case 'W':
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	603 /* 's''w' already detected => assume the command is at%switch. */
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	604 {
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	605 *cmdLen -= 7;
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	606 if (SER_ImmediateSwitch())
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	607 return( AT_CMPL );
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	608 else
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	609 return( AT_FAIL );
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	610 }
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	611
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	612 case 'l':
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	613 case 'L':
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	614 /* 's''l' already detected => assume the command is at%sleep. */
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	615 {
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	616 cmd += 5; /* Discard the following characters */
21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	617 *cmdLen -= 8;
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	618 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	619 * Checks if the parameter is valid:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	620 * 0 -> NO_SLEEP
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	621 * 1 -> SMALL_SLEEP
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	622 * 2 -> BIG_SLEEP
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	623 * 3 -> DEEP_SLEEP
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	624 * 4 -> ALL_SLEEP
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	625 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	626
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	627 if (((cmd - '0') >= 0) && ((cmd - '0') <= 4))
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	628 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	629 power_down_config ((UBYTE) (*cmd - '0'), UWIRE_CLK_CUT);
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	630 return( AT_CMPL );
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	631 }
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	632 else
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	633 return( AT_FAIL );
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	634 }
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	635
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	636 default:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	637 *cmdLen -= 2;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	638 return ( AT_FAIL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	639
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	640 }
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	641 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	642
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	643 case 'H':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	644 *cmdLen -= 2;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	645
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	646 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	647 * here you can perform some actions with drivers etc.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	648 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	649
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	650 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	651 * and create some additional output at the AT interface
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	652 * The strings:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	653 *"Hello"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	654 *""
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	655 *"World"
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	656 * will be displayed at the terminal.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	657 *
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	658 * first string Hello
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	659 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	660 out[0] = strlen ("Hello");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	661 memcpy (&out[1], "Hello", 5);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	662 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	663 * add a spare line with an empty string
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	664 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	665 out [6] = 0;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	666 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	667 * second string World
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	668 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	669 out [7] = strlen ("World");
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	670 memcpy (&out[8], "World", 5);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	671
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	672 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	673 * end of string list
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	674 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	675 out [13] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	676 return( AT_CMPL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	677
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	678 #ifndef WIN32
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	679 case 'R':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	680 case 'r':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	681 *cmdLen -= 2;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	682 l1dmacro_init_hw();
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	683 out[0] = 0;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	684 out[1] = (CHAR) 0xFF;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	685 return( AT_CMPL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	686 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	687
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	688 #ifndef WIN32
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	689 case 'V':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	690 case 'v':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	691 *cmdLen -= 2;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	692
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	693 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	694 * Display version numbers
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	695 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	696
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	697 cmh_show_version (cmd, cmdLen, out);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	698 return( AT_CMPL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	699 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	700 #if defined (ALR)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	701 case 'T':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	702 case 't':
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	703 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	704 * Enables RTC or AUDIO tests
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	705 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	706 cmd++;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	707 *cmdLen -= 3;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	708 if (!strncmp(cmd, "A", 1) \|\| !strncmp(cmd, "a", 1))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	709 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	710 //audio_test_misc();
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	711 out[0] = 22;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	712 memcpy (&out[1], "Performing Audio Tests", 22);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	713 out [23] = (CHAR) 0xff;
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	714 }
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	715 else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	716 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	717 if (!strncmp(cmd, "R", 1) \|\| !strncmp(cmd, "r", 1))
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	718 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	719 //rtc_test_misc();
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	720 out[0] = 20;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	721 memcpy (&out[1], "Performing RTC Tests", 20);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	722 out [21] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	723 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	724 else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	725 return( AT_FAIL );
845 21247e7d0b8d cst_exts.c compiles Space Falcon <falcon@ivan.Harhan.ORG> parents: 832 diff changeset	726 }
832 c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	727 return( AT_CMPL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	728 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	729 default:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	730 *cmdLen -= 2;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	731 return ( AT_FAIL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	732 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	733 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	734 else if ( *cmd EQ 'D' )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	735 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	736 T_ACI_RETURN rslt;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	737
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	738 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	739 * this is only a test implementation. As soon as a "ATD" command
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	740 * string is detected in the AT interpreter and the mobile is not
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	741 * yet registered (neither limited nor full service is availbale)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	742 * this function is called. Then instead of dialling immediately
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	743 * an activation of the mobile is performed in advance.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	744 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	745 strncpy ( extDialNum, cmd + 1, MINIMUM ( MAX_PHB_NUM_LEN - 1,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	746 *cmdLen - 1 ) );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	747 extDialNum[MINIMUM ( MAX_PHB_NUM_LEN - 1, *cmdLen - 1 )] = '\0';
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	748
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	749 extCmdLen = 0;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	750 *cmdLen = 0;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	751
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	752 rslt = sAT_PlusCFUN ( CMD_SRC_LCL,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	753 CFUN_FUN_Full,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	754 CFUN_RST_NotPresent );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	755
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	756 if ( rslt EQ AT_EXCT )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	757 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	758 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	759 * generate some output at the AT interface
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	760 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	761 ext_CreatePString ( out, EXT_ATCFUN );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	762
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	763 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	764 * indicating that an extended AT command is still in progress
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	765 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	766 currExtCmd = AT_CMD_CFUN;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	767 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	768 else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	769 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	770 ext_LeaveEXT ( TRUE );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	771 rCI_PlusCME ( AT_CMD_EXT, CME_ERR_Unknown );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	772 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	773
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	774 return ( rslt );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	775 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	776 else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	777 return( AT_FAIL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	778 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	779
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	780 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	781 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	782 \| PROJECT : GSM-PS (6147) MODULE : CST_EXTS \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	783 \| STATE : code ROUTINE : percentCFG \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	784 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	785
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	786 PURPOSE : %CFG command (enables dynamic configuration of the
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	787 protocol stack using the AT command interface)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	788 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	789
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	790 EXTERN char parse (char b, char *f, ...);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	791
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	792 GLOBAL SHORT cc_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	793 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	794 GLOBAL SHORT cst_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	795 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	796 GLOBAL SHORT dl_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	797 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	798 GLOBAL SHORT mm_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	799 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	800 GLOBAL SHORT rr_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	801 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	802 GLOBAL SHORT sim_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	803 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	804 GLOBAL SHORT sms_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	805 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	806 GLOBAL SHORT ss_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	807 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	808 GLOBAL SHORT pl_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	809 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	810
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	811 #ifdef FAX_AND_DATA
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	812 GLOBAL SHORT fad_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	813 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	814 GLOBAL SHORT l2r_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	815 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	816 GLOBAL SHORT ra_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	817 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	818 GLOBAL SHORT rlp_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	819 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	820 GLOBAL SHORT t30_pei_config (char * inString,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	821 char * outString);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	822 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	823
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	824 GLOBAL CHAR* percentCFG ( CHAR* cl )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	825 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	826 CHAR entity[5];
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	827 CHAR config[40];
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	828 CHAR dummy;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	829
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	830 TRACE_FUNCTION ( "percentCFG()" );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	831
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	832 switch ( *cl )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	833 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	834 case('='):
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	835 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	836 cl++;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	837
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	838 cl = parse ( cl, "ss", ( LONG )sizeof(entity), entity,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	839 ( LONG )sizeof(config), config );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	840
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	841 if( !cl OR
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	842 *entity EQ '\0' OR
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	843 *config EQ '\0' )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	844 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	845 return ( NULL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	846 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	847
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	848 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	849 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	850
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	851 default:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	852 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	853 return ( NULL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	854 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	855 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	856
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	857 if ( strcmp ( entity, CC_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	858 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	859 cc_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	860 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	861 else if ( strcmp ( entity, CST_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	862 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	863 cst_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	864 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	865 else if ( strcmp ( entity, DL_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	866 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	867 dl_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	868 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	869 else if ( strcmp ( entity, MM_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	870 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	871 mm_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	872 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	873 else if ( strcmp ( entity, RR_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	874 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	875 rr_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	876 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	877 else if ( strcmp ( entity, SIM_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	878 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	879 sim_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	880 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	881 else if ( strcmp ( entity, SMS_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	882 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	883 sms_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	884 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	885 else if ( strcmp ( entity, SS_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	886 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	887 ss_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	888 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	889 else if ( strcmp ( entity, PL_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	890 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	891 pl_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	892 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	893
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	894 #ifdef FAX_AND_DATA
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	895
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	896 else if ( strcmp ( entity, FAD_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	897 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	898 fad_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	899 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	900 else if ( strcmp ( entity, L2R_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	901 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	902 l2r_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	903 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	904 else if ( strcmp ( entity, RA_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	905 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	906 ra_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	907 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	908 else if ( strcmp ( entity, RLP_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	909 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	910 rlp_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	911 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	912 else if ( strcmp ( entity, T30_NAME ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	913 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	914 t30_pei_config ( config, &dummy );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	915 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	916
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	917 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	918
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	919 else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	920 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	921 return ( NULL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	922 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	923
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	924 return ( cl );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	925 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	926
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	927 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	928 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	929 \| PROJECT : GSM-PS (6147) MODULE : CST_EXTS \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	930 \| STATE : code ROUTINE : percentDBG \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	931 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	932
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	933 PURPOSE : %RST command (simulates pressing the reset button
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	934 of the ASample)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	935 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	936
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	937 #ifndef TRACE_PORT_TIMING
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	938 #ifdef _TMS470
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	939 #if (CHIPSET == 0)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	940 EXTERN void l1s_set_debug_pin ( UBYTE, UBYTE );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	941 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	942 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	943 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	944
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	945 GLOBAL CHAR* percentDBG ( CHAR* cl )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	946 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	947 SHORT line = 1;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	948 SHORT polarity = 1;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	949 SHORT delay = 650;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	950
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	951 TRACE_FUNCTION ( "atPercentDBG()" );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	952
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	953 switch ( *cl )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	954 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	955 case( '\0' ):
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	956 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	957 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	958 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	959
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	960 case('='):
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	961 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	962 cl++;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	963
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	964 cl = parse ( cl, "rrr", &line, &polarity, &delay );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	965
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	966 if( !cl OR
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	967 polarity < 0 OR polarity > 1 OR
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	968 line < 0 OR line > 7 OR
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	969 delay < 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	970 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	971 return ( NULL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	972 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	973
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	974 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	975 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	976
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	977 default:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	978 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	979 return ( NULL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	980 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	981 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	982
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	983 #ifndef TRACE_PORT_TIMING
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	984 #ifdef _TMS470
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	985 #if (CHIPSET == 0)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	986 #if defined (NEW_FRAME)
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	987 vsi_t_sleep ( VSI_CALLER ( T_TIME ) delay );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	988 #else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	989 vsi_t_sleep ( VSI_CALLER ( T_VSI_TVALUE ) delay );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	990 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	991
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	992 l1s_set_debug_pin ( ( UBYTE ) line, ( UBYTE ) polarity );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	993 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	994 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	995 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	996
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	997 return ( cl );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	998 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	999
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1000 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1001 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1002 \| PROJECT : GSM-PS (6147) MODULE : CMH_EXTS \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1003 \| STATE : code ROUTINE : rAT_ACP \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1004 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1005
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1006 PURPOSE : This function is called by the interpreter part of the
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1007 ACI in case of aborting a pending extension command.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1008
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1009 <out> : this parameter can be used to display some
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1010 strings at the AT command interface.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1011 The first char of one string must contain
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1012 the length of the following string. The
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1013 special length 0xff must be used to define
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1014 the end of the string list.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1015 <outLen> : maximum length of output buffer referenced
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1016 by parameter <out>.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1017
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1018 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1019
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1020 GLOBAL T_ACI_RETURN rAT_ACP (
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1021 CHAR* out,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1022 USHORT outLen
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1023 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1024 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1025 T_ACI_RETURN rslt = AT_CMPL;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1026
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1027 /* call the abort function if necessary */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1028 if ( currExtCmd NEQ AT_CMD_NONE )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1029 rslt = sAT_Abort (CMD_SRC_LCL, currExtCmd );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1030
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1031 switch ( rslt )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1032 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1033 case ( AT_CMPL ):
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1034 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1035 currExtCmd = AT_CMD_NONE;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1036
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1037 ext_LeaveEXT ( TRUE );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1038 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1039 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1040
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1041 case ( AT_EXCT ):
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1042 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1043 currExtCmd = AT_CMD_ABRT;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1044 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1045 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1046
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1047 default:
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1048 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1049 /* do nothing */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1050 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1051 break;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1052 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1053
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1054 return rslt;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1055 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1056
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1057 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1058 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1059 \| PROJECT : GSM-PS (6147) MODULE : CMH_EXTS \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1060 \| STATE : code ROUTINE : ext_OK \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1061 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1062
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1063 PURPOSE : This function is called by the MMI in case the positive
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1064 result of the asynchronous command handling is available.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1065
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1066 <cmdId>: command identity
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1067
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1068 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1069 GLOBAL void ext_OK ( T_ACI_AT_CMD cmdId )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1070 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1071 T_ACI_RETURN rslt;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1072
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1073 if ( cmdId EQ AT_CMD_CFUN AND currAbrtCmd EQ AT_CMD_NONE )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1074 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1075 rslt = sAT_PlusCOPS ( CMD_SRC_LCL,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1076 COPS_MOD_Auto,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1077 COPS_FRMT_NotPresent,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1078 NULL );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1079
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1080 if ( rslt EQ AT_EXCT )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1081 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1082 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1083 * generate some output at the AT interface
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1084 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1085 ext_CreatePString ( extBuffer, EXT_ATCOPS_START );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1086
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1087 sAT_URC ( extBuffer );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1088
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1089 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1090 * indicating that an extended AT command is still in progress
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1091 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1092 currExtCmd = AT_CMD_COPS;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1093 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1094 else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1095 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1096 ext_LeaveEXT ( TRUE );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1097 rCI_PlusCME ( AT_CMD_EXT, CME_ERR_Unknown );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1098 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1099 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1100 else if ( cmdId EQ AT_CMD_COPS AND currAbrtCmd EQ AT_CMD_NONE )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1101 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1102 currExtCmd = AT_CMD_NONE;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1103
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1104 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1105 * generate some output at the AT interface
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1106 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1107 ext_CreatePString ( extBuffer, EXT_ATCOPS_STOP );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1108
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1109 sAT_URC ( extBuffer );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1110
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1111 #ifndef WIN32
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1112 ext_ContinueTest ( EXT_DIAL_VOICE_PASS );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1113 #endif
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1114 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1115 else if ( cmdId EQ AT_CMD_D AND currAbrtCmd EQ AT_CMD_NONE )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1116 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1117 extCallId = 1;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1118
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1119 ext_LeaveEXT ( TRUE );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1120 rCI_OK ( AT_CMD_EXT );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1121 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1122 else if ( currAbrtCmd NEQ AT_CMD_NONE )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1123 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1124 currAbrtCmd = AT_CMD_NONE;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1125
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1126 ext_LeaveEXT ( TRUE );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1127 rCI_OK ( AT_CMD_EXT );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1128 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1129 else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1130 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1131 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1132 * generate some output at the AT interface
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1133 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1134 ext_CreatePString ( extBuffer, EXT_UNEXPCTD );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1135
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1136 sAT_URC ( extBuffer );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1137 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1138 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1139
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1140 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1141 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1142 \| PROJECT : GSM-PS (6147) MODULE : CMH_EXTS \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1143 \| STATE : code ROUTINE : ext_LeaveExtension \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1144 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1145
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1146 PURPOSE : This function is called in case the extensin mechansim
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1147 should be left finally.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1148
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1149 <final>: indicates whether final result code should be
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1150 sent explicitly
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1151
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1152 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1153 LOCAL void ext_LeaveEXT ( BOOL final )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1154 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1155 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1156 * generate some output at the AT interface
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1157 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1158 ext_CreatePString ( extBuffer, EXT_LEAVE );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1159
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1160 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1161 * indicating that no extended AT command is still in progress
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1162 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1163 currExtCmd = AT_CMD_NONE;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1164
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1165 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1166 * indicate end of extended command handling to the AT interpreter
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1167 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1168 sAT_URC ( extBuffer );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1169
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1170 if ( final )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1171 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1172 sAT_FRI ( extCmdLen );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1173 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1174 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1175
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1176 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1177 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1178 \| PROJECT : GSM-PS (6147) MODULE : CMH_EXTS \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1179 \| STATE : code ROUTINE : ext_ContinueTest \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1180 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1181
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1182 PURPOSE : This function is called in case the AT extension
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1183 procedure should be continued.
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1184
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1185 <id>: identifies the specific procedure to be continued
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1186
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1187 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1188 GLOBAL void ext_ContinueTest ( CHAR* id )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1189 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1190 T_ACI_RETURN rslt;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1191
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1192 if ( strcmp ( id, EXT_DIAL_VOICE_PASS ) EQ 0 )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1193 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1194 T_ACI_D_TOC callType = D_TOC_Data;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1195
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1196 if ( extDialNum [strlen ( extDialNum ) - 1] EQ EXT_VOICE_DELIMITER )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1197 callType = D_TOC_Voice;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1198
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1199 extDialNum[strlen ( extDialNum ) - 1] = '\0';
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1200
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1201 rslt = sAT_Dn ( CMD_SRC_LCL,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1202 extDialNum,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1203 D_CLIR_OVRD_Default,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1204 D_CUG_CTRL_NotPresent,
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1205 callType );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1206
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1207 if ( rslt EQ AT_EXCT )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1208 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1209 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1210 * generate some output at the AT interface
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1211 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1212 ext_CreatePString ( extBuffer, EXT_ATD );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1213
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1214 sAT_URC ( extBuffer );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1215
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1216 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1217 * indicating that an extended AT command is still in progress
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1218 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1219 currExtCmd = AT_CMD_D;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1220 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1221 else
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1222 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1223 ext_LeaveEXT ( TRUE );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1224 rCI_PlusCME ( AT_CMD_EXT, CME_ERR_Unknown );
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1225 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1226 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1227 }
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1228
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1229 /*
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1230 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1231 \| PROJECT : GSM-PS (6147) MODULE : CMH_EXTS \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1232 \| STATE : code ROUTINE : ext_CreatePString \|
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1233 +--------------------------------------------------------------------+
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1234
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1235 PURPOSE :
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1236
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1237 */
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1238 LOCAL void ext_CreatePString ( CHAR* buffer, CHAR* text )
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1239 {
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1240 buffer[0] = strlen (text);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1241 memcpy (&buffer[1], text, buffer[0]);
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1242 buffer [buffer[0]+1] = (CHAR) 0xff;
c14bc60c6c30 gsm-fw/g23m-glue/cst: import from Leonardo source Space Falcon <falcon@ivan.Harhan.ORG> parents: diff changeset	1243 }

FreeCalypso > hg > freecalypso-sw

annotate gsm-fw/g23m-glue/cst/cst_exts.c @ 874:72d64c172d85