--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/g23m-gsm/alr2/alr_rach.c	Fri Oct 16 06:29:12 2020 +0000
@@ -0,0 +1,427 @@
+/*
++-----------------------------------------------------------------------------
+|  Project :  GSM-PS
+|  Modul   :  ALR_RACH
++-----------------------------------------------------------------------------
+|  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 SDL process RACH_Control.
++-----------------------------------------------------------------------------
+*/
+
+#ifndef ALR_RACH_C
+#define ALR_RACH_C
+
+#define ENTITY_PL
+
+/*==== INCLUDES ===================================================*/
+#include <string.h>
+#include <stdlib.h>
+#include <ctype.h>
+#include "typedefs.h"
+#include "pconst.cdg"
+#include "mconst.cdg"
+#include "message.h"
+#include "ccdapi.h"
+#include "vsi.h"
+#include "custom.h"
+#include "gsm.h"
+#include "prim.h"
+#include "cnf_alr.h"
+#include "mon_alr.h"
+#include "pei.h"
+#include "tok.h"
+#include "pcm.h"
+#ifdef GPRS
+#include "alr_gprs.h"
+#endif
+
+#include "alr.h"
+#include "alr_em.h"
+
+/*==== EXPORT =====================================================*/
+/*==== PRIVAT =====================================================*/
+
+/*==== VARIABLES ==================================================*/
+#if defined (WIN32)
+#define TRACING
+#endif
+
+#if defined (TRACING)
+#define ALR_TRACE_RACH(a)  ALR_TRACE(a)
+#else
+#define ALR_TRACE_RACH(a)
+#endif
+
+#if defined (TRACING)
+
+#define ALR_TRACE_RACH_CLASS(x)   TRACE_EVENT_P1 ("class %d",x)
+#define ALR_TRACE_RACH_POWER(p)   TRACE_EVENT_P1 ("configured power = %d", p)
+
+#else
+
+#define ALR_TRACE_RACH_CLASS(x)
+#define ALR_TRACE_RACH_POWER(p)
+
+#endif
+
+/*==== FUNCTIONS ==================================================*/
+
+/*
++--------------------------------------------------------------------+
+| PROJECT : GSM-PS (6103)       MODULE  : ALR_RACH                   |
+| STATE   : code                ROUTINE : rach_init                  |
++--------------------------------------------------------------------+
+
+  PURPOSE : Initialize RACH Control Process.
+
+*/
+
+GLOBAL void rach_init (void)
+{
+  alr_data->state[STATE_RA] = RA_NULL;
+}
+
+/*
++--------------------------------------------------------------------+
+| PROJECT : GSM-PS (6103)       MODULE  : ALR_RACH                   |
+| STATE   : code                ROUTINE : rach_configure_class       |
++--------------------------------------------------------------------+
+
+  PURPOSE : Process signal rach_configure_class from SDL process
+            Main_Control.
+
+*/
+GLOBAL void rach_configure_class (UBYTE ms_class,
+                                  UBYTE dcs_class)
+{
+  /*
+   * +1 because of interface difference between RR and TI
+   */
+  alr_data->rach_data.ms_class     = (UBYTE)(ms_class  + 1);
+  alr_data->rach_data.dcs_class    = (UBYTE)(dcs_class + 1);
+
+  ALR_TRACE_RACH_CLASS (alr_data->rach_data.ms_class);
+}
+
+/*
++--------------------------------------------------------------------+
+| PROJECT : GSM-PS (6103)       MODULE  : ALR_RACH                   |
+| STATE   : code                ROUTINE : rach_configure_power       |
++--------------------------------------------------------------------+
+
+  PURPOSE : Process signal rach_configure_power from SDL process
+            Main_Control.
+
+*/
+
+GLOBAL void rach_configure_power (UBYTE power)
+{
+  ALR_TRACE_RACH_POWER(power);
+
+  alr_data->rach_data.max_tx_pwr_ccch     = power;
+}
+/*
++--------------------------------------------------------------------+
+| PROJECT : GSM-PS (6103)       MODULE  : ALR_RACH                   |
+| STATE   : code                ROUTINE : rach_stop                  |
++--------------------------------------------------------------------+
+
+  PURPOSE : Process signal rach_stop from SDL process
+            Main_Control.
+*/
+
+GLOBAL void rach_stop (void)
+{
+  switch (GET_STATE (STATE_RA))
+  {
+    case RA_ACTIVE:
+      ma_rach_stop_ra_req ();
+      /*lint -fallthrough*/
+    case RA_LISTEN_TO_CCCH:
+      SET_STATE (STATE_RA, RA_NULL);
+      break;
+
+    default:
+      break;
+  }
+}
+
+
+/*
++--------------------------------------------------------------------+
+| PROJECT : GSM-PS (6103)       MODULE  : ALR_RACH                   |
+| STATE   : code                ROUTINE : rach_random_req            |
++--------------------------------------------------------------------+
+
+  PURPOSE : Process signal rach_random_req from SDL process
+            Main_Control.
+
+*/
+
+GLOBAL void rach_random_req (T_MPH_RANDOM_ACCESS_REQ  *random_req)
+{
+  switch (GET_STATE (STATE_RA))
+  {
+    case RA_NULL:
+      if (random_req->send_mode.no NEQ 0)
+      {
+        PALLOC (ra_req, MPHC_RA_REQ);
+
+        ALR_EM_START_CONNECTION_ESTABLISHMENT;
+
+        /*
+         * Start Random Burst Sending
+         */
+        memcpy (alr_data->rach_data.delta, random_req->send_mode.delta,
+                sizeof (alr_data->rach_data.delta));
+        memcpy (alr_data->rach_data.channel_request,
+                random_req->send_mode.rach,
+                sizeof (alr_data->rach_data.channel_request));
+        alr_data->rach_data.max_bursts = random_req->send_mode.no;
+        alr_data->rach_data.c_burst = 0;
+        /*
+         * power limitation
+         */
+        ra_req->txpwr          = cut_power_value (alr_data->rach_data.max_tx_pwr_ccch, NULL);
+        ra_req->powerclass_gsm = alr_data->rach_data.ms_class;
+        ra_req->powerclass_dcs = alr_data->rach_data.dcs_class;
+
+        /*
+         * Modification: Add 1 to the time of RR !!!!
+         */
+        ra_req->rand = (UBYTE)(alr_data->rach_data.delta[alr_data->rach_data.c_burst]+1);
+        ra_req->channel_request = alr_data->rach_data.channel_request[alr_data->rach_data.c_burst++];
+        SET_STATE (STATE_RA, RA_ACTIVE);
+        ma_rach_ra_req (ra_req);
+      }
+      break;
+
+    case RA_ACTIVE:
+      if (random_req->send_mode.no EQ 0)
+      {
+
+        ALR_EM_STOP_CONNECTION_ESTABLISHMENT;
+
+        SET_STATE (STATE_RA, RA_LISTEN_TO_CCCH);
+        ma_rach_stop_ra_req ();
+      }
+      else
+      {
+        /*stop to be safe */
+        ma_rach_stop_ra_req ();
+        {
+          PALLOC (ra_req, MPHC_RA_REQ);
+
+          ALR_EM_START_CONNECTION_ESTABLISHMENT;
+
+          /*
+           * Start Random Burst Sending
+           */
+          memcpy (alr_data->rach_data.delta, random_req->send_mode.delta,
+                  sizeof (alr_data->rach_data.delta));
+          memcpy (alr_data->rach_data.channel_request,
+                  random_req->send_mode.rach,
+                  sizeof (alr_data->rach_data.channel_request));
+          alr_data->rach_data.max_bursts = random_req->send_mode.no;
+          alr_data->rach_data.c_burst = 0;
+          /*
+           * power limitation
+           */
+          ra_req->txpwr          = cut_power_value (alr_data->rach_data.max_tx_pwr_ccch, NULL);
+          ra_req->powerclass_gsm = alr_data->rach_data.ms_class;
+          ra_req->powerclass_dcs = alr_data->rach_data.dcs_class;
+
+          /*
+           * Modification: Add 1 to the time of RR !!!!
+           */
+          ra_req->rand = (UBYTE)(alr_data->rach_data.delta[alr_data->rach_data.c_burst]+1);
+          ra_req->channel_request = alr_data->rach_data.channel_request[alr_data->rach_data.c_burst++];
+          SET_STATE (STATE_RA, RA_ACTIVE);
+          ma_rach_ra_req (ra_req);
+        } /*PALLOC*/
+      } /* if */
+      break;
+    default:
+      break;
+  }
+}
+
+/*
++--------------------------------------------------------------------+
+| PROJECT : GSM-PS (6103)       MODULE  : ALR_RACH                   |
+| STATE   : code                ROUTINE : rach_ra_cnf                |
++--------------------------------------------------------------------+
+
+  PURPOSE : Process signal rach_ra_cnf from SDL process
+            Main_Control.
+
+*/
+
+GLOBAL void rach_ra_cnf (T_MPHC_RA_CON  *ra_cnf)
+{
+  UBYTE c_burst = alr_data->rach_data.c_burst-1; /* confirmed index */
+
+  switch (GET_STATE (STATE_RA))
+  {
+    case RA_ACTIVE:
+    {
+      PALLOC (random_cnf, MPH_RANDOM_ACCESS_CNF);
+
+      ra_cnf->fn %= 42432L;
+#ifdef GPRS
+      alr_data->rach_data.t1[c_burst] =
+        random_cnf->frame_no.t1=
+        (UBYTE)((ra_cnf->fn / 1326) % 32);
+      alr_data->rach_data.t2[c_burst] =
+        random_cnf->frame_no.t2=
+        (UBYTE)(ra_cnf->fn % 26);
+      alr_data->rach_data.t3[c_burst] =
+        random_cnf->frame_no.t3=
+        (UBYTE)(ra_cnf->fn % 51);
+#else
+      random_cnf->frame_no.t1= (UBYTE)((ra_cnf->fn / 1326) % 32);
+      random_cnf->frame_no.t2= (UBYTE)(ra_cnf->fn % 26);
+      random_cnf->frame_no.t3= (UBYTE)(ra_cnf->fn % 51);
+#endif
+      ma_rach_random_cnf (random_cnf);
+
+      c_burst++; /* next index */
+      if (c_burst >= alr_data->rach_data.max_bursts)
+      {/* last index ? */
+        SET_STATE (STATE_RA, RA_LISTEN_TO_CCCH);
+        ma_rach_stop_ra_req ();
+ #if !defined(TNNN_WITH_TIMER)
+        ma_fake_rr_report();
+ #endif /* !TNNN_WITH_TIMER */
+      }
+      else
+      {
+        PALLOC (ra_req, MPHC_RA_REQ);
+
+        /*
+         * power limitation
+         */
+        ra_req->txpwr          = cut_power_value (alr_data->rach_data.max_tx_pwr_ccch, NULL);
+        ra_req->powerclass_gsm = alr_data->rach_data.ms_class;
+        ra_req->powerclass_dcs = alr_data->rach_data.dcs_class;
+
+        /*
+         * Modification: Add 1 to the time of RR !!!!
+         */
+        ra_req->rand = (UBYTE)(alr_data->rach_data.delta[c_burst]+1);
+        ra_req->channel_request = alr_data->rach_data.channel_request[c_burst];
+        ma_rach_ra_req (ra_req);
+        alr_data->rach_data.c_burst++; /* the next index */
+      }
+      break;
+    }
+    default:
+      break;
+  }
+}
+
+
+
+/*
++--------------------------------------------------------------------+
+| PROJECT : GSM-PS (6103)       MODULE  : ALR_RACH                   |
+| STATE   : code                ROUTINE : cut_power_value            |
++--------------------------------------------------------------------+
+
+  PURPOSE : Cut the nominal maximum output power to the
+            associated power class.
+            (Reference for the tables with the associated
+             power classes, control levels and nominal output power
+             is 3GPP TS 05.05, 4.1)
+
+*/
+
+GLOBAL UBYTE  cut_power_value (UBYTE power, T_MPH_DEDICATED_REQ *mph_dedicated_req)
+{
+  UBYTE new_power = power;
+  UBYTE sc_band;
+
+  if(mph_dedicated_req == NULL)
+  {
+    sc_band = alr_data->sc_band;
+  }
+  else
+  {
+    if(mph_dedicated_req->ch_type.h)
+      sc_band = get_band(mph_dedicated_req->ch_type.ma[0]);
+    else
+      sc_band = get_band(mph_dedicated_req->ch_type.arfcn);
+  }
+
+  switch (sc_band)
+  {
+    case BAND_GSM_900:
+    case BAND_E_GSM:
+    case BAND_GSM_850:
+      switch (alr_data->rach_data.ms_class)
+      {
+        case POW_CLASS_1:    /* doesn´t exist */
+        case POW_CLASS_2:    /* power class 2, 8W, 39 dBm, level 0..2 */
+          /* highest level allowed => no cut necessary */
+          break;
+        case POW_CLASS_3:    /* power class 3, 5W, 37 dBm, level 3 */
+          if (new_power < 3)
+            new_power = 3;
+          break;
+        case POW_CLASS_4:    /* power class 4, 2W, 33 dBm, level 5 */
+          if (new_power < 5)
+            new_power = 5;
+         break;
+        case POW_CLASS_5:    /* power class 5, 0.8W, 29 dBm, level 7 */
+          if (new_power < 7)
+            new_power = 7;
+          break;
+      }
+      break;
+    case BAND_DCS_1800:
+      switch (alr_data->rach_data.dcs_class)
+      {
+        case POW_CLASS_1:    /* power class 1, 1W, 30 dBm, level 0 */
+        if (new_power > 28)
+          new_power = 0;
+          break;
+        case POW_CLASS_2:    /* power class 2, 0.25W, 24 dBm, level 3 */
+          if (!INRANGE (3, new_power, 28))
+            new_power = 3;
+          break;
+        case POW_CLASS_3:    /* power class 3, 4W, 36 dBm , level 29 */
+          /* highest level allowed => no cut necessary */
+          break;
+      }
+      break;
+    case BAND_PCS_1900:
+      switch (alr_data->rach_data.dcs_class)
+      {
+        case POW_CLASS_1:    /* power class 1, 1W, 30 dBm, level 0 */
+          if (!INRANGE (0, new_power, 15))
+            new_power = 0;
+          break;
+        case POW_CLASS_2:    /* power class 2, 0.25W, 24 dBm, level 3 */
+          if (!INRANGE (3, new_power, 15))
+            new_power = 3;
+          break;
+        default:
+        case POW_CLASS_3:    /* power class 3, 2W, 33 dBm , level 30 */
+          /* highest level allowed => no cut necessary */
+          break;
+      }
+      break;
+  }
+  return new_power;
+}
+#endif