lte-enb.c 62.7 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70
/*******************************************************************************
    OpenAirInterface
    Copyright(c) 1999 - 2014 Eurecom

    OpenAirInterface is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.


    OpenAirInterface is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with OpenAirInterface.The full GNU General Public License is
    included in this distribution in the file called "COPYING". If not,
    see <http://www.gnu.org/licenses/>.

   Contact Information
   OpenAirInterface Admin: openair_admin@eurecom.fr
   OpenAirInterface Tech : openair_tech@eurecom.fr
   OpenAirInterface Dev  : openair4g-devel@lists.eurecom.fr

   Address      : Eurecom, Campus SophiaTech, 450 Route des Chappes, CS 50193 - 06904 Biot Sophia Antipolis cedex, FRANCE

*******************************************************************************/

/*! \file lte-enb.c
 * \brief Top-level threads for eNodeB
 * \author R. Knopp, F. Kaltenberger, Navid Nikaein
 * \date 2012
 * \version 0.1
 * \company Eurecom
 * \email: knopp@eurecom.fr,florian.kaltenberger@eurecom.fr, navid.nikaein@eurecom.fr
 * \note
 * \warning
 */
#define _GNU_SOURCE
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <sys/ioctl.h>
#include <sys/types.h>
#include <sys/mman.h>
#include <sched.h>
#include <linux/sched.h>
#include <signal.h>
#include <execinfo.h>
#include <getopt.h>
#include <sys/sysinfo.h>
#include "rt_wrapper.h"

#undef MALLOC //there are two conflicting definitions, so we better make sure we don't use it at all

#include "assertions.h"
#include "msc.h"

#include "PHY/types.h"

#include "PHY/defs.h"
#undef MALLOC //there are two conflicting definitions, so we better make sure we don't use it at all
//#undef FRAME_LENGTH_COMPLEX_SAMPLES //there are two conflicting definitions, so we better make sure we don't use it at all

#include "../../ARCH/COMMON/common_lib.h"

//#undef FRAME_LENGTH_COMPLEX_SAMPLES //there are two conflicting definitions, so we better make sure we don't use it at all

71
#include "PHY/LTE_TRANSPORT/if4_tools.h"
72
#include "PHY/LTE_TRANSPORT/if5_tools.h"
73

74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121
#include "PHY/extern.h"
#include "SCHED/extern.h"
#include "LAYER2/MAC/extern.h"

#include "../../SIMU/USER/init_lte.h"

#include "LAYER2/MAC/defs.h"
#include "LAYER2/MAC/extern.h"
#include "LAYER2/MAC/proto.h"
#include "RRC/LITE/extern.h"
#include "PHY_INTERFACE/extern.h"

#ifdef SMBV
#include "PHY/TOOLS/smbv.h"
unsigned short config_frames[4] = {2,9,11,13};
#endif
#include "UTIL/LOG/log_extern.h"
#include "UTIL/OTG/otg_tx.h"
#include "UTIL/OTG/otg_externs.h"
#include "UTIL/MATH/oml.h"
#include "UTIL/LOG/vcd_signal_dumper.h"
#include "UTIL/OPT/opt.h"
#include "enb_config.h"
//#include "PHY/TOOLS/time_meas.h"

#ifndef OPENAIR2
#include "UTIL/OTG/otg_extern.h"
#endif

#if defined(ENABLE_ITTI)
# if defined(ENABLE_USE_MME)
#   include "s1ap_eNB.h"
#ifdef PDCP_USE_NETLINK
#   include "SIMULATION/ETH_TRANSPORT/proto.h"
#endif
# endif
#endif

//#define DEBUG_THREADS 1

//#define USRP_DEBUG 1
struct timing_info_t {
  //unsigned int frame, hw_slot, last_slot, next_slot;
  RTIME time_min, time_max, time_avg, time_last, time_now;
  //unsigned int mbox0, mbox1, mbox2, mbox_target;
  unsigned int n_samples;
} timing_info;

122 123
// Fix per CC openair rf/if device update
// extern openair0_device openair0;
124 125 126 127 128 129 130 131 132 133 134 135 136

#if defined(ENABLE_ITTI)
extern volatile int             start_eNB;
extern volatile int             start_UE;
#endif
extern volatile int                    oai_exit;

extern openair0_config_t openair0_cfg[MAX_CARDS];

extern pthread_cond_t sync_cond;
extern pthread_mutex_t sync_mutex;
extern int sync_var;

137
//pthread_t                       main_eNB_thread;
138 139 140

time_stats_t softmodem_stats_mt; // main thread
time_stats_t softmodem_stats_hw; //  hw acquisition
knopp's avatar
knopp committed
141
time_stats_t softmodem_stats_rxtx_sf; // total tx time
142
time_stats_t softmodem_stats_rx_sf; // total rx time
143 144 145 146 147 148 149 150 151 152 153 154 155
int32_t **rxdata;
int32_t **txdata;

static int                      time_offset[4] = {0,0,0,0};

/* mutex, cond and variable to serialize phy proc TX calls
 * (this mechanism may be relaxed in the future for better
 * performances)
 */
static struct {
  pthread_mutex_t  mutex_phy_proc_tx;
  pthread_cond_t   cond_phy_proc_tx;
  volatile uint8_t phy_proc_CC_id;
156
} sync_phy_proc;
157 158 159

void exit_fun(const char* s);

160 161
void init_eNB(eNB_func_t node_function[], eNB_timing_t node_timing[],int nb_inst);
void stop_eNB(int nb_inst);
162 163


Sandeep Kumar's avatar
Sandeep Kumar committed
164 165
void do_OFDM_mod_rt(int subframe,PHY_VARS_eNB *phy_vars_eNB) {
     
166 167
  unsigned int aa,slot_offset, slot_offset_F;
  int dummy_tx_b[7680*4] __attribute__((aligned(32)));
knopp's avatar
knopp committed
168
  int i,j, tx_offset;
169 170
  int slot_sizeF = (phy_vars_eNB->frame_parms.ofdm_symbol_size)*
                   ((phy_vars_eNB->frame_parms.Ncp==1) ? 6 : 7);
knopp's avatar
knopp committed
171 172
  int len,len2;
  int16_t *txdata;
173 174 175

  slot_offset_F = (subframe<<1)*slot_sizeF;

176
  slot_offset = subframe*phy_vars_eNB->frame_parms.samples_per_tti;
177

178 179
  if ((subframe_select(&phy_vars_eNB->frame_parms,subframe)==SF_DL)||
      ((subframe_select(&phy_vars_eNB->frame_parms,subframe)==SF_S))) {
180 181
    //    LOG_D(HW,"Frame %d: Generating slot %d\n",frame,next_slot);

182 183 184
    for (aa=0; aa<phy_vars_eNB->frame_parms.nb_antennas_tx; aa++) {
      if (phy_vars_eNB->frame_parms.Ncp == EXTENDED) {
        PHY_ofdm_mod(&phy_vars_eNB->common_vars.txdataF[0][aa][slot_offset_F],
185
                     dummy_tx_b,
186
                     phy_vars_eNB->frame_parms.ofdm_symbol_size,
187
                     6,
188
                     phy_vars_eNB->frame_parms.nb_prefix_samples,
189
                     CYCLIC_PREFIX);
190 191 192
        PHY_ofdm_mod(&phy_vars_eNB->common_vars.txdataF[0][aa][slot_offset_F+slot_sizeF],
                     dummy_tx_b+(phy_vars_eNB->frame_parms.samples_per_tti>>1),
                     phy_vars_eNB->frame_parms.ofdm_symbol_size,
193
                     6,
194
                     phy_vars_eNB->frame_parms.nb_prefix_samples,
195 196
                     CYCLIC_PREFIX);
      } else {
197
        normal_prefix_mod(&phy_vars_eNB->common_vars.txdataF[0][aa][slot_offset_F],
198 199
                          dummy_tx_b,
                          7,
200
                          &(phy_vars_eNB->frame_parms));
201
	// if S-subframe generate first slot only
Sandeep Kumar's avatar
Sandeep Kumar committed
202
	if (subframe_select(&phy_vars_eNB->frame_parms,subframe) == SF_DL) 
203 204
	  normal_prefix_mod(&phy_vars_eNB->common_vars.txdataF[0][aa][slot_offset_F+slot_sizeF],
			    dummy_tx_b+(phy_vars_eNB->frame_parms.samples_per_tti>>1),
205
			    7,
206
			    &(phy_vars_eNB->frame_parms));
207 208 209
      }

      // if S-subframe generate first slot only
210 211
      if (subframe_select(&phy_vars_eNB->frame_parms,subframe) == SF_S)
	len = phy_vars_eNB->frame_parms.samples_per_tti>>1;
212
      else
213
	len = phy_vars_eNB->frame_parms.samples_per_tti;
214 215 216 217 218 219 220
      /*
      for (i=0;i<len;i+=4) {
	dummy_tx_b[i] = 0x100;
	dummy_tx_b[i+1] = 0x01000000;
	dummy_tx_b[i+2] = 0xff00;
	dummy_tx_b[i+3] = 0xff000000;
	}*/
knopp's avatar
knopp committed
221 222 223 224 225 226 227 228 229 230 231 232 233 234
      
      if (slot_offset+time_offset[aa]<0) {
	txdata = (int16_t*)&phy_vars_eNB->common_vars.txdata[0][aa][(LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*phy_vars_eNB->frame_parms.samples_per_tti)+tx_offset];
        len2 = -(slot_offset+time_offset[aa]);
	len2 = (len2>len) ? len : len2;
	for (i=0; i<(len2<<1); i++) {
	  txdata[i] = ((int16_t*)dummy_tx_b)[i]<<openair0_cfg[0].iq_txshift;
	}
	if (len2<len) {
	  txdata = (int16_t*)&phy_vars_eNB->common_vars.txdata[0][aa][0];
	  for (j=0; i<(len<<1); i++,j++) {
	    txdata[j++] = ((int16_t*)dummy_tx_b)[i]<<openair0_cfg[0].iq_txshift;
	  }
	}
Sandeep Kumar's avatar
Sandeep Kumar committed
235
      }  
knopp's avatar
knopp committed
236 237 238 239 240 241 242 243 244 245 246 247 248 249 250
      else if ((slot_offset+time_offset[aa]+len)>(LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*phy_vars_eNB->frame_parms.samples_per_tti)) {
	tx_offset = (int)slot_offset+time_offset[aa];
	txdata = (int16_t*)&phy_vars_eNB->common_vars.txdata[0][aa][tx_offset];
	len2 = -tx_offset+LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*phy_vars_eNB->frame_parms.samples_per_tti;
	for (i=0; i<(len2<<1); i++) {
	  txdata[i] = ((int16_t*)dummy_tx_b)[i]<<openair0_cfg[0].iq_txshift;
	}
	txdata = (int16_t*)&phy_vars_eNB->common_vars.txdata[0][aa][0];
	for (j=0; i<(len<<1); i++,j++) {
	  txdata[j++] = ((int16_t*)dummy_tx_b)[i]<<openair0_cfg[0].iq_txshift;
	}
      }
      else {
	tx_offset = (int)slot_offset+time_offset[aa];
	txdata = (int16_t*)&phy_vars_eNB->common_vars.txdata[0][aa][tx_offset];
251

knopp's avatar
knopp committed
252 253 254 255 256
	for (i=0; i<(len<<1); i++) {
	  txdata[i] = ((int16_t*)dummy_tx_b)[i]<<openair0_cfg[0].iq_txshift;
	}
      }
      
257
     // if S-subframe switch to RX in second subframe
knopp's avatar
knopp committed
258
      /*
259
     if (subframe_select(&phy_vars_eNB->frame_parms,subframe) == SF_S) {
260
       for (i=0; i<len; i++) {
261
	 phy_vars_eNB->common_vars.txdata[0][aa][tx_offset++] = 0x00010001;
262 263
       }
     }
knopp's avatar
knopp committed
264
      */
265
     if ((((phy_vars_eNB->frame_parms.tdd_config==0) ||
Sandeep Kumar's avatar
Sandeep Kumar committed
266 267 268 269
	   (phy_vars_eNB->frame_parms.tdd_config==1) ||
	   (phy_vars_eNB->frame_parms.tdd_config==2) ||
	   (phy_vars_eNB->frame_parms.tdd_config==6)) && 
	   (subframe==0)) || (subframe==5)) {
270 271 272
       // turn on tx switch N_TA_offset before
       //LOG_D(HW,"subframe %d, time to switch to tx (N_TA_offset %d, slot_offset %d) \n",subframe,phy_vars_eNB->N_TA_offset,slot_offset);
       for (i=0; i<phy_vars_eNB->N_TA_offset; i++) {
Sandeep Kumar's avatar
Sandeep Kumar committed
273 274 275
         tx_offset = (int)slot_offset+time_offset[aa]+i-phy_vars_eNB->N_TA_offset/2;
         if (tx_offset<0)
           tx_offset += LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*phy_vars_eNB->frame_parms.samples_per_tti;
276
	 
Sandeep Kumar's avatar
Sandeep Kumar committed
277 278
         if (tx_offset>=(LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*phy_vars_eNB->frame_parms.samples_per_tti))
           tx_offset -= LTE_NUMBER_OF_SUBFRAMES_PER_FRAME*phy_vars_eNB->frame_parms.samples_per_tti;
279
	 
Sandeep Kumar's avatar
Sandeep Kumar committed
280
         phy_vars_eNB->common_vars.txdata[0][aa][tx_offset] = 0x00000000;
281 282 283 284 285 286
       }
     }
    }
  }
}

Sandeep Kumar's avatar
Sandeep Kumar committed
287

288
/*!
knopp's avatar
knopp committed
289
 * \brief The RX UE-specific and TX thread of eNB.
290 291 292
 * \param param is a \ref eNB_proc_t structure which contains the info what to process.
 * \returns a pointer to an int. The storage is not on the heap and must not be freed.
 */
Sandeep Kumar's avatar
Sandeep Kumar committed
293 294
static void* eNB_thread_rxtx( void* param ) {

knopp's avatar
knopp committed
295
  static int eNB_thread_rxtx_status;
296

knopp's avatar
knopp committed
297
  eNB_rxtx_proc_t *proc = (eNB_rxtx_proc_t*)param;
298 299
  FILE  *tx_time_file = NULL;
  char tx_time_name[101];
knopp's avatar
knopp committed
300
  void *txp[PHY_vars_eNB_g[0][0]->frame_parms.nb_antennas_tx]; 
301 302
  int txs;

Sandeep Kumar's avatar
Sandeep Kumar committed
303 304
  uint16_t packet_type;
  uint32_t symbol_number=0;
305
  uint32_t symbol_mask, symbol_mask_full;
Sandeep Kumar's avatar
Sandeep Kumar committed
306
  
Sandeep Kumar's avatar
Sandeep Kumar committed
307 308
  uint8_t seqno=0;
  
309
  if (opp_enabled == 1) {
310
    snprintf(tx_time_name, 100,"/tmp/%s_tx_time_thread_sf", "eNB");
311 312 313
    tx_time_file = fopen(tx_time_name,"w");
  }
  // set default return value
knopp's avatar
knopp committed
314
  eNB_thread_rxtx_status = 0;
315 316 317

  MSC_START_USE();

318
#ifdef DEADLINE_SCHEDULER
319
  struct sched_attr attr;
320

321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337
  unsigned int flags = 0;
  uint64_t runtime  = 850000 ;  
  uint64_t deadline = 1   *  1000000 ; // each tx thread will finish within 1ms
  uint64_t period   = 1   * 10000000; // each tx thread has a period of 10ms from the starting point

  attr.size = sizeof(attr);
  attr.sched_flags = 0;
  attr.sched_nice = 0;
  attr.sched_priority = 0;

  attr.sched_policy   = SCHED_DEADLINE;
  attr.sched_runtime  = runtime;
  attr.sched_deadline = deadline;
  attr.sched_period   = period; 

  if (sched_setattr(0, &attr, flags) < 0 ) {
    perror("[SCHED] eNB tx thread: sched_setattr failed\n");
knopp's avatar
knopp committed
338
    return &eNB_thread_rxtx_status;
339 340
  }

knopp's avatar
knopp committed
341
  LOG_I( HW, "[SCHED] eNB RXn-TXnp4 deadline thread (TID %ld) started on CPU %d\n", gettid(), sched_getcpu() );
342 343 344 345 346 347

#else //LOW_LATENCY
  int policy, s, j;
  struct sched_param sparam;
  char cpu_affinity[1024];
  cpu_set_t cpuset;
Raymond Knopp's avatar
Raymond Knopp committed
348 349 350 351
  struct timespec wait;

  wait.tv_sec=0;
  wait.tv_nsec=5000000L;
352 353 354

  /* Set affinity mask to include CPUs 1 to MAX_CPUS */
  /* CPU 0 is reserved for UHD threads */
knopp's avatar
knopp committed
355
  /* CPU 1 is reserved for all RX_TX threads */
356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374
  /* Enable CPU Affinity only if number of CPUs >2 */
  CPU_ZERO(&cpuset);

#ifdef CPU_AFFINITY
  if (get_nprocs() > 2)
  {
    for (j = 1; j < get_nprocs(); j++)
        CPU_SET(j, &cpuset);
    s = pthread_setaffinity_np(pthread_self(), sizeof(cpu_set_t), &cpuset);
    if (s != 0)
    {
      perror( "pthread_setaffinity_np");
      exit_fun("Error setting processor affinity");
    }
  }
#endif //CPU_AFFINITY

  /* Check the actual affinity mask assigned to the thread */
  s = pthread_getaffinity_np(pthread_self(), sizeof(cpu_set_t), &cpuset);
Sandeep Kumar's avatar
Sandeep Kumar committed
375
  if (s != 0) {
376 377 378 379 380
    perror( "pthread_getaffinity_np");
    exit_fun("Error getting processor affinity ");
  }
  memset(cpu_affinity,0,sizeof(cpu_affinity));
  for (j = 0; j < CPU_SETSIZE; j++)
Sandeep Kumar's avatar
Sandeep Kumar committed
381 382 383 384 385
    if (CPU_ISSET(j, &cpuset)) {  
      char temp[1024];
      sprintf (temp, " CPU_%d", j);
      strcat(cpu_affinity, temp);
    }
386

Sandeep Kumar's avatar
Sandeep Kumar committed
387
  memset(&sparam, 0, sizeof(sparam));
388 389 390 391
  sparam.sched_priority = sched_get_priority_max(SCHED_FIFO)-1;
  policy = SCHED_FIFO ; 
  
  s = pthread_setschedparam(pthread_self(), policy, &sparam);
Sandeep Kumar's avatar
Sandeep Kumar committed
392 393 394 395 396
  if (s != 0) {
    perror("pthread_setschedparam : ");
    exit_fun("Error setting thread priority");
  }
  
397
  s = pthread_getschedparam(pthread_self(), &policy, &sparam);
Sandeep Kumar's avatar
Sandeep Kumar committed
398 399 400 401
  if (s != 0) {
    perror("pthread_getschedparam : ");
    exit_fun("Error getting thread priority");
  }
402

knopp's avatar
knopp committed
403
  LOG_I(HW, "[SCHED][eNB] RXn_TXnp4 thread started on CPU %d TID %ld, sched_policy = %s , priority = %d, CPU Affinity=%s \n",sched_getcpu(),gettid(),
404 405 406 407 408 409 410 411 412 413 414
                   (policy == SCHED_FIFO)  ? "SCHED_FIFO" :
                   (policy == SCHED_RR)    ? "SCHED_RR" :
                   (policy == SCHED_OTHER) ? "SCHED_OTHER" :
                   "???",
                   sparam.sched_priority, cpu_affinity );

#endif //LOW_LATENCY

  mlockall(MCL_CURRENT | MCL_FUTURE);

  while (!oai_exit) {
knopp's avatar
knopp committed
415
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_eNB_PROC_RXTX0+(proc->subframe_rx&1), 0 );
416

Raymond Knopp's avatar
Raymond Knopp committed
417
    if (pthread_mutex_timedlock(&proc->mutex_rxtx,&wait) != 0) {
knopp's avatar
knopp committed
418
      LOG_E( PHY, "[SCHED][eNB] error locking mutex for eNB RXn-TXnp4\n");
419 420 421 422
      exit_fun("nothing to add");
      break;
    }

knopp's avatar
knopp committed
423
    while (proc->instance_cnt_rxtx < 0) {
424
      // most of the time the thread is waiting here
knopp's avatar
knopp committed
425 426
      // proc->instance_cnt_rxtx is -1
      pthread_cond_wait( &proc->cond_rxtx, &proc->mutex_rxtx ); // this unlocks mutex_rxtx while waiting and then locks it again
427 428
    }

knopp's avatar
knopp committed
429
    if (pthread_mutex_unlock(&proc->mutex_rxtx) != 0) {
430
      LOG_E(PHY,"[SCHED][eNB] error unlocking mutex for eNB TX\n");
431 432 433 434
      exit_fun("nothing to add");
      break;
    }

knopp's avatar
knopp committed
435 436
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_eNB_PROC_RXTX0+(proc->subframe_rx&1), 1 );
    start_meas( &softmodem_stats_rxtx_sf );
437
  
438 439
    if (oai_exit) break;

440 441 442
    VCD_SIGNAL_DUMPER_DUMP_VARIABLE_BY_NAME( VCD_SIGNAL_DUMPER_VARIABLES_FRAME_NUMBER_RX0_ENB+(proc->subframe_rx&1), proc->frame_rx );
    VCD_SIGNAL_DUMPER_DUMP_VARIABLE_BY_NAME( VCD_SIGNAL_DUMPER_VARIABLES_SUBFRAME_NUMBER_RX0_ENB+(proc->subframe_rx&1), proc->subframe_rx );

443 444 445
    // Common procedures
    phy_procedures_eNB_common_RX(PHY_vars_eNB_g[0][proc->CC_id], 0);

knopp's avatar
knopp committed
446
    // UE-specific RX processing for subframe n
447 448 449
    if ((PHY_vars_eNB_g[0][proc->CC_id]->node_function == eNodeB_3GPP) ||
        (PHY_vars_eNB_g[0][proc->CC_id]->node_function == eNodeB_3GPP_BBU) ||
        (PHY_vars_eNB_g[0][proc->CC_id]->node_function == NGFI_RCC_IF4)) {
450

knopp's avatar
knopp committed
451 452 453 454 455
      // this is the ue-specific processing for the subframe and can be multi-threaded later
      phy_procedures_eNB_uespec_RX(PHY_vars_eNB_g[0][proc->CC_id], proc, 0, no_relay );
    }

    // TX processing for subframe n+4
456 457 458 459
    if (((PHY_vars_eNB_g[0][proc->CC_id]->frame_parms.frame_type == TDD) &&
         ((subframe_select(&PHY_vars_eNB_g[0][proc->CC_id]->frame_parms,proc->subframe_tx) == SF_DL) ||
          (subframe_select(&PHY_vars_eNB_g[0][proc->CC_id]->frame_parms,proc->subframe_tx) == SF_S))) ||
        (PHY_vars_eNB_g[0][proc->CC_id]->frame_parms.frame_type == FDD)) {
460 461 462
      /* run PHY TX procedures the one after the other for all CCs to avoid race conditions
       * (may be relaxed in the future for performance reasons)
       */
knopp's avatar
knopp committed
463
      
Raymond Knopp's avatar
Raymond Knopp committed
464
      if (pthread_mutex_timedlock(&sync_phy_proc.mutex_phy_proc_tx,&wait) != 0) {
465
        LOG_E(PHY, "[SCHED][eNB] error locking PHY proc mutex for eNB TX\n");
466 467 468
        exit_fun("nothing to add");
        break;
      }
Sandeep Kumar's avatar
Sandeep Kumar committed
469
      
knopp's avatar
knopp committed
470
      // wait for our turn or oai_exit
471 472 473
      while (sync_phy_proc.phy_proc_CC_id != proc->CC_id && !oai_exit) {
        pthread_cond_wait(&sync_phy_proc.cond_phy_proc_tx,
                          &sync_phy_proc.mutex_phy_proc_tx);
474 475
      }

476 477
      if (pthread_mutex_unlock(&sync_phy_proc.mutex_phy_proc_tx) != 0) {
        LOG_E(PHY, "[SCHED][eNB] error unlocking PHY proc mutex for eNB TX\n");
478 479 480
        exit_fun("nothing to add");
      }

481 482
      VCD_SIGNAL_DUMPER_DUMP_VARIABLE_BY_NAME( VCD_SIGNAL_DUMPER_VARIABLES_FRAME_NUMBER_TX0_ENB+(proc->subframe_tx&1), proc->frame_tx );
      VCD_SIGNAL_DUMPER_DUMP_VARIABLE_BY_NAME( VCD_SIGNAL_DUMPER_VARIABLES_SUBFRAME_NUMBER_TX0_ENB+(proc->subframe_tx&1), proc->subframe_tx );
Sandeep Kumar's avatar
Sandeep Kumar committed
483 484 485
      
      if (oai_exit) break;
      
486 487 488
      if ((PHY_vars_eNB_g[0][proc->CC_id]->node_function == eNodeB_3GPP) ||
          (PHY_vars_eNB_g[0][proc->CC_id]->node_function == eNodeB_3GPP_BBU) ||
          (PHY_vars_eNB_g[0][proc->CC_id]->node_function == NGFI_RCC_IF4)) { 
Sandeep Kumar's avatar
Sandeep Kumar committed
489 490 491 492 493 494 495 496 497 498 499 500 501 502 503
        phy_procedures_eNB_TX(PHY_vars_eNB_g[0][proc->CC_id], proc, 0, no_relay, NULL );

        /* we're done, let the next one proceed */
        if (pthread_mutex_lock(&sync_phy_proc.mutex_phy_proc_tx) != 0) {
          LOG_E(PHY, "[SCHED][eNB] error locking PHY proc mutex for eNB TX proc\n");
          exit_fun("nothing to add");
          break;
        }	
        sync_phy_proc.phy_proc_CC_id++;
        sync_phy_proc.phy_proc_CC_id %= MAX_NUM_CCs;
        pthread_cond_broadcast(&sync_phy_proc.cond_phy_proc_tx);
        if (pthread_mutex_unlock(&sync_phy_proc.mutex_phy_proc_tx) != 0) {
          LOG_E(PHY, "[SCHED][eNB] error unlocking PHY proc mutex for eNB TX proc\n");
          exit_fun("nothing to add");
          break;
Sandeep Kumar's avatar
Sandeep Kumar committed
504
        }
505
      } else if (PHY_vars_eNB_g[0][proc->CC_id]->node_function == NGFI_RRU_IF4) {
506
        /// **** recv_IF4 of txdataF from RCC **** ///             
507 508 509 510
        symbol_number = 0;
        symbol_mask = 0;
        symbol_mask_full = (1<<PHY_vars_eNB_g[0][proc->CC_id]->frame_parms.symbols_per_tti)-1;
        
Sandeep Kumar's avatar
Sandeep Kumar committed
511
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_RECV_IF4, 1 );  
Sandeep Kumar's avatar
Sandeep Kumar committed
512
        do { 
513
          recv_IF4(PHY_vars_eNB_g[0][proc->CC_id], &proc->frame_tx, &proc->subframe_tx, &packet_type, &symbol_number);
514 515 516
          symbol_mask = symbol_mask | (1<<symbol_number);
          
        } while (symbol_mask != symbol_mask_full); 
Sandeep Kumar's avatar
Sandeep Kumar committed
517
        
518
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_RECV_IF4, 0 );   
519
        
520 521 522
      } else if (PHY_vars_eNB_g[0][proc->CC_id]->node_function == NGFI_RRU_IF5) {
        /// **** recv_IF5 of txdata from BBU **** ///       
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_RECV_IF5, 1 );  
Sandeep Kumar's avatar
Sandeep Kumar committed
523
        recv_IF5(PHY_vars_eNB_g[0][proc->CC_id], &proc->timestamp_tx, proc->subframe_tx, IF5_RRH_GW_DL);
524 525
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_RECV_IF5, 0 );  

526 527 528
      }
    }

529
    // eNodeB_3GPP, _BBU and RRU create txdata
530 531 532
    if ((PHY_vars_eNB_g[0][proc->CC_id]->node_function == eNodeB_3GPP) ||
        (PHY_vars_eNB_g[0][proc->CC_id]->node_function == eNodeB_3GPP_BBU) ||
        (PHY_vars_eNB_g[0][proc->CC_id]->node_function == NGFI_RRU_IF4)) {
knopp's avatar
knopp committed
533
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_ENB_SFGEN , 1 );
534
      do_OFDM_mod_rt( proc->subframe_tx, PHY_vars_eNB_g[0][proc->CC_id] );
knopp's avatar
knopp committed
535
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME(VCD_SIGNAL_DUMPER_FUNCTIONS_PHY_ENB_SFGEN , 0 );
536 537
    }

Sandeep Kumar's avatar
Sandeep Kumar committed
538 539 540 541 542 543 544 545 546 547 548 549
      /*
        short *txdata = (short*)&PHY_vars_eNB_g[0][proc->CC_id]->common_vars.txdata[0][0][proc->subframe_tx*PHY_vars_eNB_g[0][proc->CC_id]->frame_parms.samples_per_tti];
        int i;
        for (i=0;i<PHY_vars_eNB_g[0][proc->CC_id]->frame_parms.samples_per_tti*2;i+=8) {
        txdata[i] = 2047;
        txdata[i+1] = 0;
        txdata[i+2] = 0;
        txdata[i+3] = 2047;
        txdata[i+4] = -2047;
        txdata[i+5] = 0;
        txdata[i+6] = 0;
        txdata[i+7] = -2047;      }
550 551
      */      
          
knopp's avatar
knopp committed
552

553
    // eNodeB_3GPP, RRU write to RF device    
554 555 556
    if ((PHY_vars_eNB_g[0][proc->CC_id]->node_function == eNodeB_3GPP) ||
        (PHY_vars_eNB_g[0][proc->CC_id]->node_function == NGFI_RRU_IF4) ||
        (PHY_vars_eNB_g[0][proc->CC_id]->node_function == NGFI_RRU_IF5)) {
Sandeep Kumar's avatar
Sandeep Kumar committed
557
      // Transmit TX buffer based on timestamp from RX  
knopp's avatar
knopp committed
558 559 560 561
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_TRX_WRITE, 1 );
      // prepare tx buffer pointers
      int i;
      for (i=0; i<PHY_vars_eNB_g[0][0]->frame_parms.nb_antennas_tx; i++)
Sandeep Kumar's avatar
Sandeep Kumar committed
562 563
        txp[i] = (void*)&PHY_vars_eNB_g[0][0]->common_vars.txdata[0][i][proc->subframe_tx*PHY_vars_eNB_g[0][0]->frame_parms.samples_per_tti];
    
564 565 566 567 568 569
      txs = PHY_vars_eNB_g[0][proc->CC_id]->rfdevice.trx_write_func(&PHY_vars_eNB_g[0][proc->CC_id]->rfdevice,
								    (proc->timestamp_tx-openair0_cfg[0].tx_sample_advance),
								    txp,
								    PHY_vars_eNB_g[0][0]->frame_parms.samples_per_tti,
								    PHY_vars_eNB_g[0][0]->frame_parms.nb_antennas_tx,
								    1);
Sandeep Kumar's avatar
Sandeep Kumar committed
570
	      
knopp's avatar
knopp committed
571
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_TRX_WRITE, 0 );
Sandeep Kumar's avatar
Sandeep Kumar committed
572
 
knopp's avatar
knopp committed
573 574
      VCD_SIGNAL_DUMPER_DUMP_VARIABLE_BY_NAME( VCD_SIGNAL_DUMPER_VARIABLES_TRX_TST, (proc->timestamp_tx-openair0_cfg[0].tx_sample_advance)&0xffffffff );

575 576 577 578
      if (txs !=  PHY_vars_eNB_g[0][0]->frame_parms.samples_per_tti) {
	LOG_E(PHY,"TX : Timeout (sent %d/%d)\n",txs, PHY_vars_eNB_g[0][0]->frame_parms.samples_per_tti);
	exit_fun( "problem transmitting samples" );
      }	
579
    } else if (PHY_vars_eNB_g[0][proc->CC_id]->node_function == eNodeB_3GPP_BBU) {
580 581
      /// **** send_IF5 of txdata to RRH **** ///       
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_SEND_IF5, 1 );  
Sandeep Kumar's avatar
Sandeep Kumar committed
582
      send_IF5(PHY_vars_eNB_g[0][proc->CC_id], proc->timestamp_tx, proc->subframe_tx, &seqno, IF5_RRH_GW_DL);
583
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_SEND_IF5, 0 );  
Sandeep Kumar's avatar
Sandeep Kumar committed
584

Sandeep Kumar's avatar
Sandeep Kumar committed
585
    } else { 
586
      /// **** send_IF4 of txdataF to RRU **** ///       
587
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_SEND_IF4, 1 );   
Sandeep Kumar's avatar
Sandeep Kumar committed
588
      send_IF4(PHY_vars_eNB_g[0][proc->CC_id], proc->frame_tx, proc->subframe_tx, IF4_PDLFFT, 0);
589
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_SEND_IF4, 0 );
Sandeep Kumar's avatar
Sandeep Kumar committed
590
      
591 592
    }

knopp's avatar
knopp committed
593
    if (pthread_mutex_lock(&proc->mutex_rxtx) != 0) {
594
      LOG_E( PHY, "[SCHED][eNB] error locking mutex for eNB TX proc\n");
595 596 597 598
      exit_fun("nothing to add");
      break;
    }

knopp's avatar
knopp committed
599
    proc->instance_cnt_rxtx--;
600

knopp's avatar
knopp committed
601
    if (pthread_mutex_unlock(&proc->mutex_rxtx) != 0) {
602
      LOG_E( PHY, "[SCHED][eNB] error unlocking mutex for eNB TX proc\n");
603 604 605 606
      exit_fun("nothing to add");
      break;
    }

knopp's avatar
knopp committed
607
    stop_meas( &softmodem_stats_rxtx_sf );
Sandeep Kumar's avatar
Sandeep Kumar committed
608

609
#ifdef DEADLINE_SCHEDULER
610
    if (opp_enabled){
knopp's avatar
knopp committed
611 612
      if(softmodem_stats_rxtx_sf.diff_now/(cpuf) > attr.sched_runtime){
	VCD_SIGNAL_DUMPER_DUMP_VARIABLE_BY_NAME( VCD_SIGNAL_DUMPER_VARIABLES_RUNTIME_TX_ENB, (softmodem_stats_rxtx_sf.diff_now/cpuf - attr.sched_runtime)/1000000.0);
613 614 615
    }
#endif 

Sandeep Kumar's avatar
Sandeep Kumar committed
616
    print_meas_now(&softmodem_stats_rxtx_sf,"eNB_TX_SF",tx_time_file);
617 618
  }

knopp's avatar
knopp committed
619
  VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_eNB_PROC_RXTX0+(proc->subframe_rx&1), 0 );
620

Raymond Knopp's avatar
Raymond Knopp committed
621
  printf( "Exiting eNB thread RXn_TXnp4\n");
622

knopp's avatar
knopp committed
623 624
  eNB_thread_rxtx_status = 0;
  return &eNB_thread_rxtx_status;
625 626
}

627
#if defined(ENABLE_ITTI)
Sandeep Kumar's avatar
Sandeep Kumar committed
628 629 630
/* Wait for eNB application initialization to be complete (eNB registration to MME) */
static void wait_system_ready (char *message, volatile int *start_flag) {
  
631
  static char *indicator[] = {".    ", "..   ", "...  ", ".... ", ".....",
Sandeep Kumar's avatar
Sandeep Kumar committed
632
			      " ....", "  ...", "   ..", "    .", "     "};
633 634 635 636 637 638 639
  int i = 0;
  
  while ((!oai_exit) && (*start_flag == 0)) {
    LOG_N(EMU, message, indicator[i]);
    fflush(stdout);
    i = (i + 1) % (sizeof(indicator) / sizeof(indicator[0]));
    usleep(200000);
640
  }
641 642
  
  LOG_D(EMU,"\n");
643 644
}
#endif
645

646 647 648 649 650 651 652 653 654 655 656 657 658
/*!
 * \brief The Asynchronous RX FH thread of RAU/RCC/eNB.
 * This handles the RX FH for an asynchronous RRU/UE
 * \param param is a \ref eNB_proc_t structure which contains the info what to process.
 * \returns a pointer to an int. The storage is not on the heap and must not be freed.
 */
static void* eNB_thread_asynch_rx( void* param ) {

  eNB_proc_t *proc = (eNB_proc_t*)param;
  PHY_VARS_eNB *eNB = PHY_vars_eNB_g[0][proc->CC_id];
  LTE_DL_FRAME_PARMS *fp = &eNB->frame_parms;
  openair0_timestamp timestamp_rx;
  int frame_rx,subframe_rx;
knopp's avatar
knopp committed
659
  static int first_rx = 1;
660 661 662 663
  uint16_t packet_type;
  uint32_t symbol_number=0;
  uint32_t symbol_mask, symbol_mask_full;
  int prach_rx;
664
  int dummy_rx[fp->nb_antennas_rx][fp->samples_per_tti]; 
665
  int rxs=0;
666

knopp's avatar
knopp committed
667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757
#ifdef DEADLINE_SCHEDULER
  struct sched_attr attr;
  unsigned int flags = 0;
  uint64_t runtime  = 870000 ;
  uint64_t deadline = 1   *  1000000;
  uint64_t period   = 1   * 10000000; // each rx thread has a period of 10ms from the starting point
 
  attr.size = sizeof(attr);
  attr.sched_flags = 0;
  attr.sched_nice = 0;
  attr.sched_priority = 0;

  attr.sched_policy = SCHED_DEADLINE;
  attr.sched_runtime  = runtime;
  attr.sched_deadline = deadline;
  attr.sched_period   = period; 

  if (sched_setattr(0, &attr, flags) < 0 ) {
    perror("[SCHED] eNB FH sched_setattr failed\n");
    return &eNB_thread_FH_status;
  }

  LOG_I( HW, "[SCHED] eNB asynch RX deadline thread (TID %ld) started on CPU %d\n", gettid(), sched_getcpu() );
#else // LOW_LATENCY
  int policy, s, j;
  struct sched_param sparam;
  char cpu_affinity[1024];
  cpu_set_t cpuset;

  /* Set affinity mask to include CPUs 1 to MAX_CPUS */
  /* CPU 0 is reserved for UHD */
  /* CPU 1 is reserved for all TX threads */
  /* CPU 2..MAX_CPUS is reserved for all RX threads */
  /* Set CPU Affinity only if number of CPUs >2 */
  CPU_ZERO(&cpuset);
#ifdef CPU_AFFINITY
  if (get_nprocs() >2) {
    for (j = 1; j < get_nprocs(); j++)
      CPU_SET(j, &cpuset);
  
    s = pthread_setaffinity_np(pthread_self(), sizeof(cpu_set_t), &cpuset);
    if (s != 0) {
      perror( "pthread_setaffinity_np");  
      exit_fun (" Error setting processor affinity :");
    }
  }
#endif //CPU_AFFINITY
  /* Check the actual affinity mask assigned to the thread */

  s = pthread_getaffinity_np(pthread_self(), sizeof(cpu_set_t), &cpuset);
  if (s != 0) {
    perror ("pthread_getaffinity_np");
    exit_fun (" Error getting processor affinity :");
  }
  memset(cpu_affinity,0, sizeof(cpu_affinity));

  for (j = 0; j < CPU_SETSIZE; j++)
    if (CPU_ISSET(j, &cpuset)) {  
      char temp[1024];
      sprintf (temp, " CPU_%d", j);
      strcat(cpu_affinity, temp);
    }

  memset(&sparam, 0 , sizeof (sparam)); 
  sparam.sched_priority = sched_get_priority_max(SCHED_FIFO);

  policy = SCHED_FIFO ; 
  s = pthread_setschedparam(pthread_self(), policy, &sparam);
  if (s != 0) {
    perror("pthread_setschedparam : ");
    exit_fun("Error setting thread priority");     
  }

  memset(&sparam, 0 , sizeof (sparam));

  s = pthread_getschedparam(pthread_self(), &policy, &sparam);
  if (s != 0) {
    perror("pthread_getschedparam");
    exit_fun("Error getting thread priority");
  }

  LOG_I(HW, "[SCHED][eNB] eNB asynch RX thread started on CPU %d TID %ld, sched_policy = %s, priority = %d, CPU Affinity = %s\n", sched_getcpu(),gettid(),
	 (policy == SCHED_FIFO)  ? "SCHED_FIFO" :
	 (policy == SCHED_RR)    ? "SCHED_RR" :
	 (policy == SCHED_OTHER) ? "SCHED_OTHER" :
	 "???",
	 sparam.sched_priority, cpu_affinity);
  
  
#endif // DEADLINE_SCHEDULER

758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783

  mlockall(MCL_CURRENT | MCL_FUTURE);

  // wait for top-level synchronization and do one acquisition to get timestamp for setting frame/subframe
  printf( "waiting for sync (eNB_thread_asynch_rx)\n");
  pthread_mutex_lock( &sync_mutex );

  while (sync_var<0)
    pthread_cond_wait( &sync_cond, &sync_mutex );
 
  pthread_mutex_unlock(&sync_mutex);
 
  printf( "got sync (eNB_thread_asynch_rx)\n" );

  if (eNB->node_function == eNodeB_3GPP) { // acquisition from RF

    if (eNB->rfdevice.trx_read_func)
      rxs = eNB->rfdevice.trx_read_func(&eNB->rfdevice,
					&proc->timestamp_rx,
					(void**)dummy_rx,
					fp->samples_per_tti,
					fp->nb_antennas_rx);
    else {
      printf("eNB asynch RX\n");
      sleep(1);
    }
784 785 786
    if (rxs!=fp->samples_per_tti) {
      exit_fun("error receiving samples\n");
    }
787 788
  }
  else if (eNB->node_function == eNodeB_3GPP_BBU) { // acquisition from IF
789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821
      /// **** recv_IF5 of rxdata from RRH **** ///       
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_RECV_IF5, 1 );  
    recv_IF5(eNB, &timestamp_rx, subframe_rx++, IF5_RRH_GW_UL); 
    VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_RECV_IF5, 0 );  
    if (first_rx == 1) {
      first_rx = 0;
      subframe_rx = (timestamp_rx/fp->samples_per_tti)%10;
    }
    else {
    // check timestamp
      if ((timestamp_rx - proc->timestamp_rx) < (2*fp->samples_per_tti))
	printf("RX overflow ...\n");

    }
  } // eNodeB_3GPP_BBU 
  
  else if (eNB->node_function == NGFI_RCC_IF4) {
      /// **** recv_IF4 of rxdataF from RRU **** ///
      /// **** recv_IF4 of rxsigF from RRU **** ///
      // get frame/subframe information from IF4 interface
      // timed loop (200 us)
      
      symbol_number = 0;
      symbol_mask = 0;
      symbol_mask_full = (1<<fp->symbols_per_tti)-1;
      prach_rx = 0;
         
      do {   // Blocking, we need a timeout on this !!!!!!!!!!!!!!!!!!!!!!!
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_RECV_IF4, 1 );   
        recv_IF4(eNB, &frame_rx, &subframe_rx, &packet_type, &symbol_number);
        VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_RECV_IF4, 0 );   

        if (packet_type == IF4_PULFFT) {
822 823
          symbol_mask = symbol_mask | (1<<symbol_number);
          prach_rx = (is_prach_subframe(fp, proc->frame_rx, proc->subframe_rx)>0) ? 1 : 0;                            
824
        } else if (packet_type == IF4_PRACH) {
825
          prach_rx = 0;
Sandeep Kumar's avatar
Sandeep Kumar committed
826
        }
827
      } while( (symbol_mask != symbol_mask_full) || (prach_rx == 1));    
828 829 830 831 832 833 834 835 836 837 838 839 840 841

      if (proc->first_rx == 0) {
        if (subframe_rx < proc->subframe_rx+2){
          LOG_E(PHY,"RX overflow (proc->subframe_rx %d, subframe_rx %d)\n",proc->subframe_rx,subframe_rx);
        }
      } else {
        proc->first_rx = 0;
      }
    } // node_timing == synch_to_externs, node_function = NGFI_IF4
    else { // should not get here
      AssertFatal(1==0, "Unknown eNB->node_function %d",eNB->node_function);
    }

}
Sandeep Kumar's avatar
Sandeep Kumar committed
842

843
/*!
844 845 846
 * \brief The Fronthaul thread of RRU/RAU/RCC/eNB
 * In the case of RRU/eNB, handles interface with external RF
 * In the case of RAU/RCC, handles fronthaul interface with RRU/RAU
847 848 849
 * \param param is a \ref eNB_proc_t structure which contains the info what to process.
 * \returns a pointer to an int. The storage is not on the heap and must not be freed.
 */
850
static void* eNB_thread_FH( void* param ) {
Sandeep Kumar's avatar
Sandeep Kumar committed
851
  
852
  static int eNB_thread_FH_status;
853 854

  eNB_proc_t *proc = (eNB_proc_t*)param;
855 856
  PHY_VARS_eNB *eNB = PHY_vars_eNB_g[0][proc->CC_id];
  LTE_DL_FRAME_PARMS *fp = &eNB->frame_parms;
857 858
  void *rxp[fp->nb_antennas_rx]; 
  unsigned int rxs;
859 860
  FILE  *rx_time_file = NULL;
  char rx_time_name[101];
Raymond Knopp's avatar
Raymond Knopp committed
861
  struct timespec wait;
862 863 864 865 866 867 868
  int i;
  int prach_rx;

  uint16_t packet_type;
  uint32_t symbol_number=0;
  uint32_t symbol_mask, symbol_mask_full;

Sandeep Kumar's avatar
Sandeep Kumar committed
869 870
  int subframe=0, frame=0; 
  
Raymond Knopp's avatar
Raymond Knopp committed
871 872
  wait.tv_sec=0;
  wait.tv_nsec=5000000L;
873

Sandeep Kumar's avatar
Sandeep Kumar committed
874
  if (opp_enabled == 1) {
875
    snprintf(rx_time_name, 100,"/tmp/%s_rx_time_thread_sf", "eNB");
876 877 878
    rx_time_file = fopen(rx_time_name,"w");
  }
  // set default return value
879
  eNB_thread_FH_status = 0;
880 881 882

  MSC_START_USE();

883
#ifdef DEADLINE_SCHEDULER
884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900
  struct sched_attr attr;
  unsigned int flags = 0;
  uint64_t runtime  = 870000 ;
  uint64_t deadline = 1   *  1000000;
  uint64_t period   = 1   * 10000000; // each rx thread has a period of 10ms from the starting point
 
  attr.size = sizeof(attr);
  attr.sched_flags = 0;
  attr.sched_nice = 0;
  attr.sched_priority = 0;

  attr.sched_policy = SCHED_DEADLINE;
  attr.sched_runtime  = runtime;
  attr.sched_deadline = deadline;
  attr.sched_period   = period; 

  if (sched_setattr(0, &attr, flags) < 0 ) {
knopp's avatar
knopp committed
901
    perror("[SCHED] eNB FH sched_setattr failed\n");
902
    return &eNB_thread_FH_status;
903 904
  }

knopp's avatar
knopp committed
905
  LOG_I( HW, "[SCHED] eNB FH deadline thread (TID %ld) started on CPU %d\n", gettid(), sched_getcpu() );
906 907 908 909 910 911 912 913 914 915 916 917 918
#else // LOW_LATENCY
  int policy, s, j;
  struct sched_param sparam;
  char cpu_affinity[1024];
  cpu_set_t cpuset;

  /* Set affinity mask to include CPUs 1 to MAX_CPUS */
  /* CPU 0 is reserved for UHD */
  /* CPU 1 is reserved for all TX threads */
  /* CPU 2..MAX_CPUS is reserved for all RX threads */
  /* Set CPU Affinity only if number of CPUs >2 */
  CPU_ZERO(&cpuset);
#ifdef CPU_AFFINITY
Sandeep Kumar's avatar
Sandeep Kumar committed
919
  if (get_nprocs() >2) {
920
    for (j = 1; j < get_nprocs(); j++)
Sandeep Kumar's avatar
Sandeep Kumar committed
921
      CPU_SET(j, &cpuset);
922 923
  
    s = pthread_setaffinity_np(pthread_self(), sizeof(cpu_set_t), &cpuset);
Sandeep Kumar's avatar
Sandeep Kumar committed
924
    if (s != 0) {
925 926 927 928 929 930 931 932
      perror( "pthread_setaffinity_np");  
      exit_fun (" Error setting processor affinity :");
    }
  }
#endif //CPU_AFFINITY
  /* Check the actual affinity mask assigned to the thread */

  s = pthread_getaffinity_np(pthread_self(), sizeof(cpu_set_t), &cpuset);
Sandeep Kumar's avatar
Sandeep Kumar committed
933 934 935
  if (s != 0) {
    perror ("pthread_getaffinity_np");
    exit_fun (" Error getting processor affinity :");
936 937 938 939
  }
  memset(cpu_affinity,0, sizeof(cpu_affinity));

  for (j = 0; j < CPU_SETSIZE; j++)
Sandeep Kumar's avatar
Sandeep Kumar committed
940 941 942 943 944
    if (CPU_ISSET(j, &cpuset)) {  
      char temp[1024];
      sprintf (temp, " CPU_%d", j);
      strcat(cpu_affinity, temp);
    }
945 946

  memset(&sparam, 0 , sizeof (sparam)); 
knopp's avatar
knopp committed
947
  sparam.sched_priority = sched_get_priority_max(SCHED_FIFO);
948 949 950

  policy = SCHED_FIFO ; 
  s = pthread_setschedparam(pthread_self(), policy, &sparam);
Sandeep Kumar's avatar
Sandeep Kumar committed
951 952 953 954
  if (s != 0) {
    perror("pthread_setschedparam : ");
    exit_fun("Error setting thread priority");     
  }
955 956 957 958

  memset(&sparam, 0 , sizeof (sparam));

  s = pthread_getschedparam(pthread_self(), &policy, &sparam);
Sandeep Kumar's avatar
Sandeep Kumar committed
959 960 961 962
  if (s != 0) {
    perror("pthread_getschedparam");
    exit_fun("Error getting thread priority");
  }
963

knopp's avatar
knopp committed
964
  LOG_I(HW, "[SCHED][eNB] FH thread started on CPU %d TID %ld, sched_policy = %s, priority = %d, CPU Affinity = %s\n", sched_getcpu(),gettid(),
965 966 967 968 969 970 971
	 (policy == SCHED_FIFO)  ? "SCHED_FIFO" :
	 (policy == SCHED_RR)    ? "SCHED_RR" :
	 (policy == SCHED_OTHER) ? "SCHED_OTHER" :
	 "???",
	 sparam.sched_priority, cpu_affinity);
  
  
972
#endif // DEADLINE_SCHEDULER
973 974


Sandeep Kumar's avatar
Sandeep Kumar committed
975
  mlockall(MCL_CURRENT | MCL_FUTURE);
976

knopp's avatar
knopp committed
977 978
  // wait for top-level synchronization and do one acquisition to get timestamp for setting frame/subframe
  printf( "waiting for sync (eNB_thread_FH)\n");
Sandeep Kumar's avatar
Sandeep Kumar committed
979
  pthread_mutex_lock( &sync_mutex );
980

Sandeep Kumar's avatar
Sandeep Kumar committed
981 982
  while (sync_var<0)
    pthread_cond_wait( &sync_cond, &sync_mutex );
983
 
Sandeep Kumar's avatar
Sandeep Kumar committed
984
  pthread_mutex_unlock(&sync_mutex);
985
 
Sandeep Kumar's avatar
Sandeep Kumar committed
986
  printf( "got sync (eNB_thread_FH)\n" );
987 988 989 990
 
#if defined(ENABLE_ITTI)
  wait_system_ready ("Waiting for eNB application to be ready %s\r", &start_eNB);
#endif 
991

Sandeep Kumar's avatar
Sandeep Kumar committed
992 993 994 995 996 997 998 999 1000 1001 1002 1003
  // Create buffer for IF device and free when stopping
  if (eNB->node_function == NGFI_RCC_IF4 || eNB->node_function == NGFI_RRU_IF4) {
    malloc_IF4_buffer(eNB);
    
  } else if (eNB->node_function == NGFI_RRU_IF5 || eNB->node_function == eNodeB_3GPP_BBU) {
    //malloc_IF5_buffer(eNB);

  } else {
    eNB->ifbuffer.tx = NULL;
    eNB->ifbuffer.rx = NULL;
  }

1004
  // Start IF device for this CC
1005
  if (eNB->node_function != eNodeB_3GPP) {
1006 1007 1008 1009 1010
    if (eNB->ifdevice.trx_start_func(&eNB->ifdevice) != 0 ) 
      LOG_E(HW,"Could not start the IF device\n");
  }
  
  // Start RF device for this CC
1011 1012 1013
  if ((eNB->node_function == eNodeB_3GPP) || 
      (eNB->node_function == NGFI_RRU_IF4) || 
      (eNB->node_function == NGFI_RRU_IF5)) {
1014 1015 1016
    if (eNB->rfdevice.trx_start_func(&eNB->rfdevice) != 0 ) 
      LOG_E(HW,"Could not start the RF device\n");
  }
1017
      
Sandeep Kumar's avatar
Sandeep Kumar committed
1018 1019
  // This is a forever while loop, it loops over subframes which are scheduled by incoming samples from HW devices
  while (!oai_exit) {
1020
   
Sandeep Kumar's avatar
Sandeep Kumar committed
1021
    if (oai_exit) break;   
1022

1023 1024 1025 1026 1027 1028 1029 1030
    if (subframe==9) { 
      subframe=0;
      frame++;
      frame&=1023;
    } else {
      subframe++;
    }      

Sandeep Kumar's avatar
Sandeep Kumar committed
1031
    // This case is for synchronization to another thread
1032
    if ((eNB->node_timing == synch_to_other) &&
Sandeep Kumar's avatar
Sandeep Kumar committed
1033 1034
       ((eNB->node_function == NGFI_RCC_IF4) ||
        (eNB->node_function == eNodeB_3GPP_BBU))) {   
1035 1036 1037 1038 1039
      //wait for event

      // how long should we wait here, for MOBIPASS this could be long
      //      if (pthread_mutex_timedlock(&proc->mutex_FH,&wait) != 0) {
      if (pthread_mutex_lock(&proc->mutex_FH) != 0) {
Sandeep Kumar's avatar
Sandeep Kumar committed
1040 1041 1042
        LOG_E( PHY, "[SCHED][eNB] error locking mutex for FH\n");
        exit_fun( "error locking mutex" );
        break;
1043 1044 1045
      }
      
      while (proc->instance_cnt_FH < 0) {
Sandeep Kumar's avatar
Sandeep Kumar committed
1046
        // most of the time the thread is waiting here
1047
        // proc->instance_cnt_FH is -1
Sandeep Kumar's avatar
Sandeep Kumar committed
1048 1049
        pthread_cond_wait( &proc->cond_FH,&proc->mutex_FH ); // this unlocks mutex_rxtx while waiting and then locks it again
      }      
1050 1051
      proc->instance_cnt_FH++;

Sandeep Kumar's avatar
Sandeep Kumar committed
1052
    }
1053 1054
    // Remaining cases are all for synchronization on FH interface
    else if ((eNB->node_timing == synch_to_ext_device) &&
Sandeep Kumar's avatar
Sandeep Kumar committed
1055 1056 1057
             ((eNB->node_function == NGFI_RRU_IF4) ||
              (eNB->node_function == NGFI_RRU_IF5) || 
              (eNB->node_function == eNodeB_3GPP))) { // acquisition from RF
1058 1059
      
      for (i=0; i<fp->nb_antennas_rx; i++)
Sandeep Kumar's avatar
Sandeep Kumar committed
1060
        rxp[i] = (void*)&eNB->common_vars.rxdata[0][i][subframe*fp->samples_per_tti];
1061 1062
      
      VCD_SIGNAL_DUMPER_DUMP_FUNCTION_BY_NAME( VCD_SIGNAL_DUMPER_FUNCTIONS_TRX_READ, 1 );
1063

1064
      rxs = eNB->rfdevice.trx_read_func(&eNB->rfdevice,
Sandeep Kumar's avatar
Sandeep Kumar committed
1065 1066 1067 1068 1069
                                        &proc->timestamp_rx,
                                        rxp,
                                        fp->samples_per_tti,
                                        fp->nb_antennas_rx);

1070 1071 1072 1073
      proc->frame_rx    = (proc->timestamp_rx / (fp->samples_per_tti*10))&1023;
      proc->subframe_rx = (proc->timestamp_rx / fp->samples_per_tti)%10;
      
      if (proc->first_rx == 0) {
Sandeep Kumar's avatar
Sandeep Kumar committed
1074
        if