diff src/g23m-fad/ppp/ppp_onas.c @ 174:90eb61ecd093

src/g23m-fad: initial import from TCS3.2/LoCosto
author Mychaela Falconia <falcon@freecalypso.org>
date Wed, 12 Oct 2016 05:40:46 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/g23m-fad/ppp/ppp_onas.c	Wed Oct 12 05:40:46 2016 +0000
@@ -0,0 +1,1334 @@
+/* 
++----------------------------------------------------------------------------- 
+|  Project :  
+|  Modul   :  
++----------------------------------------------------------------------------- 
+|  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 modul is part of the entity PPP and implements all 
+|             functions to handles the incoming process internal signals as  
+|             described in the SDL-documentation (ONA-statemachine)
++----------------------------------------------------------------------------- 
+*/ 
+
+#ifndef PPP_ONAS_C
+#define PPP_ONAS_C
+#endif /* !PPP_ONAS_C */
+
+#define ENTITY_PPP
+
+/*==== INCLUDES =============================================================*/
+
+#include "typedefs.h"   /* to get Condat data types */
+#include "vsi.h"        /* to get a lot of macros */
+#include "macdef.h"     /* to get a lot of macros */
+#include "custom.h"     /* to get a lot of macros */
+#include "gsm.h"        /* to get a lot of macros */
+#include "cnf_ppp.h"    /* to get cnf-definitions */
+#include "mon_ppp.h"    /* to get mon-definitions */
+#include "prim.h"       /* to get the definitions of used SAP and directions */
+#include "dti.h"        /* to get the DTILIB definitions */
+#include "ppp.h"        /* to get the global entity definitions */
+
+#include "ppp_arbf.h"   /* to get the arb function definitions */
+#include "ppp_ftxs.h"   /* to get the ftx signal interface */
+#include "ppp_lcps.h"   /* to get the lcp signal interface */
+#include "ppp_ncps.h"   /* to get the ncp signal interface */
+#include "ppp_onaf.h"   /* to get the ona function definitions */
+#include "ppp_rts.h"    /* to get the rt signal interface */
+
+/*==== CONST ================================================================*/
+
+/*==== LOCAL VARS ===========================================================*/
+
+/*==== PRIVATE FUNCTIONS ====================================================*/
+
+/*==== PUBLIC FUNCTIONS =====================================================*/
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_ruc_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_RUC_IND
+|
+| Parameters  : ptype  - type of packet
+|               packet - pointer to a generic data descriptor
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_ruc_ind (USHORT ptype, T_desc2* packet) 
+{ 
+  UBYTE index;
+  TRACE_ISIG( "sig_any_ona_ruc_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSING:
+    case ONA_REQ_SENT:
+    case ONA_ACK_RCVD:
+    case ONA_ACK_SENT:
+    case ONA_OPENED:
+      /*
+       * send code reject
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* scj */
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_RUC_IND unexpected" );
+      arb_discard_packet(packet);
+      break;
+  }
+} /* sig_any_ona_ruc_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_open_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_OPEN_IND
+|
+| Parameters  : ptype  - type of packet
+|               packet - pointer to a generic data descriptor
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_open_ind (USHORT ptype, T_desc2* packet) 
+{ 
+  UBYTE index;
+  TRACE_ISIG( "sig_any_ona_open_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_OPENED:
+    case ONA_CLOSED:
+    case ONA_CLOSING:
+    case ONA_REQ_SENT:
+    case ONA_ACK_RCVD:
+    case ONA_ACK_SENT:
+      SET_STATE( PPP_SERVICE_ONA, ONA_REQ_SENT );
+      /*
+       * reset counters
+       */
+      ppp_data->ona->restarts = ppp_data->mc;
+      ppp_data->ona->failures = ppp_data->mf;
+      ppp_data->ona->loops    = ppp_data->mc + 1;
+      /*
+       * send configure request
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* scr */
+      /*
+       * start timer
+       */
+      if(ppp_data->ona->restarts > 0)
+        ppp_data->ona->restarts--;
+      sig_any_rt_rrt_req();
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_OPEN_IND unexpected" );
+      arb_discard_packet(packet);
+      break;
+  }
+} /* sig_any_ona_open_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_down_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_DOWN_IND
+|
+| Parameters  : ptype  - type of packet
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_down_ind (USHORT ptype) 
+{ 
+  UBYTE index;
+  TRACE_ISIG( "sig_any_ona_down_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSED:
+    case ONA_OPENED:
+      SET_STATE( PPP_SERVICE_ONA, ONA_CLOSED );
+      break;
+    case ONA_CLOSING:
+    case ONA_REQ_SENT:
+    case ONA_ACK_RCVD:
+    case ONA_ACK_SENT:
+      SET_STATE( PPP_SERVICE_ONA, ONA_CLOSED );
+      /*
+       * stop timer
+       */
+      sig_any_rt_srt_req();
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_DOWN_IND unexpected" );
+      break;
+  }
+} /* sig_any_ona_down_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_close_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_CLOSE_IND
+|
+| Parameters  : ptype  - type of packet
+|               packet - pointer to a generic data descriptor
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_close_ind (USHORT ptype, T_desc2* packet) 
+{ 
+  UBYTE index;
+  TRACE_ISIG( "sig_any_ona_close_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSED:
+      arb_discard_packet(packet);
+      /*
+       * send This-Layer-Finished signal
+       */
+      if (ptype EQ DTI_PID_LCP) 
+      {
+        sig_ona_lcp_tlf_req();
+      } 
+      else if (ptype EQ DTI_PID_IPCP) 
+      {
+        sig_ona_ncp_tlf_req();
+      } 
+      break;
+    case ONA_CLOSING:
+      arb_discard_packet(packet);
+      break;
+    case ONA_OPENED:
+    case ONA_REQ_SENT:
+    case ONA_ACK_RCVD:
+    case ONA_ACK_SENT:
+      SET_STATE( PPP_SERVICE_ONA, ONA_CLOSING );
+      /*
+       * reset counter
+       */
+      ppp_data->ona->restarts = ppp_data->mt;
+      /*
+       * send terminate request
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* str */
+      /*
+       * start timer
+       */
+      if(ppp_data->ona->restarts > 0)
+        ppp_data->ona->restarts--;
+      sig_any_rt_rrt_req();
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_CLOSE_IND unexpected" );
+      arb_discard_packet(packet);
+      break;
+  }
+} /* sig_any_ona_close_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_rtr_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_RTR_IND
+|
+| Parameters  : ptype  - type of packet
+|               packet - pointer to a generic data descriptor
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_rtr_ind (USHORT ptype, T_desc2* packet) 
+{
+  UBYTE index;
+
+  TRACE_ISIG( "sig_any_ona_rtr_ind" );
+
+  TRACE_EVENT( "Peer requested Termination by PPP frame" );
+
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSING:
+      /*
+       * send terminate acknowledge
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* sta */
+      break;
+    case ONA_OPENED:
+      SET_STATE( PPP_SERVICE_ONA, ONA_CLOSING );
+      /*
+       * send This-Layer-Down signal
+       */
+      if (ptype EQ DTI_PID_LCP) 
+      {
+        sig_ona_lcp_tld_req();
+      } 
+      else if (ptype EQ DTI_PID_IPCP) 
+      {
+        sig_ona_ncp_tld_req();
+      } 
+      ppp_data->ona = & ppp_data->ona_base[index];
+    case ONA_REQ_SENT:
+    case ONA_ACK_RCVD:
+    case ONA_ACK_SENT:
+      SET_STATE( PPP_SERVICE_ONA, ONA_CLOSING );
+      /*
+       * set counter to zero
+       */
+      ppp_data->ona->restarts = 0;
+      /*
+       * send terminate acknowledge
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* sta */
+      /*
+       * start timer
+       */
+      sig_any_rt_rrt_req();
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_RTR_IND unexpected" );
+      arb_discard_packet(packet);
+      break;
+  }
+
+  /*
+   * set error code
+   */
+  if(ppp_data->ppp_cause EQ 0)
+    ppp_data->ppp_cause = PPP_TERM_OK_PEER;
+
+} /* sig_any_ona_rtr_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_to_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_TO_IND
+|
+| Parameters  : ptype  - type of packet
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_to_ind (USHORT ptype) 
+{ 
+  UBYTE index;
+  T_desc2* packet = NULL;
+  TRACE_ISIG( "sig_any_ona_to_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSING:
+      if (ppp_data->ona->restarts EQ 0)
+      {
+        /*
+         * negative timeout
+         */
+        SET_STATE( PPP_SERVICE_ONA, ONA_CLOSED );
+        /*
+         * set error code
+         */
+        if(ppp_data->ppp_cause EQ 0)
+          ppp_data->ppp_cause = PPP_TERM_NO_RESPONSE;
+        /*
+         * send This-Layer-Finished signal
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_tlf_req();
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_tlf_req();
+        }
+      }
+      else
+      {
+        /*
+         * positive timeout
+         */
+        /*
+         * request a new terminate request packet
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_str_req(&packet);
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_str_req(&packet);
+        }
+        /*
+         * set counter and send terminate request packet
+         */
+        ppp_data->ona->restarts--;
+        sig_any_ftx_packet_req(ptype, packet); /* str */
+        /*
+         * restart timer
+         */
+        sig_any_rt_rrt_req();
+      }
+      break;
+    case ONA_REQ_SENT:
+    case ONA_ACK_SENT:
+      if (ppp_data->ona->restarts EQ 0)
+      {
+        /*
+         * negative timeout
+         */
+        SET_STATE( PPP_SERVICE_ONA, ONA_CLOSED );
+        /*
+         * set error code
+         */
+        if(ppp_data->ppp_cause EQ 0)
+          ppp_data->ppp_cause = PPP_TERM_NO_RESPONSE;
+        /*
+         * send This-Layer-Finished signal
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_tlf_req();
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_tlf_req();
+        }
+      }
+      else
+      {
+        /*
+         * positive timeout
+         */
+        /*
+         * request a new configure request packet
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_scr_req(&packet);
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_scr_req(&packet);
+        }
+        /*
+         * set counter and send configure request packet
+         */
+        ppp_data->ona->restarts--;
+        sig_any_ftx_packet_req(ptype, packet); /* scr */
+        /*
+         * restart timer
+         */
+        sig_any_rt_rrt_req();
+      }      
+      break;
+    case ONA_ACK_RCVD:
+      if (ppp_data->ona->restarts EQ 0)
+      {
+        /*
+         * negative timeout
+         */
+        SET_STATE( PPP_SERVICE_ONA, ONA_CLOSED );
+        /*
+         * set error code
+         */
+        if(ppp_data->ppp_cause EQ 0)
+          ppp_data->ppp_cause = PPP_TERM_NO_RESPONSE;
+        /*
+         * send This-Layer-Finished signal
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_tlf_req();
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_tlf_req();
+        }
+      }
+      else
+      {
+        /*
+         * positive timeout
+         */
+        SET_STATE( PPP_SERVICE_ONA, ONA_REQ_SENT );
+        /*
+         * request a new configure request packet
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_scr_req(&packet);
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_scr_req(&packet);
+        }
+        /*
+         * set counter and send configure request packet
+         */
+        ppp_data->ona->restarts--;
+        sig_any_ftx_packet_req(ptype, packet); /* scr */
+        /*
+         * restart timer
+         */
+        sig_any_rt_rrt_req();
+      }      
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_TO_IND unexpected" );
+      break;
+  }
+} /* sig_any_ona_to_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_rta_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_RTA_IND
+|
+| Parameters  : ptype  - type of packet
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_rta_ind (USHORT ptype) 
+{ 
+  UBYTE index;
+  T_desc2* packet = NULL;
+  TRACE_ISIG( "sig_any_ona_rta_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSING:
+      SET_STATE( PPP_SERVICE_ONA, ONA_CLOSED );
+      /*
+       * stop timer
+       */
+      sig_any_rt_srt_req();
+      /*
+       * send This-Layer-Finished signal
+       */
+      if (ptype EQ DTI_PID_LCP) 
+      {
+        sig_ona_lcp_tlf_req();
+      } 
+      else if (ptype EQ DTI_PID_IPCP) 
+      {
+        sig_ona_ncp_tlf_req();
+      }
+      break;
+    case ONA_REQ_SENT:
+    case ONA_ACK_RCVD:
+    case ONA_ACK_SENT:
+      break;
+    case ONA_OPENED:
+      SET_STATE( PPP_SERVICE_ONA, ONA_REQ_SENT );
+      /*
+       * send This-Layer-Down signal and
+       * request a new configure request packet
+       */
+      if (ptype EQ DTI_PID_LCP) 
+      {
+        sig_ona_lcp_tld_req();
+        sig_ona_lcp_scr_req(&packet);
+      } 
+      else if (ptype EQ DTI_PID_IPCP) 
+      {
+        sig_ona_ncp_tld_req();
+        sig_ona_ncp_scr_req(&packet);
+      }
+      ppp_data->ona = & ppp_data->ona_base[index];
+      /*
+       * send configure request packet
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* scr */
+      /*
+       * start timer
+       */
+      if(ppp_data->ona->restarts > 0)
+        ppp_data->ona->restarts--;
+      sig_any_rt_rrt_req();
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_RTA_IND unexpected" );
+      break;
+  }
+} /* sig_any_ona_rta_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_rxjn_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_RXJN_IND
+|
+| Parameters  : ptype  - type of packet
+|               packet - pointer to a generic data descriptor
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_rxjn_ind (USHORT ptype, T_desc2* packet) 
+{ 
+  UBYTE index;
+  TRACE_ISIG( "sig_any_ona_rxjn_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  /*
+   * set error code
+   */
+  if(ppp_data->ppp_cause EQ 0)
+  {
+    switch(ptype)
+    {
+      case DTI_PID_LCP:
+        ppp_data->ppp_cause = PPP_TERM_LCP_NOT_CONVERGE;
+        break;
+      case DTI_PID_IPCP:
+        ppp_data->ppp_cause = PPP_TERM_IPCP_NOT_CONVERGE;
+        break;
+    }
+  }
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSING:
+      SET_STATE( PPP_SERVICE_ONA, ONA_CLOSED );
+      arb_discard_packet(packet);
+      /*
+       * stop timer
+       */
+      sig_any_rt_srt_req();
+      /*
+       * send This-Layer-Finished signal
+       */
+      if (ptype EQ DTI_PID_LCP) 
+      {
+        sig_ona_lcp_tlf_req();
+      } 
+      else if (ptype EQ DTI_PID_IPCP) 
+      {
+        sig_ona_ncp_tlf_req();
+      }
+      break;
+    case ONA_OPENED:
+      SET_STATE( PPP_SERVICE_ONA, ONA_CLOSING );
+      /*
+       * send This-Layer-Down signal
+       */
+      if (ptype EQ DTI_PID_LCP) 
+      {
+        sig_ona_lcp_tld_req();
+      } 
+      else if (ptype EQ DTI_PID_IPCP) 
+      {
+        sig_ona_ncp_tld_req();
+      }
+      ppp_data->ona = & ppp_data->ona_base[index];
+    case ONA_REQ_SENT:
+    case ONA_ACK_RCVD:
+    case ONA_ACK_SENT:
+      SET_STATE( PPP_SERVICE_ONA, ONA_CLOSING );
+      /*
+       * set counter
+       */
+      ppp_data->ona->restarts = ppp_data->mt;
+      /*
+       * send terminate request packet
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* str */
+      /*
+       * start timer
+       */
+      if(ppp_data->ona->restarts > 0)
+        ppp_data->ona->restarts--;
+      sig_any_rt_rrt_req();
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_RXJN_IND unexpected" );
+      arb_discard_packet(packet);
+      break;
+  }
+} /* sig_any_ona_rxjn_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_rcrn_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_RCRN_IND
+|
+| Parameters  : ptype  - type of packet
+|               packet - pointer to a generic data descriptor
+|               newFlag - flag
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_rcrn_ind (USHORT ptype, T_desc2* packet, UBYTE newFlag) 
+{ 
+  UBYTE    index;
+  T_desc2* req_packet = NULL;
+
+  TRACE_ISIG( "sig_any_ona_rcrn_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSING:
+      arb_discard_packet(packet);
+      break;
+    case ONA_REQ_SENT:
+    case ONA_ACK_SENT:
+      if (ppp_data->ona->failures EQ 0)
+      {
+        /*
+         * protocol not converge
+         */
+        SET_STATE( PPP_SERVICE_ONA, ONA_CLOSING );
+        /*
+         * set error code
+         */
+        if(ppp_data->ppp_cause EQ 0)
+        {
+          switch(ptype)
+          {
+            case DTI_PID_LCP:
+              ppp_data->ppp_cause = PPP_TERM_LCP_NOT_CONVERGE;
+              break;
+            case DTI_PID_IPCP:
+              ppp_data->ppp_cause = PPP_TERM_IPCP_NOT_CONVERGE;
+              break;
+          }
+        }
+        arb_discard_packet(packet);
+        /*
+         * set counter
+         */
+        ppp_data->ona->restarts = ppp_data->mt;
+        /*
+         * request terminate request packet
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_str_req(&packet);
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_str_req(&packet);
+        }
+        /*
+         * send terminate request
+         */
+        sig_any_ftx_packet_req(ptype, packet); /* str */
+        /*
+         * start timer
+         */
+        if(ppp_data->ona->restarts > 0)
+          ppp_data->ona->restarts--;
+        sig_any_rt_rrt_req();
+      }
+      else
+      {
+        SET_STATE( PPP_SERVICE_ONA, ONA_REQ_SENT );
+        /*
+         * send configure nak packet
+         */
+        sig_any_ftx_packet_req(ptype, packet); /* scn */
+        if (newFlag EQ TRUE)
+        {
+          ppp_data->ona->failures--;
+        }
+      }
+      break;
+    case ONA_ACK_RCVD:
+      if (ppp_data->ona->failures EQ 0)
+      {
+        /*
+         * protocol not converge
+         */
+        SET_STATE( PPP_SERVICE_ONA, ONA_CLOSING );
+        /*
+         * set error code
+         */
+        if(ppp_data->ppp_cause EQ 0)
+        {
+          switch(ptype)
+          {
+            case DTI_PID_LCP:
+              ppp_data->ppp_cause = PPP_TERM_LCP_NOT_CONVERGE;
+              break;
+            case DTI_PID_IPCP:
+              ppp_data->ppp_cause = PPP_TERM_IPCP_NOT_CONVERGE;
+              break;
+          }
+        }
+        arb_discard_packet(packet);
+        /*
+         * set counter
+         */
+        ppp_data->ona->restarts = ppp_data->mt;
+        /*
+         * request terminate request packet
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_str_req(&packet);
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_str_req(&packet);
+        }
+        /*
+         * send terminate request packet
+         */
+        sig_any_ftx_packet_req(ptype, packet); /* str */
+        /*
+         * start timer
+         */
+        if(ppp_data->ona->restarts > 0)
+          ppp_data->ona->restarts--;
+        sig_any_rt_rrt_req();
+      }
+      else
+      {
+        /*
+         * send configure nak packet
+         */
+        sig_any_ftx_packet_req(ptype, packet); /* scn */
+        if (newFlag EQ TRUE)
+        {
+          ppp_data->ona->failures--;
+          sig_any_rt_rrt_req();
+        }
+      }
+      break;
+    case ONA_OPENED:
+      SET_STATE( PPP_SERVICE_ONA, ONA_REQ_SENT );
+      /*
+       * send This_Layer_Down signal and
+       * request configure request packet
+       */
+      if (ptype EQ DTI_PID_LCP) 
+      {
+        sig_ona_lcp_tld_req();
+        sig_ona_lcp_scr_req(&req_packet);
+      } 
+      else if (ptype EQ DTI_PID_IPCP) 
+      {
+        sig_ona_ncp_tld_req();
+        sig_ona_ncp_scr_req(&req_packet);
+      }
+      ppp_data->ona = & ppp_data->ona_base[index];
+      /*
+       * send configure request packet
+       */
+      sig_any_ftx_packet_req(ptype, req_packet); /* scr */
+      if(ppp_data->ona->restarts > 0)
+        ppp_data->ona->restarts--;
+      if ((newFlag EQ TRUE) && (ppp_data->ona->failures > 0))
+      {
+        ppp_data->ona->failures--;
+      }
+      /*
+       * send configure nak packet
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* scn */
+      /*
+       * start timer
+       */
+      sig_any_rt_rrt_req();
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_RCRN_IND unexpected" );
+      break;
+  }
+} /* sig_any_ona_rcrn_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_rcrp_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_RCRP_IND
+|
+| Parameters  : ptype  - type of packet
+|               packet - pointer to a generic data descriptor
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_rcrp_ind (USHORT ptype, T_desc2* packet) 
+{ 
+  UBYTE index;
+  T_desc2* req_packet = NULL;
+  TRACE_ISIG( "sig_any_ona_rcrp_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSING:
+      arb_discard_packet(packet);
+      break;
+    case ONA_REQ_SENT:
+    case ONA_ACK_SENT:
+      SET_STATE( PPP_SERVICE_ONA, ONA_ACK_SENT );
+      /*
+       * set counter
+       */
+      ppp_data->ona->failures = ppp_data->mf;
+      /*
+       * send configure acknowledge packet
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* sca */
+      break;
+    case ONA_ACK_RCVD:
+      SET_STATE( PPP_SERVICE_ONA, ONA_OPENED );
+      /*
+       * stop timer
+       */
+      sig_any_rt_srt_req();
+      /*
+       * reset counter
+       */
+      ppp_data->ona->failures = ppp_data->mf;
+      /*
+       * send configure acknowledge packet
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* sca */
+      /*
+       * send This-Layer_Up signal
+       */
+      if (ptype EQ DTI_PID_LCP) 
+      {
+        sig_ona_lcp_tlu_req();
+      } 
+      else if (ptype EQ DTI_PID_IPCP) 
+      {
+        sig_ona_ncp_tlu_req();
+      }
+      break;
+    case ONA_OPENED:
+      SET_STATE( PPP_SERVICE_ONA, ONA_ACK_SENT );
+      /*
+       * send This-Layer-Down signal and
+       * request configure request packet
+       */
+      if (ptype EQ DTI_PID_LCP) 
+      {
+        sig_ona_lcp_tld_req();
+        sig_ona_lcp_scr_req(&req_packet);
+      } 
+      else if (ptype EQ DTI_PID_IPCP) 
+      {
+        sig_ona_ncp_tld_req();
+        sig_ona_ncp_scr_req(&req_packet);
+      }
+      ppp_data->ona = & ppp_data->ona_base[index];
+      /*
+       * send configure request packet
+       */
+      sig_any_ftx_packet_req(ptype, req_packet); /* scr */
+      if(ppp_data->ona->restarts > 0)
+        ppp_data->ona->restarts--;
+      /*
+       * send configure acknowledge packet
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* sca */
+      /* 
+       * restart timer
+       */
+      sig_any_rt_rrt_req();
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_RCRP_IND unexpected" );
+      arb_discard_packet(packet);
+      break;
+  }
+} /* sig_any_ona_rcrp_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_rcn_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_RCN_IND
+|
+| Parameters  : ptype  - type of packet
+|               packet - pointer to a generic data descriptor
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_rcn_ind (USHORT ptype, T_desc2* packet) 
+{ 
+  UBYTE index;
+  TRACE_ISIG( "sig_any_ona_rcn_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSING:
+      arb_discard_packet(packet);
+      break;
+    case ONA_REQ_SENT:
+    case ONA_ACK_SENT:
+      /*
+       * reset counter
+       */
+      ppp_data->ona->restarts = ppp_data->mc;
+      /*
+       * send configure request packet
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* scr */
+      /*
+       * start timer
+       */
+      if(ppp_data->ona->restarts > 0)
+        ppp_data->ona->restarts--;
+      sig_any_rt_rrt_req();
+      break;
+    case ONA_ACK_RCVD:
+      SET_STATE( PPP_SERVICE_ONA, ONA_REQ_SENT );
+      /*
+       * send configure request packet
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* scr */
+      /*
+       * start timer
+       */
+      sig_any_rt_rrt_req();
+      break;
+    case ONA_OPENED:
+      SET_STATE( PPP_SERVICE_ONA, ONA_REQ_SENT );
+      /*
+       * send This-Layer-Down signal
+       */
+      if (ptype EQ DTI_PID_LCP) 
+      {
+        sig_ona_lcp_tld_req();
+      } 
+      else if (ptype EQ DTI_PID_IPCP) 
+      {
+        sig_ona_ncp_tld_req();
+      }
+      ppp_data->ona = & ppp_data->ona_base[index];
+      /*
+       * send configure request packet
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* scr */
+      /*
+       * start timer
+       */
+      if(ppp_data->ona->restarts > 0)
+        ppp_data->ona->restarts--;
+      sig_any_rt_rrt_req();
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_RCN_IND unexpected" );
+      arb_discard_packet(packet);
+      break;
+  }
+} /* sig_any_ona_rcn_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_rca_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_RCA_IND
+|
+| Parameters  : ptype  - type of packet
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_rca_ind (USHORT ptype) 
+{ 
+  UBYTE index;
+  T_desc2* temp_desc = NULL;
+
+  TRACE_ISIG( "sig_any_ona_rca_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSING:
+    case ONA_ACK_RCVD:
+    case ONA_OPENED:
+      break;
+    case ONA_REQ_SENT:
+      if(ppp_data->ona->loops EQ 0)
+      {
+        /*
+         * protocol not converge
+         */
+        SET_STATE( PPP_SERVICE_ONA, ONA_CLOSING );
+        /*
+         * set error code
+         */
+        if(ppp_data->ppp_cause EQ 0)
+        {
+          switch(ptype)
+          {
+            case DTI_PID_LCP:
+              ppp_data->ppp_cause = PPP_TERM_LCP_NOT_CONVERGE;
+              break;
+            case DTI_PID_IPCP:
+              ppp_data->ppp_cause = PPP_TERM_IPCP_NOT_CONVERGE;
+              break;
+          }
+        }
+        /*
+         * set counter
+         */
+        ppp_data->ona->restarts = ppp_data->mt;
+        /*
+         * request terminate request packet
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_str_req(&temp_desc);
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_str_req(&temp_desc);
+        }
+        /*
+         * send terminate request
+         */
+        sig_any_ftx_packet_req(ptype, temp_desc); /* str */
+        /*
+         * start timer
+         */
+        if(ppp_data->ona->restarts > 0)
+          ppp_data->ona->restarts--;
+        sig_any_rt_rrt_req();
+      }
+      else
+      {
+        SET_STATE( PPP_SERVICE_ONA, ONA_ACK_RCVD );
+        /*
+         * reset counters
+         */
+        ppp_data->ona->restarts = ppp_data->mc;
+        ppp_data->ona->loops--;
+        /*
+         * start timer
+         */
+        sig_any_rt_rrt_req();
+      }
+      break;
+
+    case ONA_ACK_SENT:
+      if(ppp_data->ona->loops EQ 0)
+      {
+        /*
+         * protocol not converge
+         */
+        SET_STATE( PPP_SERVICE_ONA, ONA_CLOSING );
+        /*
+         * set error code
+         */
+        if(ppp_data->ppp_cause EQ 0)
+        {
+          switch(ptype)
+          {
+            case DTI_PID_LCP:
+              ppp_data->ppp_cause = PPP_TERM_LCP_NOT_CONVERGE;
+              break;
+            case DTI_PID_IPCP:
+              ppp_data->ppp_cause = PPP_TERM_IPCP_NOT_CONVERGE;
+              break;
+          }
+        }
+        /*
+         * set counter
+         */
+        ppp_data->ona->restarts = ppp_data->mt;
+        /*
+         * request terminate request packet
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_str_req(&temp_desc);
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_str_req(&temp_desc);
+        }
+        /*
+         * send terminate request
+         */
+        sig_any_ftx_packet_req(ptype, temp_desc); /* str */
+        /*
+         * start timer
+         */
+        if(ppp_data->ona->restarts > 0)
+          ppp_data->ona->restarts--;
+        sig_any_rt_rrt_req();
+      }
+      else
+      {
+        SET_STATE( PPP_SERVICE_ONA, ONA_OPENED );
+        /*
+         * stop timer
+         */
+        sig_any_rt_srt_req();
+        /*
+         * reset counter
+         */
+        ppp_data->ona->restarts = ppp_data->mc;
+        ppp_data->ona->loops--;
+        /* 
+         * send This_Layer_Up signal
+         */
+        if (ptype EQ DTI_PID_LCP) 
+        {
+          sig_ona_lcp_tlu_req();
+        } 
+        else if (ptype EQ DTI_PID_IPCP) 
+        {
+          sig_ona_ncp_tlu_req();
+        }
+      }
+      break;
+
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_RCA_IND unexpected" );
+      break;
+  }
+} /* sig_any_ona_rca_ind() */
+
+
+
+/*
++------------------------------------------------------------------------------
+| Function    : sig_any_ona_rxr_ind
++------------------------------------------------------------------------------
+| Description : Handles the internal signal SIG_ANY_ONA_RXR_IND
+|
+| Parameters  : ptype  - type of packet
+|               packet - pointer to a generic data descriptor
+|
++------------------------------------------------------------------------------
+*/
+GLOBAL void sig_any_ona_rxr_ind (USHORT ptype, T_desc2* packet) 
+{ 
+  UBYTE index;
+  TRACE_ISIG( "sig_any_ona_rxr_ind" );
+  
+  /*
+   * determine ONA-instance
+   */
+  ona_get_inst_index(ptype, &index);
+  ppp_data->ona = & ppp_data->ona_base[index];
+
+  switch( GET_STATE( PPP_SERVICE_ONA ) )
+  {
+    case ONA_CLOSING:
+    case ONA_REQ_SENT:
+    case ONA_ACK_RCVD:
+    case ONA_ACK_SENT:
+      arb_discard_packet(packet);
+      break;
+    case ONA_OPENED:
+      /*
+       * send echo reply packet
+       */
+      sig_any_ftx_packet_req(ptype, packet); /* ser */
+      break;
+    default:
+      TRACE_ERROR( "SIG_ANY_ONA_RXR_IND unexpected" );
+      arb_discard_packet(packet);
+      break;
+  }
+} /* sig_any_ona_rxr_ind() */