diff src/g23m-aci/aci/psa_ssp.c @ 1:fa8dc04885d8

src/g23m-*: import from Magnetite
author Mychaela Falconia <falcon@freecalypso.org>
date Fri, 16 Oct 2020 06:25:50 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/g23m-aci/aci/psa_ssp.c	Fri Oct 16 06:25:50 2020 +0000
@@ -0,0 +1,488 @@
+/* 
++----------------------------------------------------------------------------- 
+|  Project :  GSM-PS (6147)
+|  Modul   :  PSA_SSP
++----------------------------------------------------------------------------- 
+|  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 defines the processing functions for the
+|             primitives send to the protocol stack adapter by 
+|             supplementary service.
++----------------------------------------------------------------------------- 
+*/ 
+
+#ifndef PSA_SSP_C
+#define PSA_SSP_C
+#endif
+
+#include "aci_all.h"
+
+/*==== INCLUDES ===================================================*/
+#include "aci_cmh.h"
+#include "ati_cmd.h"
+#include "aci_cmd.h"
+
+#include "ksd.h"
+#include "aci.h"
+#include "psa.h"
+#include "psa_ss.h"
+
+#ifdef SIM_TOOLKIT
+#include "psa_cc.h"
+#include "psa_sat.h"
+#endif
+
+#include "cmh_ss.h"
+#include "aci_mem.h"
+
+/*==== CONSTANTS ==================================================*/
+
+
+/*==== TYPES ======================================================*/
+
+
+/*==== EXPORT =====================================================*/
+
+
+/*==== VARIABLES ==================================================*/
+
+
+/*==== FUNCTIONS ==================================================*/
+
+
+/*
++-------------------------------------------------------------------+
+| PROJECT : GSM-PS (6147)         MODULE  : PSA_SSP                 |
+|                                 ROUTINE : psa_mnss_begin_ind      |
++-------------------------------------------------------------------+
+
+  PURPOSE : processes the MNSS_BEGIN_IND primitive send by SS.
+            this indicates an incoming service transaction.
+
+*/
+
+GLOBAL void psa_mnss_begin_ind 
+                                 ( T_MNSS_BEGIN_IND *mnss_begin_ind )
+{
+  SHORT sId;                /* holds service id */        
+  T_SS_SRV_TBL * pStbNtry;  /* holds pointer to service table entry */
+
+  TRACE_FUNCTION ("psa_mnss_begin_ind()");
+
+/*
+ *-------------------------------------------------------------------
+ * check for new entry in service table
+ *-------------------------------------------------------------------
+ */  
+ psaSS_DumpFIE ( &mnss_begin_ind -> fac_inf );
+#ifdef TI_PS_FF_AT_P_CMD_CSCN
+ cmhSS_sendFie( CSCN_FACILITY_DIRECTION_IN,
+                CSCN_FACILITY_TRANS_TYPE_BEGIN,
+                &mnss_begin_ind -> fac_inf);
+#endif /* TI_PS_FF_AT_P_CMD_CSCN */
+
+  sId = psaSS_stbNewEntry();
+
+  if( sId < 0 )
+  {
+    TRACE_EVENT ("MTS rejected due to full service table");
+
+    return;
+  }
+
+/*
+ *-------------------------------------------------------------------
+ * update shared parameter and notify ACI
+ *-------------------------------------------------------------------
+ */ 
+  pStbNtry = &ssShrdPrm.stb[sId];
+  
+  pStbNtry -> ntryUsdFlg = TRUE;
+  pStbNtry -> ti         = mnss_begin_ind -> ti;
+
+  pStbNtry -> srvStat = SSS_ACT;
+  pStbNtry -> srvType = ST_MTS;
+
+  psaSS_chngSrvTypCnt( sId, +1 );
+
+/*
+ *-------------------------------------------------------------------
+ * decode component type
+ *-------------------------------------------------------------------
+ */  
+  CCD_START;
+  {
+    UBYTE ccdRet;
+
+    MCAST( com, COMPONENT );  /* T_COMPONENT *com = (T_COMPONENT *)_decodedMsg; */
+    memset( com, 0, sizeof( T_COMPONENT ));
+    
+    ccdRet = ccd_decodeMsg (CCDENT_FAC,
+                            DOWNLINK,
+                            (T_MSGBUF *) &mnss_begin_ind -> fac_inf,
+                            (UBYTE    *) _decodedMsg,
+                            COMPONENT);
+    if( ccdRet NEQ ccdOK )
+    {
+      TRACE_EVENT_P1( "CCD Decoding Error: %d",ccdRet );
+      ssShrdPrm.stb[sId].failType = SSF_CCD_DEC;
+      cmhSS_TransFail(sId);
+    }
+    else
+    {
+      /* use prim buffer as further decoding buffer */
+      ssFIEDecodeBuf = mnss_begin_ind -> fac_inf.fac;
+
+      if( com->v_inv_comp )
+      {
+        T_COMPONENT *psCopyOfCom;
+        ACI_MALLOC( psCopyOfCom, sizeof(T_COMPONENT) );
+        /* now copy the com content for second CCD process */
+        memcpy( psCopyOfCom, com, sizeof(T_COMPONENT) );
+        psaSS_dasmInvokeCmp( sId, &(psCopyOfCom->inv_comp) );
+        ACI_MFREE(psCopyOfCom);
+      }
+      else
+      {
+        TRACE_EVENT( "WRONG COMPONENT TYPE RECEIVED" );
+      }
+    }
+  }
+  CCD_END;
+/*
+ *-------------------------------------------------------------------
+ * free primitive
+ *-------------------------------------------------------------------
+ */
+  ssFIEDecodeBuf = NULL;
+  PFREE (mnss_begin_ind);
+}
+
+/*
++-------------------------------------------------------------------+
+| PROJECT : GSM-PS (6147)         MODULE  : PSA_SSP                 |
+|                                 ROUTINE : psa_mnss_end_ind        |
++-------------------------------------------------------------------+
+
+  PURPOSE : processes the MNSS_END_IND primitive send by SS.
+            this indicates the end of a service transaction.
+
+*/
+
+GLOBAL void psa_mnss_end_ind( T_MNSS_END_IND *mnss_end_ind )
+{
+  SHORT        sId;          /* holds service id */
+  T_SS_SRV_TBL *pStbNtry;    /* holds pointer to service table entry */
+  SHORT        pending_sId;  /* holds second id if there is one */
+  BOOL         this_is_a_ussd_string;
+  T_ACI_RETURN ss_return;
+
+  TRACE_FUNCTION ("psa_mnss_end_ind()");
+
+  /* trace facility */
+ psaSS_DumpFIE ( &mnss_end_ind -> fac_inf );
+#ifdef TI_PS_FF_AT_P_CMD_CSCN
+ cmhSS_sendFie ( CSCN_FACILITY_DIRECTION_IN,
+                 CSCN_FACILITY_TRANS_TYPE_END,
+                 &mnss_end_ind -> fac_inf);
+#endif /* TI_PS_FF_AT_P_CMD_CSCN */
+
+#ifdef SIM_TOOLKIT
+  /* reinitalize. */
+  satShrdPrm.sId_pwd_requested = NO_ENTRY;
+#endif /* SIM_TOOLKIT */
+
+  /* find service in service table */  
+  sId = psaSS_stbFindTi( mnss_end_ind -> ti );
+
+  if( sId < 0 )
+  {
+    /* ignore primitive, due to not found transaction identifier. */
+    TRACE_EVENT ("primitive rejected due to unused ti");
+    PFREE(mnss_end_ind);
+    return;
+  }
+
+  /* update shared parameter */  
+  pStbNtry = &ssShrdPrm.stb[sId];
+
+  pStbNtry -> failType = SSF_SS_ENT;
+  pStbNtry -> entCs    = mnss_end_ind -> cause;
+
+  pStbNtry -> srvStat = SSS_IDL;
+
+  psaSS_chngSrvTypCnt( sId, -1 );
+  psaSS_retMOSTi( sId );
+
+  /****** Is this a USSD operation ? ****/
+  if( ssShrdPrm.stb[sId].curCmd EQ AT_CMD_CUSD   OR
+      ssShrdPrm.stb[sId].curCmd EQ (T_ACI_AT_CMD)KSD_CMD_USSD )
+  {
+    this_is_a_ussd_string = TRUE;
+  }
+#ifdef SIM_TOOLKIT
+  else if( ssShrdPrm.stb[sId].srvOwn EQ OWN_SRC_SAT  AND
+           sId EQ satShrdPrm.SentUSSDid )
+  {
+    /* SAT send USSD case */
+    this_is_a_ussd_string = TRUE;
+  }
+#endif /* SIM_TOOLKIT */
+  else
+    this_is_a_ussd_string = FALSE;
+  /************************************/
+
+
+  /****** check error cause ***********/
+  TRACE_EVENT_P1 ("SS end indication cause: %d", mnss_end_ind -> cause);
+
+  if( mnss_end_ind->cause EQ MNSS_CAUSE_FACILITY_REJECT )
+  {
+    TRACE_EVENT("Facility has been rejected");
+
+    /* check for protocol incompatibility for USSD */
+    if( this_is_a_ussd_string  AND
+        psaSS_asmUSSDProt1(sId) )
+    {   
+      /* facility with Protocole 1 format has been sent: wait for answer */
+    }
+    else
+    {
+      cmhSS_TransFail(sId);
+    }
+    PFREE (mnss_end_ind);
+    return;
+  }
+  /************************************/
+
+#ifdef SIM_TOOLKIT
+  /* if SIM TOOLKIT and empty facility send send error to SAT 
+  (but should have checked USSD compatibility BEFORE) */
+  if( (ssShrdPrm.stb[sId].srvOwn EQ OWN_SRC_SAT) AND
+      (mnss_end_ind -> fac_inf.l_fac EQ 0) )
+  {
+    cmhSS_TransFail(sId);
+    PFREE (mnss_end_ind);
+    return;
+  }
+#endif /* SIM_TOOLKIT */
+
+
+  /*************************/
+  /* decode component type */
+  CCD_START;
+  {
+    UBYTE        ccdRet;
+    T_COMPONENT *psCopyOfCom;
+    BOOL        is_critical_warning = FALSE;
+
+    MCAST( com, COMPONENT );    /* T_COMPONENT *com = (T_COMPONENT *)_decodedMsg; */
+    memset( com, 0, sizeof( T_COMPONENT ));
+    
+
+    ccdRet = ccd_decodeMsg (CCDENT_FAC,
+                            DOWNLINK,
+                            (T_MSGBUF *) &mnss_end_ind -> fac_inf,
+                            (UBYTE    *) _decodedMsg,
+                            COMPONENT);
+    if( ccdRet NEQ ccdOK )
+    {
+      if (ccdRet EQ ccdWarning)
+      {
+        UBYTE ccd_err;
+        USHORT parlist [6];
+
+        ccd_err = ccd_getFirstError (CCDENT_SS, parlist);
+
+        do
+        {
+          switch (ccd_err)
+          {
+            case ERR_LEN_MISMATCH:     /* recoverable warnings */
+            break;                       
+            default:
+            is_critical_warning = TRUE;  /* critical warning */
+          }
+          ccd_err = ccd_getNextError (CCDENT_SS, parlist);
+        }while (ccd_err NEQ ERR_NO_MORE_ERROR);
+      }
+
+      if((ccdRet EQ ccdError) OR is_critical_warning)
+      {
+        TRACE_EVENT_P1("CCD Decoding Error: %d", ccdRet);
+        ssShrdPrm.stb[sId].failType = SSF_CCD_DEC;
+        cmhSS_TransFail(sId);
+        CCD_END;
+        PFREE (mnss_end_ind);
+        return;
+      }
+    }
+
+    /* use prim buffer as further decoding buffer */
+    ssFIEDecodeBuf = mnss_end_ind -> fac_inf.fac;
+
+    ACI_MALLOC( psCopyOfCom, sizeof(T_COMPONENT) );
+    /* now copy the com content for second CCD process */
+    memcpy( psCopyOfCom, com, sizeof(T_COMPONENT) );
+
+#ifdef SIM_TOOLKIT
+    if( ssShrdPrm.stb[sId].srvOwn EQ OWN_SRC_SAT )
+    {
+      ss_return = psaSAT_ss_end_ind( sId, psCopyOfCom, mnss_end_ind, this_is_a_ussd_string );
+    }
+    else
+#endif /* SIM_TOOLKIT */
+    {
+      ss_return = psaSS_ss_end_ind( sId, psCopyOfCom, this_is_a_ussd_string );
+    }
+
+    ACI_MFREE(psCopyOfCom);
+
+    switch(ss_return)
+    {
+      case(AT_CMPL):
+        /* facility with Protocole 1 format has been sent: wait for answer */
+        CCD_END;
+        PFREE (mnss_end_ind);
+        return;
+
+      case(AT_EXCT):
+        /* if more than one transactions were intended, send next one */
+        if ( ssShrdPrm.mltyTrnFlg )
+        {
+          /* no error occured, then send next one */
+          pending_sId = psaSS_GetPendingTrn( );
+          /* unsent id flag */
+          ssShrdPrm.mltyTrnFlg &= ~( 1u << pending_sId );
+          /* send pending primitive */
+          PSENDX (SS, ssShrdPrm.stb[pending_sId].save_prim ); 
+        }
+        break;
+
+      default:
+        cmhSS_TransFail(sId);
+        break;
+    }
+  }
+  CCD_END;
+  PFREE (mnss_end_ind);
+}
+
+/*
++-------------------------------------------------------------------+
+| PROJECT : GSM-PS (6147)         MODULE  : PSA_SSP                 |
+|                                 ROUTINE : psa_mnss_facility_ind   |
++-------------------------------------------------------------------+
+
+  PURPOSE : processes the MNSS_FACILITY_IND primitive send by SS.
+            this indicates the receiving of a facility information 
+            element.
+
+*/
+
+GLOBAL void psa_mnss_facility_ind 
+                           ( T_MNSS_FACILITY_IND *mnss_facility_ind )
+{
+  SHORT sId;                 /* holds call id */
+
+  TRACE_FUNCTION ("psa_mnss_facility_ind()");
+
+/*
+ *-------------------------------------------------------------------
+ * find call in call table
+ *-------------------------------------------------------------------
+ */
+ psaSS_DumpFIE ( &mnss_facility_ind -> fac_inf );
+#ifdef TI_PS_FF_AT_P_CMD_CSCN
+ cmhSS_sendFie ( CSCN_FACILITY_DIRECTION_IN,
+                 CSCN_FACILITY_TRANS_TYPE,
+                 &mnss_facility_ind -> fac_inf);
+#endif /* TI_PS_FF_AT_P_CMD_CSCN */
+
+  sId = psaSS_stbFindTi( mnss_facility_ind -> ti );
+
+  if( sId < 0 )
+  {
+   /* 
+    * ignore primitive, due to not found transaction identifier.
+    */
+    TRACE_EVENT ("primitive rejected due to unused ti");
+    PFREE(mnss_facility_ind);
+    return;
+  }
+
+/*
+ *-------------------------------------------------------------------
+ * update shared parameter and notify ACI
+ *-------------------------------------------------------------------
+ */  
+
+/*
+ *-------------------------------------------------------------------
+ * decode component type
+ *-------------------------------------------------------------------
+ */ 
+  CCD_START;
+  {
+    UBYTE        ccdRet;
+
+    MCAST( com, COMPONENT ); /* T_COMPONENT *com = (T_COMPONENT *)_decodedMsg; */
+    memset( com, 0, sizeof( T_COMPONENT ));
+
+    ccdRet = ccd_decodeMsg (CCDENT_FAC,
+                            DOWNLINK,
+                            (T_MSGBUF *) &mnss_facility_ind -> fac_inf,
+                            (UBYTE    *) _decodedMsg,
+                            COMPONENT);    
+    if( ccdRet NEQ ccdOK )
+    {
+      TRACE_EVENT_P1( "CCD Decoding Error: %d",ccdRet );
+      ssShrdPrm.stb[sId].failType = SSF_CCD_DEC;
+      cmhSS_TransFail(sId);
+    }
+    else
+    {
+      T_COMPONENT *psCopyOfCom;
+      ACI_MALLOC( psCopyOfCom, sizeof(T_COMPONENT) );
+      /* now copy the com content for second CCD process */
+      memcpy( psCopyOfCom, com, sizeof(T_COMPONENT) );
+
+      /* use prim buffer as further decoding buffer */
+      ssFIEDecodeBuf = mnss_facility_ind -> fac_inf.fac;
+
+      if( com->v_inv_comp)
+      {
+        psaSS_dasmInvokeCmp( sId, &(psCopyOfCom->inv_comp) );
+      }
+      else if (com->v_res_comp)
+      {
+        psaSS_dasmResultCmp( sId, &(psCopyOfCom->res_comp) );
+      }
+      else
+      {
+        TRACE_EVENT( "WRONG COMPONENT TYPE RECEIVED" );
+      }
+
+      ACI_MFREE(psCopyOfCom);
+    }
+  }
+  CCD_END;
+/*
+ *-------------------------------------------------------------------
+ * free the primitive buffer
+ *-------------------------------------------------------------------
+ */  
+  PFREE (mnss_facility_ind);
+}
+
+
+/*==== EOF =========================================================*/