--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/g23m-fad/l2r/tra_dnf.c	Fri Oct 16 06:25:50 2020 +0000
@@ -0,0 +1,236 @@
+/* 
++----------------------------------------------------------------------------- 
+|  Project :  CSD (8411)
+|  Modul   :  tra_dnf.c
++----------------------------------------------------------------------------- 
+|  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 defines the procedures and functions for TRA
++----------------------------------------------------------------------------- 
+*/ 
+
+#ifndef TRA_DNF_C
+#define TRA_DNF_C
+#endif
+
+#define ENTITY_L2R
+
+/*==== INCLUDES ===================================================*/
+
+#include <string.h>
+#include "typedefs.h"
+#include "pconst.cdg"
+#include "vsi.h"
+#include "macdef.h"
+#include "custom.h"
+#include "gsm.h"
+#include "prim.h"
+#include "pei.h"
+#include "tok.h"
+#include "dti.h"
+
+#include "cl_ribu.h"
+#include "tra_pei.h"
+#include "tra.h"
+
+/*==== CONST =======================================================*/
+
+/*==== TYPES =======================================================*/
+
+/*==== VAR EXPORT ==================================================*/
+
+/*==== VAR LOCAL ===================================================*/
+
+/*==== FUNCTIONS ===================================================*/
+
+/*
++------------------------------------------------------------------------------
+|  Function    : dl_init
++------------------------------------------------------------------------------
+|  Description : initialise the l2r data for the downlink process
+|
+|  Parameters  : T_TRA_DN *ddl
+|
+|
+|  Return      : -
++------------------------------------------------------------------------------
+*/
+
+GLOBAL void dl_init(T_TRA_DN *ddl)
+{
+  TRACE_FUNCTION ("dl_init()");
+
+  ddl->sa               = FL_INACTIVE;
+  ddl->sb               = FL_INACTIVE;
+  ddl->x                = FL_INACTIVE;
+  ddl->prim             = NULL;       /* meaning: no DTI2_DATA_IND allocated yet */
+  ddl->Brk_dti_data_ind = NULL;
+
+  SET_STATE (DN, DN_INACTIVE);
+}
+
+/*
++------------------------------------------------------------------------------
+|  Function    : dl_send_data_ind
++------------------------------------------------------------------------------
+|  Description : This procedure copies data from the downlink ring buffer
+|                into a a dti_data_ind primitive and sends this primitive
+|                to the upper layer.
+|                (Just the SDU data are copied into the ring buffer by RA!)
+|  Parameters  : -
+|
+|
+|  Return      : -
++------------------------------------------------------------------------------
+*/
+
+GLOBAL BOOL dl_send_data_ind(void)
+{
+  T_TRA_DN *ddl = &tra_data->dn;
+
+  TRACE_FUNCTION ("dl_send_data_ind()");
+
+  if (ddl->prim NEQ NULL) /* check for existing dti_data_ind */
+  {
+    ddl->prim->parameters.st_lines.st_line_sa   = ddl->sa;
+    ddl->prim->parameters.st_lines.st_line_sb   = ddl->sb;
+    ddl->prim->parameters.st_lines.st_flow      = ddl->x;
+    ddl->prim->parameters.st_lines.st_break_len = DTI_BREAK_OFF;
+    
+    ddl->prim->parameters.p_id = DTI_PID_UOS;
+    ddl->prim->link_id = 0; /* dummy init */
+
+    dti_send_data (l2r_hDTI, TRA_DTI_UP_INSTANCE, TRA_DTI_UP_INTERFACE, TRA_DTI_UP_CHANNEL, ddl->prim);
+    ddl->prim = NULL;
+    return TRUE;
+  }
+  else
+  {
+    TRACE_EVENT("no prim to send");
+  }
+  return FALSE;
+}
+
+/*
++------------------------------------------------------------------------------
+|  Function    : dl_prep_data_ind
++------------------------------------------------------------------------------
+|  Description : This procedure appends data from the downlink ring buffer
+|                to a already allocated dti_data_ind primitive
+|
+|  Parameters  : -
+|
+|
+|  Return      : -
++------------------------------------------------------------------------------
+*/
+
+GLOBAL void dl_prep_data_ind(T_FD *pFD)
+{
+  T_desc2* desc;   /* block to be copied to */
+  T_desc2* p_desc; /* prim to be copied to */
+
+  T_TRA_DN *ddl = &tra_data->dn;
+
+  TRACE_FUNCTION ("dl_prep_data_ind()");
+
+  if (ddl->prim EQ NULL) /* check for existing dti_data_ind */
+  {
+    PALLOC (dti_data_ind, DTI2_DATA_IND); /* start new prim */
+    ddl->prim = dti_data_ind;
+
+    ddl->prim->desc_list2.list_len = 0;
+
+    MALLOC (desc, TRA_DTI_BUF_SIZE);      /* contains header bytes, too! */
+
+    dti_data_ind->desc_list2.first =(ULONG) desc;
+
+    p_desc         = (T_desc2 *) dti_data_ind->desc_list2.first;
+    p_desc->len    = 0;
+    p_desc->size   = 0;
+    p_desc->offset = 0;
+    p_desc->next   = 0;
+
+    ddl->list_end = desc;   /* set flag for next entrance without sending */
+  }
+  else
+  {
+    p_desc = ddl->list_end; /* append to remembered list end */
+  }
+
+  if (!pFD) /* status bits changed; no data received */
+  {
+    return;
+  }
+
+  if ((TRA_DTI_BUF_SIZE - p_desc->len - sizeof(T_desc2) + 1) >= MAX_SDU_SIZE)
+  {
+    memcpy(&p_desc->buffer[p_desc->len], pFD->buf, pFD->len); /* copy data from ring buffer */
+  }
+  else /* start new block */
+  {
+    MALLOC (desc, (USHORT)TRA_DTI_BUF_SIZE);
+    p_desc->next   = (ULONG) desc;
+
+    /* Initialize the new block's fields to zero */
+    p_desc = (T_desc2 *)p_desc->next;
+    p_desc->len    = 0;
+    p_desc->next   = 0;
+    p_desc->size   = 0;
+    p_desc->offset = 0; /* temporary solution */
+
+    memcpy(&p_desc->buffer[p_desc->len], pFD->buf, pFD->len); /* copy data from ring buffer */
+    ddl->list_end = p_desc;                                     /* write back start of last list */
+  }
+  p_desc->len += pFD->len;
+  p_desc->size = p_desc->len;
+  ddl->prim->desc_list2.list_len += pFD->len;
+}
+
+/*
++------------------------------------------------------------------------------
+|  Function    : rbm_init
++------------------------------------------------------------------------------
+|  Description :
+|
+|  Parameters  :
+|
+|  Return      : -
++------------------------------------------------------------------------------
+*/
+
+GLOBAL void rbm_init(T_TRA_DN *ddl)
+{
+  TRACE_FUNCTION ("rbm_init()");
+
+  cl_ribu_create(&tra_data->dn.ribu, MAX_SDU_SIZE, TRA_DLR_DEPTH);
+}
+
+/*
++------------------------------------------------------------------------------
+|  Function    : tra_get_next_FrameDesc
++------------------------------------------------------------------------------
+|  Description : This function is called from the RA.
+|                It returns the frame descriptor for that buffer,
+|                which the RA has to write in the received frame.
+|
+|                WRAPPER: Get frame descriptor for Layer 1 (TI)
+|  Parameters  : -
+|
+|  Return      : -
++------------------------------------------------------------------------------
+*/
+
+GLOBAL T_FD *tra_get_next_FrameDesc(void)
+{
+  return (cl_ribu_get_new_frame_desc(tra_data->dn.ribu));
+}