FreeCalypso > hg > freecalypso-sw
view gsm-fw/g23m-aci/aci/cmh_l2rs.c @ 992:a7b0b426f9ca
target-utils: boot ROM UART autodetection revamped
The new implementation should work with both the familiar Calypso C035
boot ROM version found in our regular targets as well as the older
Calypso F741979B version found on the vintage D-Sample board.
author | Mychaela Falconia <falcon@ivan.Harhan.ORG> |
---|---|
date | Wed, 30 Dec 2015 21:28:41 +0000 |
parents | eedbf248bac0 |
children |
line wrap: on
line source
/* +----------------------------------------------------------------------------- | Project : GSM-PS (6147) | Modul : CMH_L2RS +----------------------------------------------------------------------------- | Copyright 2002 Texas Instruments Berlin, AG | All rights reserved. | | This file is confidential and a trade secret of Texas | Instruments Berlin, AG | The receipt of or possession of this file does not convey | any rights to reproduce or disclose its contents or to | manufacture, use, or sell anything it may describe, in | whole, or in part, without the specific written consent of | Texas Instruments Berlin, AG. +----------------------------------------------------------------------------- | Purpose : This module provides the set functions related to the | protocol stack adapter for L2R. +----------------------------------------------------------------------------- */ #ifdef DTI #ifndef CMH_L2RS_C #define CMH_L2RS_C #endif #include "aci_all.h" /*==== INCLUDES ===================================================*/ #include "aci_cmh.h" #include "ati_cmd.h" #include "aci_cmd.h" #include "dti.h" /* functionality of the dti library */ #include "aci.h" #ifdef FAX_AND_DATA #include "aci_fd.h" #endif /* of #ifdef FAX_AND_DATA */ #include "dti_conn_mng.h" #include "dti_cntrl_mng.h" #include "psa.h" #include "cmh.h" #include "cmh_ra.h" #include "psa_l2r.h" #include "cmh_l2r.h" #include "psa_ra.h" #include "psa_tra.h" #ifdef UART #include "psa_uart.h" #endif #ifdef FF_PSI #include "psa_psi.h" #endif /*FF_PSI*/ /*==== CONSTANTS ==================================================*/ /*==== EXPORT =====================================================*/ /*==== VARIABLES ==================================================*/ /*==== FUNCTIONS ==================================================*/ /* +--------------------------------------------------------------------+ | PROJECT : GSM-PS (6147) MODULE : CMH_L2RS | | STATE : code ROUTINE : sAT_PlusCRLP | +--------------------------------------------------------------------+ PURPOSE : This is the functional counterpart to the +CRLP AT command which is responsible to set the radio link protocol parameters for following asynchronous data transfer calls. <iws>: IWF to MS window size. <mws>: MS to IWF window size <t1> : acknowledge timer <n2> : retransmission attemps */ GLOBAL T_ACI_RETURN sAT_PlusCRLP ( T_ACI_CMD_SRC srcId, SHORT iws, SHORT mws, SHORT t1, SHORT n2) { T_L2R_CMD_PRM * pL2RCmdPrm; /* points to L2R command parameters */ TRACE_FUNCTION ("sAT_PlusCRLP()"); /* *------------------------------------------------------------------- * check command source *------------------------------------------------------------------- */ if(!cmh_IsVldCmdSrc (srcId)) { ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); return( AT_FAIL ); } pL2RCmdPrm = &fnd_cmhPrm[srcId].l2rCmdPrm; /* *------------------------------------------------------------------- * process the iws parameter ( IWF to MS window size ) *------------------------------------------------------------------- */ if( iws NEQ ACI_NumParmNotPresent ) { if( iws > L2R_K_IWF_MS_MAX OR iws < L2R_K_IWF_MS_MIN ) { ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); return( AT_FAIL ); } } else iws = pL2RCmdPrm -> CRLPiws; /* *------------------------------------------------------------------- * process the mws parameter ( MS to IWF window size ) *------------------------------------------------------------------- */ if( mws NEQ ACI_NumParmNotPresent ) { if( mws > L2R_K_MS_IWF_MAX OR mws < L2R_K_MS_IWF_MIN ) { ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); return( AT_FAIL ); } } else mws = pL2RCmdPrm -> CRLPmws; /* *------------------------------------------------------------------- * process the t1 parameter ( acknowledge timer ) *------------------------------------------------------------------- */ if( t1 NEQ ACI_NumParmNotPresent ) { if( t1 > L2R_T1_MAX OR t1 < L2R_T1_MIN ) { ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); return( AT_FAIL ); } } else t1 = pL2RCmdPrm -> CRLPt1; /* *------------------------------------------------------------------- * process the n2 parameter ( retransmission attemps ) *------------------------------------------------------------------- */ if( n2 NEQ ACI_NumParmNotPresent ) { if( n2 > L2R_N2_MAX OR n2 < L2R_N2_MIN ) { ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); return( AT_FAIL ); } } else n2 = pL2RCmdPrm -> CRLPn2; /* *------------------------------------------------------------------- * assign the parameters *------------------------------------------------------------------- */ pL2RCmdPrm -> CRLPiws = iws; pL2RCmdPrm -> CRLPmws = mws; pL2RCmdPrm -> CRLPt1 = t1; pL2RCmdPrm -> CRLPn2 = n2; return( AT_CMPL ); } /* +--------------------------------------------------------------------+ | PROJECT : GSM-PS (6147) MODULE : CMH_L2RS | | STATE : code ROUTINE : sAT_PlusDS | +--------------------------------------------------------------------+ PURPOSE : This is the functional counterpart to the +DS AT command which is responsible to set the data compression control parameters for following asynchronous data transfer calls. <dir> : desired direction of data compression. <comp> : mode of continue <maxDict> : maximum number of dictionary entries <maxStr> : maximum string length */ GLOBAL T_ACI_RETURN sAT_PlusDS ( T_ACI_CMD_SRC srcId, T_ACI_DS_DIR dir, T_ACI_DS_COMP comp, LONG maxDict, SHORT maxStr ) { T_L2R_CMD_PRM * pL2RCmdPrm; /* points to L2R command parameters */ TRACE_FUNCTION ("sAT_PlusDS()"); /* *------------------------------------------------------------------- * check command source *------------------------------------------------------------------- */ if(!cmh_IsVldCmdSrc (srcId)) { ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); return( AT_FAIL ); } pL2RCmdPrm = &fnd_cmhPrm[srcId].l2rCmdPrm; /* *------------------------------------------------------------------- * process the dir parameter *------------------------------------------------------------------- */ switch( dir ) { case( DS_DIR_NotPresent ): dir = pL2RCmdPrm -> DSdir; break; case( DS_DIR_Negotiated ): case( DS_DIR_TxOnly ): case( DS_DIR_RxOnly ): case( DS_DIR_Both ): break; default: ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); return( AT_FAIL ); } /* *------------------------------------------------------------------- * process the comp parameter *------------------------------------------------------------------- */ switch( comp ) { case( DS_COMP_NotPresent ): comp = pL2RCmdPrm -> DScomp; break; case( DS_COMP_DoNotDisc ): case( DS_COMP_Disc ): break; default: ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); return( AT_FAIL ); } /* *------------------------------------------------------------------- * process the maxDict parameter *------------------------------------------------------------------- */ if( maxDict NEQ ACI_NumParmNotPresent ) { if( maxDict > L2R_P1_MAX OR maxDict < L2R_P1_MIN ) { ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); return( AT_FAIL ); } } else maxDict = pL2RCmdPrm -> DSmaxDict; /* *------------------------------------------------------------------- * process the maxStr parameter *------------------------------------------------------------------- */ if( maxStr NEQ ACI_NumParmNotPresent ) { if( maxStr > L2R_P2_MAX OR maxStr < L2R_P2_MIN ) { ACI_ERR_DESC( ACI_ERR_CLASS_Ext, EXT_ERR_Parameter ); return( AT_FAIL ); } } else maxStr = pL2RCmdPrm -> DSmaxStr; /* *------------------------------------------------------------------- * assign the parameters *------------------------------------------------------------------- */ pL2RCmdPrm -> DSdir = dir; pL2RCmdPrm -> DScomp = comp; pL2RCmdPrm -> DSmaxDict = maxDict; pL2RCmdPrm -> DSmaxStr = maxStr; return( AT_CMPL ); } /* +-------------------------------------------------------------------+ | PROJECT : GSM-PS (6147) MODULE : CMH_L2R | | ROUTINE : cmhL2R_Activate | +-------------------------------------------------------------------+ PURPOSE : set all nescessary parameters and activate L2R */ GLOBAL T_ACI_RETURN cmhL2R_Activate ( T_ACI_CMD_SRC srcId, T_ACI_AT_CMD cmdId, SHORT cId ) { T_L2R_CMD_PRM * pL2RCmdPrm; /* points to L2R command parameters */ T_L2R_SET_PRM * pL2RSetPrm; /* points to L2R parameter set */ TRACE_FUNCTION ("cmhL2R_Activate()"); /* *------------------------------------------------------------------- * check command source *------------------------------------------------------------------- */ if(!cmh_IsVldCmdSrc (srcId)) return( AT_FAIL ); pL2RCmdPrm = &fnd_cmhPrm[srcId].l2rCmdPrm; pL2RSetPrm = &l2rShrdPrm.set_prm[srcId]; /* *------------------------------------------------------------------- * fill in activate parameters *------------------------------------------------------------------- */ pL2RSetPrm -> k_ms_iwf = pL2RCmdPrm -> CRLPmws; pL2RSetPrm -> k_iwf_ms = pL2RCmdPrm -> CRLPiws; pL2RSetPrm -> t1 = (UBYTE)pL2RCmdPrm -> CRLPt1; pL2RSetPrm -> n2 = (UBYTE)pL2RCmdPrm -> CRLPn2; pL2RSetPrm -> p0 = cmhL2R_SelCompDir( pL2RCmdPrm ); pL2RSetPrm -> p1 = (USHORT)pL2RCmdPrm -> DSmaxDict; pL2RSetPrm -> p2 = (UBYTE)pL2RCmdPrm -> DSmaxStr; pL2RSetPrm -> uil2p = L2R_ISO6429; pL2RSetPrm -> rate = cmhL2R_SelChnRate(); l2rEntStat.curCmd = cmdId; l2rEntStat.entOwn = srcId; if( psaL2R_Activate((UBYTE)srcId ) < 0 ) /* activate L2R */ { TRACE_EVENT( "FATAL RETURN psaL2R in cmhL2R_Activate" ); return( AT_FAIL ); } return( AT_EXCT ); } /* +-------------------------------------------------------------------+ | PROJECT : GSM-PS (6147) MODULE : CMH_L2R | | ROUTINE : cmhL2R_Deactivate | +-------------------------------------------------------------------+ PURPOSE : set all nescessary parameters and deactivate L2R */ GLOBAL T_ACI_RETURN cmhL2R_Deactivate ( void ) { UBYTE src_id = raShrdPrm.owner; UBYTE dti_id; T_DTI_CNTRL info; TRACE_FUNCTION ("cmhL2R_Deactivate()"); if (dti_cntrl_get_info_from_src_id( src_id, &info) EQ FALSE) { TRACE_EVENT_P1("cannot find info for src_id=%d", src_id); if( psaL2R_Deactivate() < 0 ) /* deactivate L2R */ { TRACE_EVENT( "FATAL RETURN psaL2R in cmhL2R_Deactivate" ); return( AT_FAIL ); } return( AT_EXCT ); } #if defined (FF_TCP_IP) if( dti_cntrl_is_dti_channel_connected(DTI_ENTITY_AAA, info.dti_id) EQ TRUE ) { if ( dti_cntrl_close_dpath_from_src_id(src_id) EQ TRUE ) { return( AT_EXCT ); } else { TRACE_EVENT("FATAL RETURN in dti_cntrl_close_dpath_from_src_id"); return( AT_FAIL ); } } #endif /* FF_TCP_IP */ dti_id = info.dti_id; /* get the redirection of this src_id */ if (info.redirect_info.info.direction EQ DTI_DEV_IS_REDIRECTED) { T_DTI_CNTRL tmp_param; if (BITFIELD_CHECK(info.redirect_info.info.capability, DTI_CPBLTY_SER)) { dti_cntrl_get_first_redirection (info.src_id, DTI_CPBLTY_SER, &tmp_param); src_id = tmp_param.src_id; dti_id = tmp_param.dti_id; } else if (BITFIELD_CHECK(info.redirect_info.info.capability, DTI_CPBLTY_PKT)) { dti_cntrl_get_first_redirection (info.src_id, DTI_CPBLTY_PKT, &tmp_param); src_id = tmp_param.src_id; dti_id = tmp_param.dti_id; } else { TRACE_EVENT("capability is not SER or PKT"); } } if( dti_cntrl_is_dti_channel_connected(DTI_ENTITY_L2R, dti_id) EQ TRUE AND dti_cntrl_is_dti_channel_connected(DTI_ENTITY_UART, dti_id) EQ TRUE) { /*no internal dti_id */ T_DTI_ENTITY_ID entity_list[] = {DTI_ENTITY_ACI}; if (dti_cntrl_est_dpath_indirect ( src_id, entity_list, 1, SPLIT, atiUART_dti_cb, DTI_CPBLTY_CMD, DTI_CID_NOTPRESENT) EQ TRUE) { return( AT_EXCT ); } else { /* deactivate */ if( psaL2R_Deactivate() < 0 ) /* deactivate L2R */ { TRACE_EVENT( "FATAL RETURN psaL2R in cmhL2R_Deactivate" ); return( AT_FAIL ); } } } #ifdef FF_PSI if (dti_cntrl_is_dti_channel_connected(DTI_ENTITY_L2R, dti_id) AND dti_cntrl_is_dti_channel_connected(DTI_ENTITY_PSI, dti_id)) { T_DTI_ENTITY_ID entity_list[] = {DTI_ENTITY_ACI}; if (dti_cntrl_est_dpath_indirect ( src_id, entity_list, 1, SPLIT, atiPSI_dti_cb, DTI_CPBLTY_CMD, DTI_CID_NOTPRESENT) EQ TRUE) { return( AT_EXCT ); } else { /* deactivate */ if( psaL2R_Deactivate() < 0 ) /* deactivate L2R */ { TRACE_EVENT( "FATAL RETURN psaL2R in cmhL2R_Deactivate" ); return( AT_FAIL ); } } } #endif /*FF_PSI*/ else { if( psaL2R_Deactivate() < 0 ) /* deactivate L2R */ { TRACE_EVENT( "FATAL RETURN psaL2R in cmhL2R_Deactivate" ); return( AT_FAIL ); } } return( AT_EXCT ); } /* +-------------------------------------------------------------------+ | PROJECT : GSM-PS (6147) MODULE : CMH_L2R | | ROUTINE : cmhTRA_Deactivate | +-------------------------------------------------------------------+ PURPOSE : set all nescessary parameters and deactivate TRA */ GLOBAL T_ACI_RETURN cmhTRA_Deactivate ( void ) { UBYTE src_id = raShrdPrm.owner; UBYTE dti_id; T_DTI_CNTRL info; TRACE_FUNCTION ("cmhTRA_Deactivate()"); if (dti_cntrl_get_info_from_src_id( src_id, &info) EQ FALSE) { TRACE_EVENT_P1("cannot find info for src_id=%d", src_id); psaTRA_Deactivate(); /* deactivate TRA */ return( AT_EXCT ); } dti_id = info.dti_id; /* get the redirection of this src_id */ if (info.redirect_info.info.direction EQ DTI_DEV_IS_REDIRECTED) { T_DTI_CNTRL tmp_param; if (BITFIELD_CHECK(info.redirect_info.info.capability, DTI_CPBLTY_SER)) { dti_cntrl_get_first_redirection (info.src_id, DTI_CPBLTY_SER, &tmp_param); src_id = tmp_param.src_id; dti_id = tmp_param.dti_id; } else if (BITFIELD_CHECK(info.redirect_info.info.capability, DTI_CPBLTY_PKT)) { dti_cntrl_get_first_redirection (info.src_id, DTI_CPBLTY_PKT, &tmp_param); src_id = tmp_param.src_id; dti_id = tmp_param.dti_id; } else { TRACE_EVENT("capability is not SER or PKT"); } } if (dti_cntrl_is_dti_channel_connected(DTI_ENTITY_TRA, dti_id) AND dti_cntrl_is_dti_channel_connected(DTI_ENTITY_UART, dti_id)) { T_DTI_ENTITY_ID entity_list[] = {DTI_ENTITY_ACI}; if (dti_cntrl_est_dpath_indirect ( src_id, entity_list, 1, SPLIT, atiUART_dti_cb, DTI_CPBLTY_CMD, DTI_CID_NOTPRESENT) EQ TRUE) { return( AT_EXCT ); } else { /* deactivate */ psaTRA_Deactivate(); /* deactivate TRA */ } } #ifdef FF_PSI if (dti_cntrl_is_dti_channel_connected(DTI_ENTITY_TRA, dti_id) AND dti_cntrl_is_dti_channel_connected(DTI_ENTITY_PSI, dti_id)) { T_DTI_ENTITY_ID entity_list[] = {DTI_ENTITY_ACI}; if (dti_cntrl_est_dpath_indirect ( src_id, entity_list, 1, SPLIT, atiPSI_dti_cb, DTI_CPBLTY_CMD, DTI_CID_NOTPRESENT) EQ TRUE) { return( AT_EXCT ); } else { /* deactivate */ psaTRA_Deactivate(); /* deactivate TRA */ } } #endif /*FF_PSI*/ else { psaTRA_Deactivate(); /* deactivate TRA */ } return( AT_EXCT ); } #endif /* DTI */ /*==== EOF ========================================================*/