lte-softmodem.c 44 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
/*
 * Licensed to the OpenAirInterface (OAI) Software Alliance under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * The OpenAirInterface Software Alliance licenses this file to You under
 * the OAI Public License, Version 1.0  (the "License"); you may not use this file
 * except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *      http://www.openairinterface.org/?page_id=698
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *-------------------------------------------------------------------------------
 * For more information about the OpenAirInterface (OAI) Software Alliance:
 *      contact@openairinterface.org
 */

22 23
/*! \file lte-enb.c
 * \brief Top-level threads for eNodeB
24
 * \author R. Knopp, F. Kaltenberger, Navid Nikaein
knopp's avatar
 
knopp committed
25 26 27
 * \date 2012
 * \version 0.1
 * \company Eurecom
28
 * \email: knopp@eurecom.fr,florian.kaltenberger@eurecom.fr, navid.nikaein@eurecom.fr
knopp's avatar
 
knopp committed
29 30 31
 * \note
 * \warning
 */
32

33

34

35 36
#include "T.h"

37
#include "rt_wrapper.h"
38

39

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

42
#include "assertions.h"
43
#include "msc.h"
44 45

#include "PHY/types.h"
46

47
#include "PHY/defs.h"
48
#include "common/ran_context.h"
49
#include "common/config/config_userapi.h"
50

51
#undef MALLOC //there are two conflicting definitions, so we better make sure we don't use it at all
knopp's avatar
 
knopp committed
52
//#undef FRAME_LENGTH_COMPLEX_SAMPLES //there are two conflicting definitions, so we better make sure we don't use it at all
53

knopp's avatar
 
knopp committed
54
#include "../../ARCH/COMMON/common_lib.h"
55
#include "../../ARCH/ETHERNET/USERSPACE/LIB/if_defs.h"
knopp's avatar
 
knopp committed
56

knopp's avatar
 
knopp committed
57
//#undef FRAME_LENGTH_COMPLEX_SAMPLES //there are two conflicting definitions, so we better make sure we don't use it at all
58 59 60 61 62 63 64 65 66

#include "PHY/vars.h"
#include "SCHED/vars.h"
#include "LAYER2/MAC/vars.h"

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

#include "LAYER2/MAC/defs.h"
#include "LAYER2/MAC/vars.h"
67
#include "LAYER2/MAC/proto.h"
68 69 70 71 72 73 74 75
#include "RRC/LITE/vars.h"
#include "PHY_INTERFACE/vars.h"

#ifdef SMBV
#include "PHY/TOOLS/smbv.h"
unsigned short config_frames[4] = {2,9,11,13};
#endif
#include "UTIL/LOG/log_extern.h"
nikaeinn's avatar
nikaeinn committed
76
#include "UTIL/OTG/otg_tx.h"
77
#include "UTIL/OTG/otg_externs.h"
78 79
#include "UTIL/MATH/oml.h"
#include "UTIL/LOG/vcd_signal_dumper.h"
80
#include "UTIL/OPT/opt.h"
81
#include "enb_config.h"
nikaeinn's avatar
nikaeinn committed
82
//#include "PHY/TOOLS/time_meas.h"
83

Florian Kaltenberger's avatar
 
Florian Kaltenberger committed
84 85 86 87
#ifndef OPENAIR2
#include "UTIL/OTG/otg_vars.h"
#endif

88
#if defined(ENABLE_ITTI)
89 90
#include "intertask_interface_init.h"
#include "create_tasks.h"
91 92
#endif

93 94
#include "system.h"

95 96 97
#ifdef XFORMS
#include "PHY/TOOLS/lte_phy_scope.h"
#include "stats.h"
98
#endif
99
#include "lte-softmodem.h"
100

101

102
#ifdef XFORMS
103
// current status is that every UE has a DL scope for a SINGLE eNB (eNB_id=0)
gauthier's avatar
gauthier committed
104
// at eNB 0, an UL scope for every UE
105
FD_lte_phy_scope_ue  *form_ue[NUMBER_OF_UE_MAX];
106
FD_lte_phy_scope_enb *form_enb[MAX_NUM_CCs][NUMBER_OF_UE_MAX];
107
FD_stats_form                  *form_stats=NULL,*form_stats_l2=NULL;
108
char title[255];
109
unsigned char                   scope_enb_num_ue = 2;
110
static pthread_t                forms_thread; //xforms
111 112
#endif //XFORMS

knopp's avatar
 
knopp committed
113 114
pthread_cond_t sync_cond;
pthread_mutex_t sync_mutex;
115
int sync_var=-1; //!< protected by mutex \ref sync_mutex.
116

117 118
uint16_t runtime_phy_rx[29][6]; // SISO [MCS 0-28][RBs 0-5 : 6, 15, 25, 50, 75, 100]
uint16_t runtime_phy_tx[29][6]; // SISO [MCS 0-28][RBs 0-5 : 6, 15, 25, 50, 75, 100]
knopp's avatar
 
knopp committed
119

120
#if defined(ENABLE_ITTI)
121 122
volatile int             start_eNB = 0;
volatile int             start_UE = 0;
123
#endif
knopp's avatar
knopp committed
124
volatile int             oai_exit = 0;
125

126
static clock_source_t clock_source = internal;
127
static int wait_for_sync = 0;
knopp's avatar
 
knopp committed
128

knopp's avatar
knopp committed
129
static char              UE_flag=0;
130
unsigned int                    mmapped_dma=0;
131
int                             single_thread_flag=1;
132

133
static char                     threequarter_fs=0;
134

135
uint32_t                 downlink_frequency[MAX_NUM_CCs][4];
136
int32_t                  uplink_frequency_offset[MAX_NUM_CCs][4];
gauthier's avatar
gauthier committed
137

138

oai's avatar
oai committed
139

140
#if defined(ENABLE_ITTI)
141
static char                    *itti_dump_file = NULL;
knopp's avatar
 
knopp committed
142 143
#endif

144
int UE_scan = 1;
145
int UE_scan_carrier = 0;
146 147
runmode_t mode = normal_txrx;

148 149
FILE *input_fd=NULL;

150

151 152
#if MAX_NUM_CCs == 1
rx_gain_t                rx_gain_mode[MAX_NUM_CCs][4] = {{max_gain,max_gain,max_gain,max_gain}};
kortke's avatar
kortke committed
153 154
double tx_gain[MAX_NUM_CCs][4] = {{20,0,0,0}};
double rx_gain[MAX_NUM_CCs][4] = {{110,0,0,0}};
155 156 157 158
#else
rx_gain_t                rx_gain_mode[MAX_NUM_CCs][4] = {{max_gain,max_gain,max_gain,max_gain},{max_gain,max_gain,max_gain,max_gain}};
double tx_gain[MAX_NUM_CCs][4] = {{20,0,0,0},{20,0,0,0}};
double rx_gain[MAX_NUM_CCs][4] = {{110,0,0,0},{20,0,0,0}};
gauthier's avatar
gauthier committed
159
#endif
knopp's avatar
 
knopp committed
160

fnabet's avatar
fnabet committed
161
double rx_gain_off = 0.0;
162

knopp's avatar
 
knopp committed
163
double sample_rate=30.72e6;
164
double bw = 10.0e6;
165

166
static int                      tx_max_power[MAX_NUM_CCs]; /* =  {0,0}*/;
167

168 169
char   rf_config_file[1024];

Florian Kaltenberger's avatar
Florian Kaltenberger committed
170
int chain_offset=0;
171
int phy_test = 0;
172
uint8_t usim_test = 0;
Florian Kaltenberger's avatar
Florian Kaltenberger committed
173

174 175
uint8_t nb_antenna_tx = 1;
uint8_t nb_antenna_rx = 1;
176

knopp's avatar
 
knopp committed
177 178 179
char ref[128] = "internal";
char channels[128] = "0";

180
int                      rx_input_level_dBm;
181
static int                      online_log_messages=0;
182
#ifdef XFORMS
183
extern int                      otg_enabled;
184
static char                     do_forms=0;
185
#else
186
int                             otg_enabled;
187
#endif
knopp's avatar
 
knopp committed
188
//int                             number_of_cards =   1;
189

190 191

static LTE_DL_FRAME_PARMS      *frame_parms[MAX_NUM_CCs];
Florian Kaltenberger's avatar
Florian Kaltenberger committed
192
uint32_t target_dl_mcs = 28; //maximum allowed mcs
193
uint32_t target_ul_mcs = 20;
194
uint32_t timing_advance = 0;
195 196
uint8_t exit_missed_slots=1;
uint64_t num_missed_slots=0; // counter for the number of missed slots
197

198

199 200
extern void reset_opp_meas(void);
extern void print_opp_meas(void);
201

202
int transmission_mode=1;
knopp's avatar
 
knopp committed
203

204
int16_t           glog_level         = LOG_INFO;
gauthier's avatar
 
gauthier committed
205
int16_t           glog_verbosity     = LOG_MED;
206
int16_t           hw_log_level       = LOG_INFO;
gauthier's avatar
 
gauthier committed
207
int16_t           hw_log_verbosity   = LOG_MED;
208
int16_t           phy_log_level      = LOG_DEBUG;
gauthier's avatar
 
gauthier committed
209
int16_t           phy_log_verbosity  = LOG_MED;
210
int16_t           mac_log_level      = LOG_DEBUG;
gauthier's avatar
 
gauthier committed
211
int16_t           mac_log_verbosity  = LOG_MED;
212
int16_t           rlc_log_level      = LOG_INFO;
gauthier's avatar
 
gauthier committed
213
int16_t           rlc_log_verbosity  = LOG_MED;
214
int16_t           pdcp_log_level     = LOG_INFO;
gauthier's avatar
 
gauthier committed
215
int16_t           pdcp_log_verbosity = LOG_MED;
Florian Kaltenberger's avatar
Florian Kaltenberger committed
216
int16_t           rrc_log_level      = LOG_INFO;
gauthier's avatar
 
gauthier committed
217
int16_t           rrc_log_verbosity  = LOG_MED;
218 219 220
int16_t           opt_log_level      = LOG_INFO;
int16_t           opt_log_verbosity  = LOG_MED;

gauthier's avatar
 
gauthier committed
221 222 223 224 225 226
# if defined(ENABLE_USE_MME)
int16_t           gtpu_log_level     = LOG_DEBUG;
int16_t           gtpu_log_verbosity = LOG_MED;
int16_t           udp_log_level      = LOG_DEBUG;
int16_t           udp_log_verbosity  = LOG_MED;
#endif
227 228 229
#if defined (ENABLE_SECURITY)
int16_t           osa_log_level      = LOG_INFO;
int16_t           osa_log_verbosity  = LOG_MED;
230
#endif
231

232 233 234
/* struct for ethernet specific parameters given in eNB conf file */
eth_params_t *eth_params;

235 236 237 238
openair0_config_t openair0_cfg[MAX_CARDS];

double cpuf;

239 240
extern char uecap_xer[1024];
char uecap_xer_in=0;
241

242
int oaisim_flag=0;
243
threads_t threads= {-1,-1,-1};
knopp's avatar
 
knopp committed
244

Cedric Roux's avatar
Cedric Roux committed
245 246 247 248
/* see file openair2/LAYER2/MAC/main.c for why abstraction_flag is needed
 * this is very hackish - find a proper solution
 */
uint8_t abstraction_flag=0;
knopp's avatar
 
knopp committed
249

250 251 252 253 254
/*---------------------BMC: timespec helpers -----------------------------*/

struct timespec min_diff_time = { .tv_sec = 0, .tv_nsec = 0 };
struct timespec max_diff_time = { .tv_sec = 0, .tv_nsec = 0 };

255
struct timespec clock_difftime(struct timespec start, struct timespec end) {
256 257 258 259 260 261 262 263 264
  struct timespec temp;
  if ((end.tv_nsec-start.tv_nsec)<0) {
    temp.tv_sec = end.tv_sec-start.tv_sec-1;
    temp.tv_nsec = 1000000000+end.tv_nsec-start.tv_nsec;
  } else {
    temp.tv_sec = end.tv_sec-start.tv_sec;
    temp.tv_nsec = end.tv_nsec-start.tv_nsec;
  }
  return temp;
265 266
}

267
void print_difftimes(void) {
268
#ifdef DEBUG
269
  printf("difftimes min = %lu ns ; max = %lu ns\n", min_diff_time.tv_nsec, max_diff_time.tv_nsec);
270
#else
271
  LOG_I(HW,"difftimes min = %lu ns ; max = %lu ns\n", min_diff_time.tv_nsec, max_diff_time.tv_nsec);
272 273 274
#endif
}

275
void update_difftimes(struct timespec start, struct timespec end) {
276 277 278
  struct timespec diff_time = { .tv_sec = 0, .tv_nsec = 0 };
  int             changed = 0;
  diff_time = clock_difftime(start, end);
279 280 281 282 283 284 285 286
  if ((min_diff_time.tv_nsec == 0) || (diff_time.tv_nsec < min_diff_time.tv_nsec)) {
    min_diff_time.tv_nsec = diff_time.tv_nsec;
    changed = 1;
  }
  if ((max_diff_time.tv_nsec == 0) || (diff_time.tv_nsec > max_diff_time.tv_nsec)) {
    max_diff_time.tv_nsec = diff_time.tv_nsec;
    changed = 1;
  }
287
#if 1
288
  if (changed) print_difftimes();
289 290 291 292 293
#endif
}

/*------------------------------------------------------------------------*/

294
unsigned int build_rflocal(int txi, int txq, int rxi, int rxq) {
knopp's avatar
 
knopp committed
295
  return (txi + (txq<<6) + (rxi<<12) + (rxq<<18));
296
}
297
unsigned int build_rfdc(int dcoff_i_rxfe, int dcoff_q_rxfe) {
knopp's avatar
 
knopp committed
298
  return (dcoff_i_rxfe + (dcoff_q_rxfe<<8));
299 300
}

301
#if !defined(ENABLE_ITTI)
302
void signal_handler(int sig) {
303 304 305 306 307 308
  void *array[10];
  size_t size;

  if (sig==SIGSEGV) {
    // get void*'s for all entries on the stack
    size = backtrace(array, 10);
309

310 311 312 313
    // print out all the frames to stderr
    fprintf(stderr, "Error: signal %d:\n", sig);
    backtrace_symbols_fd(array, size, 2);
    exit(-1);
314 315
  } else {
    printf("trying to exit gracefully...\n");
316
    oai_exit = 1;
317 318
  }
}
319
#endif
nikaeinn's avatar
nikaeinn committed
320 321 322 323 324 325 326 327 328 329 330
#define KNRM  "\x1B[0m"
#define KRED  "\x1B[31m"
#define KGRN  "\x1B[32m"
#define KBLU  "\x1B[34m"
#define RESET "\033[0m"

void help (void) {
  printf (KGRN "Usage:\n");
  printf("  sudo -E lte-softmodem [options]\n");
  printf("  sudo -E ./lte-softmodem -O ../../../targets/PROJECTS/GENERIC-LTE-EPC/CONF/enb.band7.tm1.exmimo2.openEPC.conf -S -V -m 26 -t 16 -x 1 --ulsch-max-errors 100 -W\n\n");
  printf("Options:\n");
331
  printf("  --rf-config-file Configuration file for front-end (e.g. LMS7002M)\n");
nikaeinn's avatar
nikaeinn committed
332 333 334 335
  printf("  --ulsch-max-errors set the max ULSCH erros\n");
  printf("  --calib-ue-rx set UE RX calibration\n");
  printf("  --calib-ue-rx-med \n");
  printf("  --calib-ue-rxbyp\n");
knopp's avatar
 
knopp committed
336 337
  printf("  --debug-ue-prach run normal prach power ramping, but don't continue random-access\n");
  printf("  --calib-prach-tx run normal prach with maximum power, but don't continue random-access\n");
nikaeinn's avatar
nikaeinn committed
338
  printf("  --no-L2-connect bypass L2 and upper layers\n");
339
  printf("  --ue-rxgain set UE RX gain\n");
fnabet's avatar
fnabet committed
340
  printf("  --ue-rxgain-off external UE amplifier offset\n");
341
  printf("  --ue-txgain set UE TX gain\n");
Cedric Roux's avatar
Cedric Roux committed
342 343
  printf("  --ue-nb-ant-rx  set UE number of rx antennas\n");
  printf("  --ue-scan-carrier set UE to scan around carrier\n");
344
  printf("  --dlsch-demod-shift dynamic shift for LLR compuation for TM3/4 (default 0)\n");
345
  printf("  --loop-memory get softmodem (UE) to loop through memory instead of acquiring from HW\n");
346
  printf("  --mmapped-dma sets flag for improved EXMIMO UE performance\n");  
347
  printf("  --external-clock tells hardware to use an external clock reference\n");
348
  printf("  --usim-test use XOR autentication algo in case of test usim mode\n"); 
349
  printf("  --single-thread-disable. Disables single-thread mode in lte-softmodem\n"); 
350
  printf("  -A Set timing_advance\n");
351
  printf("  -C Set the downlink frequency for all component carriers\n");
nikaeinn's avatar
nikaeinn committed
352 353 354
  printf("  -d Enable soft scope and L1 and L2 stats (Xforms)\n");
  printf("  -F Calibrate the EXMIMO borad, available files: exmimo2_2arxg.lime exmimo2_2brxg.lime \n");
  printf("  -g Set the global log level, valide options: (9:trace, 8/7:debug, 6:info, 4:warn, 3:error)\n");
355
  printf("  -G Set the global log verbosity \n");
nikaeinn's avatar
nikaeinn committed
356 357 358 359 360
  printf("  -h provides this help message!\n");
  printf("  -K Generate ITTI analyzser logs (similar to wireshark logs but with more details)\n");
  printf("  -m Set the maximum downlink MCS\n");
  printf("  -O eNB configuration file (located in targets/PROJECTS/GENERIC-LTE-EPC/CONF\n");
  printf("  -q Enable processing timing measurement of lte softmodem on per subframe basis \n");
kaltenbe's avatar
kaltenbe committed
361
  printf("  -r Set the PRB, valid values: 6, 25, 50, 100  \n");    
nikaeinn's avatar
nikaeinn committed
362 363
  printf("  -S Skip the missed slots/subframes \n");    
  printf("  -t Set the maximum uplink MCS\n");
364
  printf("  -T Set hardware to TDD mode (default: FDD). Used only with -U (otherwise set in config file).\n");
nikaeinn's avatar
nikaeinn committed
365 366 367
  printf("  -U Set the lte softmodem as a UE\n");
  printf("  -W Enable L2 wireshark messages on localhost \n");
  printf("  -V Enable VCD (generated file will be located atopenair_dump_eNB.vcd, read it with target/RT/USER/eNB.gtkw\n");
368
  printf("  -x Set the transmission mode, valid options: 1 \n");
369
  printf("  -E Apply three-quarter of sampling frequency, 23.04 Msps to reduce the data rate on USB/PCIe transfers (only valid for 20 MHz)\n");
370 371 372
#if T_TRACER
  printf("  --T_port [port]    use given port\n");
  printf("  --T_nowait         don't wait for tracer, start immediately\n");
373
  printf("  --T_dont_fork      to ease debugging with gdb\n");
374 375 376
#endif
  printf(RESET);
  fflush(stdout);
nikaeinn's avatar
nikaeinn committed
377
}
378

Raymond Knopp's avatar
Raymond Knopp committed
379

380 381
void exit_fun(const char* s)
{
Raymond Knopp's avatar
Raymond Knopp committed
382
  int CC_id;
383
  int ru_id;
Raymond Knopp's avatar
Raymond Knopp committed
384

385
  if (s != NULL) {
386
    printf("%s %s() Exiting OAI softmodem: %s\n",__FILE__, __FUNCTION__, s);
387 388 389
  }

  oai_exit = 1;
390 391 392 393 394 395 396 397 398 399

  if (UE_flag==0) {
    for (ru_id=0; ru_id<RC.nb_RU;ru_id++) {
      if (RC.ru[ru_id]->rfdevice.trx_end_func)
	RC.ru[ru_id]->rfdevice.trx_end_func(&RC.ru[ru_id]->rfdevice);
      if (RC.ru[ru_id]->ifdevice.trx_end_func)
	RC.ru[ru_id]->ifdevice.trx_end_func(&RC.ru[ru_id]->ifdevice);  
    }
  }

Raymond Knopp's avatar
Raymond Knopp committed
400
  for(CC_id=0; CC_id<MAX_NUM_CCs; CC_id++) {
401 402 403 404

    oai_exit = 1;

    for(CC_id=0; CC_id<MAX_NUM_CCs; CC_id++) {
405 406 407 408 409
      if (UE_flag == 0) {
      } else {
	if (PHY_vars_UE_g[0][CC_id]->rfdevice.trx_end_func)
	  PHY_vars_UE_g[0][CC_id]->rfdevice.trx_end_func(&PHY_vars_UE_g[0][CC_id]->rfdevice);
      }
knopp's avatar
knopp committed
410
    }
411 412

#if defined(ENABLE_ITTI)
413 414
    sleep(1); //allow lte-softmodem threads to exit first
    itti_terminate_tasks (TASK_UNKNOWN);
415
#endif
416

417
  }
418

419
}
420

421
#ifdef XFORMS
422

423

424 425
void reset_stats(FL_OBJECT *button, long arg)
{
426
  int i,j,k;
427
  PHY_VARS_eNB *phy_vars_eNB = RC.eNB[0][0];
428 429 430

  for (i=0; i<NUMBER_OF_UE_MAX; i++) {
    for (k=0; k<8; k++) { //harq_processes
431
      for (j=0; j<phy_vars_eNB->dlsch[i][0]->Mlimit; j++) {
432 433 434
	phy_vars_eNB->UE_stats[i].dlsch_NAK[k][j]=0;
	phy_vars_eNB->UE_stats[i].dlsch_ACK[k][j]=0;
	phy_vars_eNB->UE_stats[i].dlsch_trials[k][j]=0;
435
      }
436

437 438 439
      phy_vars_eNB->UE_stats[i].dlsch_l2_errors[k]=0;
      phy_vars_eNB->UE_stats[i].ulsch_errors[k]=0;
      phy_vars_eNB->UE_stats[i].ulsch_consecutive_errors=0;
440 441


442 443 444
      phy_vars_eNB->UE_stats[i].dlsch_sliding_cnt=0;
      phy_vars_eNB->UE_stats[i].dlsch_NAK_round0=0;
      phy_vars_eNB->UE_stats[i].dlsch_mcs_offset=0;
445 446 447 448
    }
  }
}

449
static void *scope_thread(void *arg) {
knopp's avatar
 
knopp committed
450
  char stats_buffer[16384];
451
# ifdef ENABLE_XFORMS_WRITE_STATS
knopp's avatar
 
knopp committed
452
  FILE *UE_stats, *eNB_stats;
453
# endif
knopp's avatar
 
knopp committed
454
  struct sched_param sched_param;
455
  int UE_id, CC_id;
456
  int ue_cnt=0;
457

458
  sched_param.sched_priority = sched_get_priority_min(SCHED_FIFO)+1;
knopp's avatar
 
knopp committed
459
  sched_setscheduler(0, SCHED_FIFO,&sched_param);
460

knopp's avatar
 
knopp committed
461
  printf("Scope thread has priority %d\n",sched_param.sched_priority);
462

463
# ifdef ENABLE_XFORMS_WRITE_STATS
464 465

  if (UE_flag==1)
knopp's avatar
 
knopp committed
466
    UE_stats  = fopen("UE_stats.txt", "w");
467
  else
knopp's avatar
 
knopp committed
468
    eNB_stats = fopen("eNB_stats.txt", "w");
469

470
#endif
471

knopp's avatar
 
knopp committed
472 473
  while (!oai_exit) {
    if (UE_flag==1) {
oai's avatar
oai committed
474
      dump_ue_stats (PHY_vars_UE_g[0][0], &PHY_vars_UE_g[0][0]->proc.proc_rxtx[0],stats_buffer, 0, mode,rx_input_level_dBm);
knopp's avatar
knopp committed
475 476 477
      //fl_set_object_label(form_stats->stats_text, stats_buffer);
      fl_clear_browser(form_stats->stats_text);
      fl_add_browser_line(form_stats->stats_text, stats_buffer);
478

479
      phy_scope_UE(form_ue[0],
480 481 482 483
		   PHY_vars_UE_g[0][0],
		   0,
		   0,7);

484

knopp's avatar
 
knopp committed
485
    } else {
486
      /*
487
	if (RC.eNB[0][0]->mac_enabled==1) {
488 489 490 491
	len = dump_eNB_l2_stats (stats_buffer, 0);
	//fl_set_object_label(form_stats_l2->stats_text, stats_buffer);
	fl_clear_browser(form_stats_l2->stats_text);
	fl_add_browser_line(form_stats_l2->stats_text, stats_buffer);
492 493
	}
	len = dump_eNB_stats (RC.eNB[0][0], stats_buffer, 0);
494

495 496
	if (MAX_NUM_CCs>1)
	len += dump_eNB_stats (RC.eNB[0][1], &stats_buffer[len], 0);
497

498 499 500
	//fl_set_object_label(form_stats->stats_text, stats_buffer);
	fl_clear_browser(form_stats->stats_text);
	fl_add_browser_line(form_stats->stats_text, stats_buffer);
501
      */
502 503
      ue_cnt=0;
      for(UE_id=0; UE_id<NUMBER_OF_UE_MAX; UE_id++) {
504
	for(CC_id=0; CC_id<MAX_NUM_CCs; CC_id++) {
505
	  //	  if ((RC.eNB[0][CC_id]->dlsch[UE_id][0]->rnti>0) && (ue_cnt<scope_enb_num_ue)) {
506
	  if ((ue_cnt<scope_enb_num_ue)) {
gauthier's avatar
gauthier committed
507
	    phy_scope_eNB(form_enb[CC_id][ue_cnt],
508
			  RC.eNB[0][CC_id],
509 510 511
			  UE_id);
	    ue_cnt++;
	  }
512
	}
knopp's avatar
 
knopp committed
513
      }
514

515
    }
516
	
knopp's avatar
 
knopp committed
517
    //printf("doing forms\n");
Florian Kaltenberger's avatar
Florian Kaltenberger committed
518 519
    //usleep(100000); // 100 ms
    sleep(1);
knopp's avatar
 
knopp committed
520
  }
521

522
  //  printf("%s",stats_buffer);
523

524
# ifdef ENABLE_XFORMS_WRITE_STATS
525

526 527 528 529 530 531
  if (UE_flag==1) {
    if (UE_stats) {
      rewind (UE_stats);
      fwrite (stats_buffer, 1, len, UE_stats);
      fclose (UE_stats);
    }
532
  } else {
533 534 535 536 537 538
    if (eNB_stats) {
      rewind (eNB_stats);
      fwrite (stats_buffer, 1, len, eNB_stats);
      fclose (eNB_stats);
    }
  }
539

540
# endif
541

knopp's avatar
 
knopp committed
542
  pthread_exit((void*)arg);
543 544 545
}
#endif

546

547

548

knopp's avatar
 
knopp committed
549
#if defined(ENABLE_ITTI)
550
void *l2l1_task(void *arg) {
knopp's avatar
 
knopp committed
551 552 553 554 555
  MessageDef *message_p = NULL;
  int         result;

  itti_set_task_real_time(TASK_L2L1);
  itti_mark_task_ready(TASK_L2L1);
556

knopp's avatar
 
knopp committed
557 558
  if (UE_flag == 0) {
    /* Wait for the initialize message */
559
    printf("Wait for the ITTI initialize message\n");
560
    do {
knopp's avatar
 
knopp committed
561
      if (message_p != NULL) {
562 563
	result = itti_free (ITTI_MSG_ORIGIN_ID(message_p), message_p);
	AssertFatal (result == EXIT_SUCCESS, "Failed to free memory (%d)!\n", result);
knopp's avatar
 
knopp committed
564
      }
565

566 567 568
      itti_receive_msg (TASK_L2L1, &message_p);

      switch (ITTI_MSG_ID(message_p)) {
knopp's avatar
 
knopp committed
569
      case INITIALIZE_MESSAGE:
570 571 572 573
	/* Start eNB thread */
	LOG_D(EMU, "L2L1 TASK received %s\n", ITTI_MSG_NAME(message_p));
	start_eNB = 1;
	break;
knopp's avatar
 
knopp committed
574 575

      case TERMINATE_MESSAGE:
576 577 578 579
	printf("received terminate message\n");
	oai_exit=1;
	itti_exit_task ();
	break;
knopp's avatar
 
knopp committed
580 581

      default:
582 583
	LOG_E(EMU, "Received unexpected message %s\n", ITTI_MSG_NAME(message_p));
	break;
584
      }
knopp's avatar
 
knopp committed
585
    } while (ITTI_MSG_ID(message_p) != INITIALIZE_MESSAGE);
586

knopp's avatar
 
knopp committed
587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607
    result = itti_free (ITTI_MSG_ORIGIN_ID(message_p), message_p);
    AssertFatal (result == EXIT_SUCCESS, "Failed to free memory (%d)!\n", result);
  }

  do {
    // Wait for a message
    itti_receive_msg (TASK_L2L1, &message_p);

    switch (ITTI_MSG_ID(message_p)) {
    case TERMINATE_MESSAGE:
      oai_exit=1;
      itti_exit_task ();
      break;

    case ACTIVATE_MESSAGE:
      start_UE = 1;
      break;

    case DEACTIVATE_MESSAGE:
      start_UE = 0;
      break;
608

knopp's avatar
 
knopp committed
609 610 611 612 613 614 615 616 617 618 619
    case MESSAGE_TEST:
      LOG_I(EMU, "Received %s\n", ITTI_MSG_NAME(message_p));
      break;

    default:
      LOG_E(EMU, "Received unexpected message %s\n", ITTI_MSG_NAME(message_p));
      break;
    }

    result = itti_free (ITTI_MSG_ORIGIN_ID(message_p), message_p);
    AssertFatal (result == EXIT_SUCCESS, "Failed to free memory (%d)!\n", result);
thomasl's avatar
thomasl committed
620
  } while(!oai_exit);
621

knopp's avatar
 
knopp committed
622
  return NULL;
623 624 625
}
#endif

626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 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
static void get_options(void) {
  int CC_id;
  int clock_src;
  int tddflag;
  char *loopfile=NULL;
  int dumpframe;
  paramdef_t cmdline_params[] =CMDLINE_PARAMS_DESC ;

  config_process_cmdline( cmdline_params,sizeof(cmdline_params)/sizeof(paramdef_t),NULL); 
  if (tddflag > 0) {
      for (CC_id=0; CC_id<MAX_NUM_CCs; CC_id++) 
	frame_parms[CC_id]->frame_type = TDD;
  }

  if (strlen(in_path) > 0) {
      opt_type = OPT_PCAP;
      opt_enabled=1;
      printf("Enabling OPT for PCAP  with the following file %s \n",in_path);
  }
  if (strlen(in_ip) > 0) {
      opt_enabled=1;
      opt_type = OPT_WIRESHARK;
      printf("Enabling OPT for wireshark for local interface");
  }
  if (UE_flag > 0) {
     paramdef_t cmdline_uemodeparams[] =CMDLINE_UEMODEPARAMS_DESC;
     paramdef_t cmdline_ueparams[] =CMDLINE_UEPARAMS_DESC;
     config_process_cmdline( cmdline_uemodeparams,sizeof(cmdline_uemodeparams)/sizeof(paramdef_t),NULL);
     config_process_cmdline( cmdline_ueparams,sizeof(cmdline_ueparams)/sizeof(paramdef_t),NULL);
      if (loopfile != NULL) {
  	  printf("Input file for hardware emulation: %s",loopfile);
  	  mode=loop_through_memory;
  	  input_fd = fopen(loopfile,"r");
  	  AssertFatal(input_fd != NULL,"Please provide a valid input file\n");
      }
      if ( (cmdline_uemodeparams[CMDLINE_CALIBUERX_IDX].paramflags &  PARAMFLAG_PARAMSET) != 0) mode = rx_calib_ue;
      if ( (cmdline_uemodeparams[CMDLINE_CALIBUERXMED_IDX].paramflags &  PARAMFLAG_PARAMSET) != 0) mode = rx_calib_ue_med;
      if ( (cmdline_uemodeparams[CMDLINE_CALIBUERXBYP_IDX].paramflags &  PARAMFLAG_PARAMSET) != 0) mode = rx_calib_ue_byp;
      if ( *(cmdline_uemodeparams[CMDLINE_DEBUGUEPRACH_IDX].uptr) > 0) mode = debug_prach;
      if ( *(cmdline_uemodeparams[CMDLINE_NOL2CONNECT_IDX].uptr) > 0)  mode = no_L2_connect;
      if ( *(cmdline_uemodeparams[CMDLINE_CALIBPRACHTX_IDX].uptr) > 0) mode = calib_prach_tx; 
      if (dumpframe  > 0)  mode = rx_dump_frame;
      
      if ( downlink_frequency[0][0] > 0) {
  	  for (CC_id=1; CC_id<MAX_NUM_CCs; CC_id++) {
  	    downlink_frequency[CC_id][1] = downlink_frequency[0][0];
  	    downlink_frequency[CC_id][2] = downlink_frequency[0][0];
  	    downlink_frequency[CC_id][3] = downlink_frequency[0][0];
  	    printf("Downlink for CC_id %d frequency set to %u\n", CC_id, downlink_frequency[CC_id][0]);
  	  }
      UE_scan=0;
      } 


      if (frame_parms[0]->N_RB_DL !=0) {
  	  if ( frame_parms[0]->N_RB_DL < 6 ) {
  	     frame_parms[0]->N_RB_DL = 6;
  	     printf ( "%i: Invalid number of ressource blocks, adjusted to 6\n",frame_parms[0]->N_RB_DL);
  	  }
  	  if ( frame_parms[0]->N_RB_DL > 100 ) {
  	     frame_parms[0]->N_RB_DL = 100;
  	     printf ( "%i: Invalid number of ressource blocks, adjusted to 100\n",frame_parms[0]->N_RB_DL);
  	  }
  	  if ( frame_parms[0]->N_RB_DL > 50 && frame_parms[0]->N_RB_DL < 100 ) {
  	     frame_parms[0]->N_RB_DL = 50;
  	     printf ( "%i: Invalid number of ressource blocks, adjusted to 50\n",frame_parms[0]->N_RB_DL);
  	  }
  	  if ( frame_parms[0]->N_RB_DL > 25 && frame_parms[0]->N_RB_DL < 50 ) {
  	     frame_parms[0]->N_RB_DL = 25;
  	     printf ( "%i: Invalid number of ressource blocks, adjusted to 25\n",frame_parms[0]->N_RB_DL);
  	  }
  	  UE_scan = 0;
  	  frame_parms[0]->N_RB_UL=frame_parms[0]->N_RB_DL;
  	  for (CC_id=1; CC_id<MAX_NUM_CCs; CC_id++) {
  	      frame_parms[CC_id]->N_RB_DL=frame_parms[0]->N_RB_DL;
  	      frame_parms[CC_id]->N_RB_UL=frame_parms[0]->N_RB_UL;
  	  }
      }


      for (CC_id=1;CC_id<MAX_NUM_CCs;CC_id++) {
  	    tx_max_power[CC_id]=tx_max_power[0];
	    rx_gain[0][CC_id] = rx_gain[0][0];
	    tx_gain[0][CC_id] = tx_gain[0][0];
      }
  } /* UE_flag > 0 */
#if T_TRACER
  paramdef_t cmdline_ttraceparams[] =CMDLINE_TTRACEPARAMS_DESC ;
  config_process_cmdline( cmdline_ttraceparams,sizeof(cmdline_ttraceparams)/sizeof(paramdef_t),NULL);   
#endif

717 718 719 720
  if ( !(CONFIG_ISFLAGSET(CONFIG_ABORT)) ) {
    if (UE_flag == 0) {
      memset((void*)&RC,0,sizeof(RC));
      /* Read RC configuration file */
oai's avatar
oai committed
721
      RCConfig();
722 723 724
      NB_eNB_INST = RC.nb_inst;
      NB_RU	  = RC.nb_RU;
      printf("Configuration: nb_inst %d, nb_ru %d\n",NB_eNB_INST,NB_RU);
725
    }
oai's avatar
oai committed
726 727 728 729 730 731
  } else if (UE_flag == 1 && (CONFIG_GETCONFFILE != NULL)) {
    // Here the configuration file is the XER encoded UE capabilities
    // Read it in and store in asn1c data structures
    strcpy(uecap_xer,CONFIG_GETCONFFILE);
    uecap_xer_in=1;
  } /* UE with config file  */
732 733 734
}


735
  
736 737 738
#if T_TRACER
int T_wait = 1;       /* by default we wait for the tracer */
int T_port = 2021;    /* default port to listen to to wait for the tracer */
739
int T_dont_fork = 0;  /* default is to fork, see 'T_init' to understand */
740 741
#endif

knopp's avatar
knopp committed
742 743
void set_default_frame_parms(LTE_DL_FRAME_PARMS *frame_parms[MAX_NUM_CCs]);
void set_default_frame_parms(LTE_DL_FRAME_PARMS *frame_parms[MAX_NUM_CCs]) {
knopp's avatar
knopp committed
744 745 746 747 748 749 750 751 752 753 754 755 756 757 758

  int CC_id;

  for (CC_id=0; CC_id<MAX_NUM_CCs; CC_id++) {
    frame_parms[CC_id] = (LTE_DL_FRAME_PARMS*) malloc(sizeof(LTE_DL_FRAME_PARMS));
    /* Set some default values that may be overwritten while reading options */
    frame_parms[CC_id]->frame_type          = FDD;
    frame_parms[CC_id]->tdd_config          = 3;
    frame_parms[CC_id]->tdd_config_S        = 0;
    frame_parms[CC_id]->N_RB_DL             = 100;
    frame_parms[CC_id]->N_RB_UL             = 100;
    frame_parms[CC_id]->Ncp                 = NORMAL;
    frame_parms[CC_id]->Ncp_UL              = NORMAL;
    frame_parms[CC_id]->Nid_cell            = 0;
    frame_parms[CC_id]->num_MBSFN_config    = 0;
759
    frame_parms[CC_id]->nb_antenna_ports_eNB  = 1;
knopp's avatar
knopp committed
760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788
    frame_parms[CC_id]->nb_antennas_tx      = 1;
    frame_parms[CC_id]->nb_antennas_rx      = 1;

    frame_parms[CC_id]->nushift             = 0;

    frame_parms[CC_id]->phich_config_common.phich_resource = oneSixth;
    frame_parms[CC_id]->phich_config_common.phich_duration = normal;
    // UL RS Config
    frame_parms[CC_id]->pusch_config_common.ul_ReferenceSignalsPUSCH.cyclicShift = 0;//n_DMRS1 set to 0
    frame_parms[CC_id]->pusch_config_common.ul_ReferenceSignalsPUSCH.groupHoppingEnabled = 0;
    frame_parms[CC_id]->pusch_config_common.ul_ReferenceSignalsPUSCH.sequenceHoppingEnabled = 0;
    frame_parms[CC_id]->pusch_config_common.ul_ReferenceSignalsPUSCH.groupAssignmentPUSCH = 0;

    frame_parms[CC_id]->prach_config_common.rootSequenceIndex=22;
    frame_parms[CC_id]->prach_config_common.prach_ConfigInfo.zeroCorrelationZoneConfig=1;
    frame_parms[CC_id]->prach_config_common.prach_ConfigInfo.prach_ConfigIndex=0;
    frame_parms[CC_id]->prach_config_common.prach_ConfigInfo.highSpeedFlag=0;
    frame_parms[CC_id]->prach_config_common.prach_ConfigInfo.prach_FreqOffset=0;

    downlink_frequency[CC_id][0] = 2680000000; // Use float to avoid issue with frequency over 2^31.
    downlink_frequency[CC_id][1] = downlink_frequency[CC_id][0];
    downlink_frequency[CC_id][2] = downlink_frequency[CC_id][0];
    downlink_frequency[CC_id][3] = downlink_frequency[CC_id][0];
    //printf("Downlink for CC_id %d frequency set to %u\n", CC_id, downlink_frequency[CC_id][0]);

  }

}

knopp's avatar
knopp committed
789 790
void init_openair0(void);

knopp's avatar
knopp committed
791 792 793 794 795 796 797 798 799 800 801 802 803
void init_openair0() {

  int card;
  int i;

  for (card=0; card<MAX_CARDS; card++) {

    openair0_cfg[card].mmapped_dma=mmapped_dma;
    openair0_cfg[card].configFilename = NULL;

    if(frame_parms[0]->N_RB_DL == 100) {
      if (frame_parms[0]->threequarter_fs) {
	openair0_cfg[card].sample_rate=23.04e6;
804
	openair0_cfg[card].samples_per_frame = 230400;
knopp's avatar
knopp committed
805 806
	openair0_cfg[card].tx_bw = 10e6;
	openair0_cfg[card].rx_bw = 10e6;
807
      } else {
knopp's avatar
knopp committed
808
	openair0_cfg[card].sample_rate=30.72e6;
809
	openair0_cfg[card].samples_per_frame = 307200;
knopp's avatar
knopp committed
810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838
	openair0_cfg[card].tx_bw = 10e6;
	openair0_cfg[card].rx_bw = 10e6;
      }
    } else if(frame_parms[0]->N_RB_DL == 50) {
      openair0_cfg[card].sample_rate=15.36e6;
      openair0_cfg[card].samples_per_frame = 153600;
      openair0_cfg[card].tx_bw = 5e6;
      openair0_cfg[card].rx_bw = 5e6;
    } else if (frame_parms[0]->N_RB_DL == 25) {
      openair0_cfg[card].sample_rate=7.68e6;
      openair0_cfg[card].samples_per_frame = 76800;
      openair0_cfg[card].tx_bw = 2.5e6;
      openair0_cfg[card].rx_bw = 2.5e6;
    } else if (frame_parms[0]->N_RB_DL == 6) {
      openair0_cfg[card].sample_rate=1.92e6;
      openair0_cfg[card].samples_per_frame = 19200;
      openair0_cfg[card].tx_bw = 1.5e6;
      openair0_cfg[card].rx_bw = 1.5e6;
    }




    if (frame_parms[0]->frame_type==TDD)
      openair0_cfg[card].duplex_mode = duplex_mode_TDD;
    else //FDD
      openair0_cfg[card].duplex_mode = duplex_mode_FDD;

    printf("HW: Configuring card %d, nb_antennas_tx/rx %d/%d\n",card,
839 840
	   ((UE_flag==0) ? RC.eNB[0][0]->frame_parms.nb_antennas_tx : PHY_vars_UE_g[0][0]->frame_parms.nb_antennas_tx),
	   ((UE_flag==0) ? RC.eNB[0][0]->frame_parms.nb_antennas_rx : PHY_vars_UE_g[0][0]->frame_parms.nb_antennas_rx));
knopp's avatar
knopp committed
841 842 843
    openair0_cfg[card].Mod_id = 0;

    openair0_cfg[card].num_rb_dl=frame_parms[0]->N_RB_DL;
844

845
    openair0_cfg[card].clock_source = clock_source;
846

847

848 849
    openair0_cfg[card].tx_num_channels=min(2,((UE_flag==0) ? RC.eNB[0][0]->frame_parms.nb_antennas_tx : PHY_vars_UE_g[0][0]->frame_parms.nb_antennas_tx));
    openair0_cfg[card].rx_num_channels=min(2,((UE_flag==0) ? RC.eNB[0][0]->frame_parms.nb_antennas_rx : PHY_vars_UE_g[0][0]->frame_parms.nb_antennas_rx));
850

knopp's avatar
knopp committed
851
    for (i=0; i<4; i++) {
Florian Kaltenberger's avatar
Florian Kaltenberger committed
852

knopp's avatar
knopp committed
853 854 855 856
      if (i<openair0_cfg[card].tx_num_channels)
	openair0_cfg[card].tx_freq[i] = (UE_flag==0) ? downlink_frequency[0][i] : downlink_frequency[0][i]+uplink_frequency_offset[0][i];
      else
	openair0_cfg[card].tx_freq[i]=0.0;
857

knopp's avatar
knopp committed
858 859 860 861 862 863 864 865
      if (i<openair0_cfg[card].rx_num_channels)
	openair0_cfg[card].rx_freq[i] = (UE_flag==0) ? downlink_frequency[0][i] + uplink_frequency_offset[0][i] : downlink_frequency[0][i];
      else
	openair0_cfg[card].rx_freq[i]=0.0;

      openair0_cfg[card].autocal[i] = 1;
      openair0_cfg[card].tx_gain[i] = tx_gain[0][i];
      if (UE_flag == 0) {
866
	openair0_cfg[card].rx_gain[i] = RC.eNB[0][0]->rx_total_gain_dB;
knopp's avatar
knopp committed
867 868
      }
      else {
fnabet's avatar
fnabet committed
869
	openair0_cfg[card].rx_gain[i] = PHY_vars_UE_g[0][0]->rx_total_gain_dB - rx_gain_off;
knopp's avatar
knopp committed
870 871
      }

872
      openair0_cfg[card].configFilename = rf_config_file;
873
      printf("Card %d, channel %d, Setting tx_gain %f, rx_gain %f, tx_freq %f, rx_freq %f\n",
874 875 876 877
	     card,i, openair0_cfg[card].tx_gain[i],
	     openair0_cfg[card].rx_gain[i],
	     openair0_cfg[card].tx_freq[i],
	     openair0_cfg[card].rx_freq[i]);
878
    }
knopp's avatar
 
knopp committed
879
  }
knopp's avatar
 
knopp committed
880
}
881

882

883
void wait_RUs(void) {
884 885 886 887 888 889 890 891 892 893 894 895 896 897 898

  LOG_I(PHY,"Waiting for RUs to be configured ...\n");

  // wait for all RUs to be configured over fronthaul
  pthread_mutex_lock(&RC.ru_mutex);



  while (RC.ru_mask>0) {
    pthread_cond_wait(&RC.ru_cond,&RC.ru_mutex);
  }

  LOG_I(PHY,"RUs configured\n");
}

899
void wait_eNBs(void) {
900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917

  int i,j;
  int waiting=1;


  while (waiting==1) {
    printf("Waiting for eNB L1 instances to all get configured ... sleeping 500ms (nb_L1_inst %d)\n",RC.nb_L1_inst);
    usleep(500000);
    waiting=0;
    for (i=0;i<RC.nb_L1_inst;i++)
      for (j=0;j<RC.nb_L1_CC[i];j++)
	if (RC.eNB[i][j]->configured==0) {
	  waiting=1;
	  break;
	}
  }
  printf("eNB L1 are configured\n");
}
918

919 920
int main( int argc, char **argv )
{
921
  int i;
922
#if defined (XFORMS)
knopp's avatar
 
knopp committed
923
  void *status;
924
#endif
925

knopp's avatar
 
knopp committed
926
  int CC_id;
knopp's avatar