view src/aci2/aci/cmh_l2rs.c @ 701:35e7f9d0379f

targets: add TARGET_HAS_BUZZER to c11x, c139 and dsample This new target config preprocessor symbol was introduced in Tourmaline in connection with the new approach to playing buzzer melodies via PWT, properly omitting the responsible code on targets where BU output controls the vibrator instead. That code is not present in Magnetite and we have no plans to backport it here, but target header files should be kept consistent between the two trees, especially given that we plan to support FC Venus target in Magnetite.
author Mychaela Falconia <falcon@freecalypso.org>
date Sat, 26 Mar 2022 19:51:34 +0000
parents 93999a60b835
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 ========================================================*/